
Time bar (total: 1.3min)
| 1× | search |
| Probability | Valid | Unknown | Precondition | Infinite | Domain | Can't | Iter |
|---|---|---|---|---|---|---|---|
| 0% | 0% | 99.8% | 0.2% | 0% | 0% | 0% | 0 |
| 0% | 0% | 99.8% | 0.2% | 0% | 0% | 0% | 1 |
| 0% | 0% | 99.8% | 0.2% | 0% | 0% | 0% | 2 |
| 0% | 0% | 99.8% | 0.2% | 0% | 0% | 0% | 3 |
| 0% | 0% | 99.8% | 0.2% | 0% | 0% | 0% | 4 |
| 0% | 0% | 99.8% | 0.2% | 0% | 0% | 0% | 5 |
| 0% | 0% | 99.8% | 0.2% | 0% | 0% | 0% | 6 |
| 0% | 0% | 99.8% | 0.2% | 0% | 0% | 0% | 7 |
| 0% | 0% | 99.8% | 0.2% | 0% | 0% | 0% | 8 |
| 0% | 0% | 99.8% | 0.2% | 0% | 0% | 0% | 9 |
| 0% | 0% | 99.8% | 0.2% | 0% | 0% | 0% | 10 |
| 0% | 0% | 99.8% | 0.2% | 0% | 0% | 0% | 11 |
| 0% | 0% | 99.8% | 0.2% | 0% | 0% | 0% | 12 |
Compiled 189 to 57 computations (69.8% saved)
ival-mult: 593.0ms (32.7% of total)ival-pow: 405.0ms (22.4% of total)ival-sin: 265.0ms (14.6% of total)ival-div: 251.0ms (13.9% of total)ival-add: 87.0ms (4.8% of total)ival-sub: 58.0ms (3.2% of total)ival-sqrt: 53.0ms (2.9% of total)ival-neg: 40.0ms (2.2% of total)ival-cos: 32.0ms (1.8% of total)ival-pi: 17.0ms (0.9% of total)const: 8.0ms (0.4% of total)backward-pass: 2.0ms (0.1% of total)| 13.7s | 3999× | 3 | valid |
| 7.8s | 1298× | 4 | valid |
| 7.4s | 2105× | 2 | valid |
| 1.1s | 824× | 1 | valid |
| 12.0ms | 30× | 0 | valid |
ival-sin: 5.8s (21% of total)ival-mult: 5.5s (20.2% of total)ival-cos: 4.6s (16.9% of total)ival-div: 3.6s (13% of total)ival-pow: 3.5s (12.9% of total)backward-pass: 2.1s (7.7% of total)ival-add: 639.0ms (2.3% of total)ival-sub: 580.0ms (2.1% of total)ival-sqrt: 571.0ms (2.1% of total)ival-neg: 261.0ms (0.9% of total)ival-pi: 133.0ms (0.5% of total)const: 60.0ms (0.2% of total)| 2× | egg-herbie |
| 9426× | *-lowering-*.f32 |
| 9426× | *-lowering-*.f64 |
| 2238× | neg-lowering-neg.f64 |
| 2238× | neg-lowering-neg.f32 |
| 1748× | /-lowering-/.f32 |
Useful iterations: 3 (0.0ms)
| Iter | Nodes | Cost |
|---|---|---|
| 0 | 556 | 3888 |
| 1 | 1539 | 2642 |
| 2 | 7204 | 2522 |
| 0 | 56 | 183 |
| 1 | 134 | 126 |
| 2 | 562 | 120 |
| 3 | 5148 | 114 |
| 0 | 9455 | 114 |
| 1× | iter limit |
| 1× | node limit |
| 1× | node limit |
| 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 x-scale (*.f64 y-scale y-scale)))))) (-.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))) (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 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64))) (cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) (/.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (*.f64 x-scale y-scale))))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 b a)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) |
| Inputs |
|---|
(/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (- (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) |
(/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b (neg a)) (* b (neg (neg a))))) (pow (* x-scale y-scale) 2))) (* (* b (neg a)) (* b (neg (neg a))))) (- (+ (/ (/ (+ (pow (* (neg a) (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* (neg a) (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* (neg a) (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* (neg a) (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow (neg a) 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b (neg a)) (* b (neg (neg a))))) (pow (* x-scale y-scale) 2))) |
(/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* (neg b) a) (* (neg b) (neg a)))) (pow (* x-scale y-scale) 2))) (* (* (neg b) a) (* (neg b) (neg a)))) (- (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* (neg b) (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* (neg b) (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* (neg b) (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* (neg b) (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow (neg b) 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* (neg b) a) (* (neg b) (neg a)))) (pow (* x-scale y-scale) 2))) |
(/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (- (+ (/ (/ (+ (pow (* a (sin (* (/ (neg angle) 180) (PI)))) 2) (pow (* b (cos (* (/ (neg angle) 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ (neg angle) 180) (PI)))) 2) (pow (* b (sin (* (/ (neg angle) 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ (neg angle) 180) (PI)))) 2) (pow (* b (cos (* (/ (neg angle) 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ (neg angle) 180) (PI)))) 2) (pow (* b (sin (* (/ (neg angle) 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ (neg angle) 180) (PI)))) (cos (* (/ (neg angle) 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) |
(/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* (neg x-scale) y-scale) 2))) (* (* b a) (* b (neg a)))) (- (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) (neg x-scale)) (neg x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) (neg x-scale)) (neg x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) (neg x-scale)) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* (neg x-scale) y-scale) 2))) |
(/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale (neg y-scale)) 2))) (* (* b a) (* b (neg a)))) (- (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) (neg y-scale)) (neg y-scale))) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) (neg y-scale)) (neg y-scale))) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) (neg y-scale)) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale (neg y-scale)) 2))) |
(neg (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b (neg a)) (* b (neg (neg a))))) (pow (* x-scale y-scale) 2))) (* (* b (neg a)) (* b (neg (neg a))))) (- (+ (/ (/ (+ (pow (* (neg a) (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* (neg a) (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* (neg a) (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* (neg a) (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow (neg a) 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b (neg a)) (* b (neg (neg a))))) (pow (* x-scale y-scale) 2)))) |
(neg (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* (neg b) a) (* (neg b) (neg a)))) (pow (* x-scale y-scale) 2))) (* (* (neg b) a) (* (neg b) (neg a)))) (- (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* (neg b) (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* (neg b) (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* (neg b) (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* (neg b) (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow (neg b) 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* (neg b) a) (* (neg b) (neg a)))) (pow (* x-scale y-scale) 2)))) |
(neg (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (- (+ (/ (/ (+ (pow (* a (sin (* (/ (neg angle) 180) (PI)))) 2) (pow (* b (cos (* (/ (neg angle) 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ (neg angle) 180) (PI)))) 2) (pow (* b (sin (* (/ (neg angle) 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ (neg angle) 180) (PI)))) 2) (pow (* b (cos (* (/ (neg angle) 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ (neg angle) 180) (PI)))) 2) (pow (* b (sin (* (/ (neg angle) 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ (neg angle) 180) (PI)))) (cos (* (/ (neg angle) 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2)))) |
(neg (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* (neg x-scale) y-scale) 2))) (* (* b a) (* b (neg a)))) (- (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) (neg x-scale)) (neg x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) (neg x-scale)) (neg x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) (neg x-scale)) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* (neg x-scale) y-scale) 2)))) |
(neg (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale (neg y-scale)) 2))) (* (* b a) (* b (neg a)))) (- (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) (neg y-scale)) (neg y-scale))) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) (neg y-scale)) (neg y-scale))) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) (neg y-scale)) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale (neg y-scale)) 2)))) |
(/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* a b) (* a (neg b)))) (pow (* x-scale y-scale) 2))) (* (* a b) (* a (neg b)))) (- (+ (/ (/ (+ (pow (* b (sin (* (/ angle 180) (PI)))) 2) (pow (* a (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* b (cos (* (/ angle 180) (PI)))) 2) (pow (* a (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* b (sin (* (/ angle 180) (PI)))) 2) (pow (* a (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* b (cos (* (/ angle 180) (PI)))) 2) (pow (* a (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow a 2) (pow b 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* a b) (* a (neg b)))) (pow (* x-scale y-scale) 2))) |
(/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b angle) (* b (neg angle)))) (pow (* x-scale y-scale) 2))) (* (* b angle) (* b (neg angle)))) (- (+ (/ (/ (+ (pow (* angle (sin (* (/ a 180) (PI)))) 2) (pow (* b (cos (* (/ a 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* angle (cos (* (/ a 180) (PI)))) 2) (pow (* b (sin (* (/ a 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* angle (sin (* (/ a 180) (PI)))) 2) (pow (* b (cos (* (/ a 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* angle (cos (* (/ a 180) (PI)))) 2) (pow (* b (sin (* (/ a 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow angle 2))) (sin (* (/ a 180) (PI)))) (cos (* (/ a 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b angle) (* b (neg angle)))) (pow (* x-scale y-scale) 2))) |
(/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b x-scale) (* b (neg x-scale)))) (pow (* a y-scale) 2))) (* (* b x-scale) (* b (neg x-scale)))) (- (+ (/ (/ (+ (pow (* x-scale (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) a) a) (/ (/ (+ (pow (* x-scale (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* x-scale (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) a) a) (/ (/ (+ (pow (* x-scale (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow x-scale 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) a) y-scale) 2))))))) (/ (* 4 (* (* b x-scale) (* b (neg x-scale)))) (pow (* a y-scale) 2))) |
(/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b y-scale) (* b (neg y-scale)))) (pow (* x-scale a) 2))) (* (* b y-scale) (* b (neg y-scale)))) (- (+ (/ (/ (+ (pow (* y-scale (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* y-scale (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) a) a)) (sqrt (+ (pow (- (/ (/ (+ (pow (* y-scale (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* y-scale (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) a) a)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow y-scale 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) a) 2))))))) (/ (* 4 (* (* b y-scale) (* b (neg y-scale)))) (pow (* x-scale a) 2))) |
(/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* angle a) (* angle (neg a)))) (pow (* x-scale y-scale) 2))) (* (* angle a) (* angle (neg a)))) (- (+ (/ (/ (+ (pow (* a (sin (* (/ b 180) (PI)))) 2) (pow (* angle (cos (* (/ b 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ b 180) (PI)))) 2) (pow (* angle (sin (* (/ b 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ b 180) (PI)))) 2) (pow (* angle (cos (* (/ b 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ b 180) (PI)))) 2) (pow (* angle (sin (* (/ b 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow angle 2) (pow a 2))) (sin (* (/ b 180) (PI)))) (cos (* (/ b 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* angle a) (* angle (neg a)))) (pow (* x-scale y-scale) 2))) |
(/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* x-scale a) (* x-scale (neg a)))) (pow (* b y-scale) 2))) (* (* x-scale a) (* x-scale (neg a)))) (- (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* x-scale (cos (* (/ angle 180) (PI)))) 2)) b) b) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* x-scale (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* x-scale (cos (* (/ angle 180) (PI)))) 2)) b) b) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* x-scale (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow x-scale 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) b) y-scale) 2))))))) (/ (* 4 (* (* x-scale a) (* x-scale (neg a)))) (pow (* b y-scale) 2))) |
(/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* y-scale a) (* y-scale (neg a)))) (pow (* x-scale b) 2))) (* (* y-scale a) (* y-scale (neg a)))) (- (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* y-scale (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* y-scale (sin (* (/ angle 180) (PI)))) 2)) b) b)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* y-scale (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* y-scale (sin (* (/ angle 180) (PI)))) 2)) b) b)) 2) (pow (/ (/ (* (* (* 2 (- (pow y-scale 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) b) 2))))))) (/ (* 4 (* (* y-scale a) (* y-scale (neg a)))) (pow (* x-scale b) 2))) |
(/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* angle y-scale) 2))) (* (* b a) (* b (neg a)))) (- (+ (/ (/ (+ (pow (* a (sin (* (/ x-scale 180) (PI)))) 2) (pow (* b (cos (* (/ x-scale 180) (PI)))) 2)) angle) angle) (/ (/ (+ (pow (* a (cos (* (/ x-scale 180) (PI)))) 2) (pow (* b (sin (* (/ x-scale 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ x-scale 180) (PI)))) 2) (pow (* b (cos (* (/ x-scale 180) (PI)))) 2)) angle) angle) (/ (/ (+ (pow (* a (cos (* (/ x-scale 180) (PI)))) 2) (pow (* b (sin (* (/ x-scale 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ x-scale 180) (PI)))) (cos (* (/ x-scale 180) (PI)))) angle) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* angle y-scale) 2))) |
(/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale angle) 2))) (* (* b a) (* b (neg a)))) (- (+ (/ (/ (+ (pow (* a (sin (* (/ y-scale 180) (PI)))) 2) (pow (* b (cos (* (/ y-scale 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ y-scale 180) (PI)))) 2) (pow (* b (sin (* (/ y-scale 180) (PI)))) 2)) angle) angle)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ y-scale 180) (PI)))) 2) (pow (* b (cos (* (/ y-scale 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ y-scale 180) (PI)))) 2) (pow (* b (sin (* (/ y-scale 180) (PI)))) 2)) angle) angle)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ y-scale 180) (PI)))) (cos (* (/ y-scale 180) (PI)))) x-scale) angle) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale angle) 2))) |
(/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* y-scale x-scale) 2))) (* (* b a) (* b (neg a)))) (- (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) y-scale) x-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* y-scale x-scale) 2))) |
| Outputs |
|---|
(/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (- (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) |
(/ (sqrt (* (* (neg (square (* b a))) (/ (* 8 (neg (square (* b a)))) (square (* x-scale y-scale)))) (- (+ (/ (+ (square (* a (sin (deg2rad angle)))) (square (* b (cos (deg2rad angle))))) (square x-scale)) (/ (+ (square (* a (cos (deg2rad angle)))) (square (* b (sin (deg2rad angle))))) (square y-scale))) (hypot (- (/ (+ (square (* a (sin (deg2rad angle)))) (square (* b (cos (deg2rad angle))))) (square x-scale)) (/ (+ (square (* a (cos (deg2rad angle)))) (square (* b (sin (deg2rad angle))))) (square y-scale))) (* (* 2 (* (sin (deg2rad angle)) (fnmadd a a (square b)))) (/ (cos (deg2rad angle)) (* x-scale y-scale))))))) (* -4 (/ (neg (square (* b a))) (square (* x-scale y-scale))))) |
(/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b (neg a)) (* b (neg (neg a))))) (pow (* x-scale y-scale) 2))) (* (* b (neg a)) (* b (neg (neg a))))) (- (+ (/ (/ (+ (pow (* (neg a) (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* (neg a) (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* (neg a) (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* (neg a) (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow (neg a) 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b (neg a)) (* b (neg (neg a))))) (pow (* x-scale y-scale) 2))) |
(/ (sqrt (* (* (neg (square (* b a))) (/ (* 8 (neg (square (* b a)))) (square (* x-scale y-scale)))) (- (+ (/ (+ (square (* a (sin (deg2rad angle)))) (square (* b (cos (deg2rad angle))))) (square x-scale)) (/ (+ (square (* a (cos (deg2rad angle)))) (square (* b (sin (deg2rad angle))))) (square y-scale))) (hypot (- (/ (+ (square (* a (sin (deg2rad angle)))) (square (* b (cos (deg2rad angle))))) (square x-scale)) (/ (+ (square (* a (cos (deg2rad angle)))) (square (* b (sin (deg2rad angle))))) (square y-scale))) (* (* 2 (* (sin (deg2rad angle)) (fnmadd a a (square b)))) (/ (cos (deg2rad angle)) (* x-scale y-scale))))))) (* -4 (/ (neg (square (* b a))) (square (* x-scale y-scale))))) |
(/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* (neg b) a) (* (neg b) (neg a)))) (pow (* x-scale y-scale) 2))) (* (* (neg b) a) (* (neg b) (neg a)))) (- (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* (neg b) (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* (neg b) (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* (neg b) (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* (neg b) (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow (neg b) 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* (neg b) a) (* (neg b) (neg a)))) (pow (* x-scale y-scale) 2))) |
(/ (sqrt (* (* (neg (square (* b a))) (/ (* 8 (neg (square (* b a)))) (square (* x-scale y-scale)))) (- (+ (/ (+ (square (* a (sin (deg2rad angle)))) (square (* b (cos (deg2rad angle))))) (square x-scale)) (/ (+ (square (* a (cos (deg2rad angle)))) (square (* b (sin (deg2rad angle))))) (square y-scale))) (hypot (- (/ (+ (square (* a (sin (deg2rad angle)))) (square (* b (cos (deg2rad angle))))) (square x-scale)) (/ (+ (square (* a (cos (deg2rad angle)))) (square (* b (sin (deg2rad angle))))) (square y-scale))) (* (* 2 (* (sin (deg2rad angle)) (fnmadd a a (square b)))) (/ (cos (deg2rad angle)) (* x-scale y-scale))))))) (* -4 (/ (neg (square (* b a))) (square (* x-scale y-scale))))) |
(/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (- (+ (/ (/ (+ (pow (* a (sin (* (/ (neg angle) 180) (PI)))) 2) (pow (* b (cos (* (/ (neg angle) 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ (neg angle) 180) (PI)))) 2) (pow (* b (sin (* (/ (neg angle) 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ (neg angle) 180) (PI)))) 2) (pow (* b (cos (* (/ (neg angle) 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ (neg angle) 180) (PI)))) 2) (pow (* b (sin (* (/ (neg angle) 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ (neg angle) 180) (PI)))) (cos (* (/ (neg angle) 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) |
(/ (sqrt (* (* (neg (square (* b a))) (/ (* 8 (neg (square (* b a)))) (square (* x-scale y-scale)))) (+ (/ (+ (square (* a (sin (deg2rad angle)))) (square (* b (cos (deg2rad angle))))) (square x-scale)) (- (/ (+ (square (* a (cos (deg2rad angle)))) (square (* b (sin (deg2rad angle))))) (square y-scale)) (hypot (- (/ (+ (square (* a (sin (deg2rad angle)))) (square (* b (cos (deg2rad angle))))) (square x-scale)) (/ (+ (square (* a (cos (deg2rad angle)))) (square (* b (sin (deg2rad angle))))) (square y-scale))) (* (* (* 2 (fnmadd a a (square b))) (neg (sin (deg2rad angle)))) (/ (/ (cos (deg2rad angle)) x-scale) y-scale))))))) (* -4 (/ (neg (square (* b a))) (square (* x-scale y-scale))))) |
(/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* (neg x-scale) y-scale) 2))) (* (* b a) (* b (neg a)))) (- (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) (neg x-scale)) (neg x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) (neg x-scale)) (neg x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) (neg x-scale)) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* (neg x-scale) y-scale) 2))) |
(/ (sqrt (* (* (neg (square (* b a))) (/ (* 8 (neg (square (* b a)))) (square (* x-scale y-scale)))) (- (+ (/ (+ (square (* a (sin (deg2rad angle)))) (square (* b (cos (deg2rad angle))))) (square x-scale)) (/ (+ (square (* a (cos (deg2rad angle)))) (square (* b (sin (deg2rad angle))))) (square y-scale))) (hypot (- (/ (+ (square (* a (sin (deg2rad angle)))) (square (* b (cos (deg2rad angle))))) (square x-scale)) (/ (+ (square (* a (cos (deg2rad angle)))) (square (* b (sin (deg2rad angle))))) (square y-scale))) (* (* 2 (* (sin (deg2rad angle)) (fnmadd a a (square b)))) (/ (cos (deg2rad angle)) (* x-scale y-scale))))))) (* -4 (/ (neg (square (* b a))) (square (* x-scale y-scale))))) |
(/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale (neg y-scale)) 2))) (* (* b a) (* b (neg a)))) (- (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) (neg y-scale)) (neg y-scale))) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) (neg y-scale)) (neg y-scale))) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) (neg y-scale)) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale (neg y-scale)) 2))) |
(/ (sqrt (* (* (neg (square (* b a))) (/ (* 8 (neg (square (* b a)))) (square (* x-scale y-scale)))) (- (+ (/ (+ (square (* a (sin (deg2rad angle)))) (square (* b (cos (deg2rad angle))))) (square x-scale)) (/ (+ (square (* a (cos (deg2rad angle)))) (square (* b (sin (deg2rad angle))))) (square y-scale))) (hypot (- (/ (+ (square (* a (sin (deg2rad angle)))) (square (* b (cos (deg2rad angle))))) (square x-scale)) (/ (+ (square (* a (cos (deg2rad angle)))) (square (* b (sin (deg2rad angle))))) (square y-scale))) (* (* 2 (* (sin (deg2rad angle)) (fnmadd a a (square b)))) (/ (cos (deg2rad angle)) (* x-scale y-scale))))))) (* -4 (/ (neg (square (* b a))) (square (* x-scale y-scale))))) |
(neg (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b (neg a)) (* b (neg (neg a))))) (pow (* x-scale y-scale) 2))) (* (* b (neg a)) (* b (neg (neg a))))) (- (+ (/ (/ (+ (pow (* (neg a) (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* (neg a) (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* (neg a) (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* (neg a) (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow (neg a) 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b (neg a)) (* b (neg (neg a))))) (pow (* x-scale y-scale) 2)))) |
(/ (sqrt (* (* (neg (square (* b a))) (/ (* 8 (neg (square (* b a)))) (square (* x-scale y-scale)))) (- (+ (/ (+ (square (* a (sin (deg2rad angle)))) (square (* b (cos (deg2rad angle))))) (square x-scale)) (/ (+ (square (* a (cos (deg2rad angle)))) (square (* b (sin (deg2rad angle))))) (square y-scale))) (hypot (- (/ (+ (square (* a (sin (deg2rad angle)))) (square (* b (cos (deg2rad angle))))) (square x-scale)) (/ (+ (square (* a (cos (deg2rad angle)))) (square (* b (sin (deg2rad angle))))) (square y-scale))) (* (* 2 (* (sin (deg2rad angle)) (fnmadd a a (square b)))) (/ (cos (deg2rad angle)) (* x-scale y-scale))))))) (* (neg (square (* b a))) (/ 4 (square (* x-scale y-scale))))) |
(neg (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* (neg b) a) (* (neg b) (neg a)))) (pow (* x-scale y-scale) 2))) (* (* (neg b) a) (* (neg b) (neg a)))) (- (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* (neg b) (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* (neg b) (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* (neg b) (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* (neg b) (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow (neg b) 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* (neg b) a) (* (neg b) (neg a)))) (pow (* x-scale y-scale) 2)))) |
(/ (sqrt (* (* (neg (square (* b a))) (/ (* 8 (neg (square (* b a)))) (square (* x-scale y-scale)))) (- (+ (/ (+ (square (* a (sin (deg2rad angle)))) (square (* b (cos (deg2rad angle))))) (square x-scale)) (/ (+ (square (* a (cos (deg2rad angle)))) (square (* b (sin (deg2rad angle))))) (square y-scale))) (hypot (- (/ (+ (square (* a (sin (deg2rad angle)))) (square (* b (cos (deg2rad angle))))) (square x-scale)) (/ (+ (square (* a (cos (deg2rad angle)))) (square (* b (sin (deg2rad angle))))) (square y-scale))) (* (* 2 (* (sin (deg2rad angle)) (fnmadd a a (square b)))) (/ (cos (deg2rad angle)) (* x-scale y-scale))))))) (* (neg (square (* b a))) (/ 4 (square (* x-scale y-scale))))) |
(neg (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (- (+ (/ (/ (+ (pow (* a (sin (* (/ (neg angle) 180) (PI)))) 2) (pow (* b (cos (* (/ (neg angle) 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ (neg angle) 180) (PI)))) 2) (pow (* b (sin (* (/ (neg angle) 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ (neg angle) 180) (PI)))) 2) (pow (* b (cos (* (/ (neg angle) 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ (neg angle) 180) (PI)))) 2) (pow (* b (sin (* (/ (neg angle) 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ (neg angle) 180) (PI)))) (cos (* (/ (neg angle) 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2)))) |
(/ (sqrt (* (* (neg (square (* b a))) (/ (* 8 (neg (square (* b a)))) (square (* x-scale y-scale)))) (+ (/ (+ (square (* a (sin (deg2rad angle)))) (square (* b (cos (deg2rad angle))))) (square x-scale)) (- (/ (+ (square (* a (cos (deg2rad angle)))) (square (* b (sin (deg2rad angle))))) (square y-scale)) (hypot (- (/ (+ (square (* a (sin (deg2rad angle)))) (square (* b (cos (deg2rad angle))))) (square x-scale)) (/ (+ (square (* a (cos (deg2rad angle)))) (square (* b (sin (deg2rad angle))))) (square y-scale))) (* (* (* 2 (fnmadd a a (square b))) (neg (sin (deg2rad angle)))) (/ (/ (cos (deg2rad angle)) x-scale) y-scale))))))) (* (neg (square (* b a))) (/ 4 (square (* x-scale y-scale))))) |
(neg (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* (neg x-scale) y-scale) 2))) (* (* b a) (* b (neg a)))) (- (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) (neg x-scale)) (neg x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) (neg x-scale)) (neg x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) (neg x-scale)) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* (neg x-scale) y-scale) 2)))) |
(/ (sqrt (* (* (neg (square (* b a))) (/ (* 8 (neg (square (* b a)))) (square (* x-scale y-scale)))) (- (+ (/ (+ (square (* a (sin (deg2rad angle)))) (square (* b (cos (deg2rad angle))))) (square x-scale)) (/ (+ (square (* a (cos (deg2rad angle)))) (square (* b (sin (deg2rad angle))))) (square y-scale))) (hypot (- (/ (+ (square (* a (sin (deg2rad angle)))) (square (* b (cos (deg2rad angle))))) (square x-scale)) (/ (+ (square (* a (cos (deg2rad angle)))) (square (* b (sin (deg2rad angle))))) (square y-scale))) (* (* 2 (* (sin (deg2rad angle)) (fnmadd a a (square b)))) (/ (cos (deg2rad angle)) (* x-scale y-scale))))))) (* (neg (square (* b a))) (/ 4 (square (* x-scale y-scale))))) |
(neg (/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale (neg y-scale)) 2))) (* (* b a) (* b (neg a)))) (- (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) (neg y-scale)) (neg y-scale))) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) (neg y-scale)) (neg y-scale))) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) (neg y-scale)) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale (neg y-scale)) 2)))) |
(/ (sqrt (* (* (neg (square (* b a))) (/ (* 8 (neg (square (* b a)))) (square (* x-scale y-scale)))) (- (+ (/ (+ (square (* a (sin (deg2rad angle)))) (square (* b (cos (deg2rad angle))))) (square x-scale)) (/ (+ (square (* a (cos (deg2rad angle)))) (square (* b (sin (deg2rad angle))))) (square y-scale))) (hypot (- (/ (+ (square (* a (sin (deg2rad angle)))) (square (* b (cos (deg2rad angle))))) (square x-scale)) (/ (+ (square (* a (cos (deg2rad angle)))) (square (* b (sin (deg2rad angle))))) (square y-scale))) (* (* 2 (* (sin (deg2rad angle)) (fnmadd a a (square b)))) (/ (cos (deg2rad angle)) (* x-scale y-scale))))))) (* (neg (square (* b a))) (/ 4 (square (* x-scale y-scale))))) |
(/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* a b) (* a (neg b)))) (pow (* x-scale y-scale) 2))) (* (* a b) (* a (neg b)))) (- (+ (/ (/ (+ (pow (* b (sin (* (/ angle 180) (PI)))) 2) (pow (* a (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* b (cos (* (/ angle 180) (PI)))) 2) (pow (* a (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* b (sin (* (/ angle 180) (PI)))) 2) (pow (* a (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* b (cos (* (/ angle 180) (PI)))) 2) (pow (* a (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow a 2) (pow b 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* a b) (* a (neg b)))) (pow (* x-scale y-scale) 2))) |
(/ (sqrt (* (* (neg (square (* b a))) (/ (* 8 (neg (square (* b a)))) (square (* x-scale y-scale)))) (- (+ (/ (+ (square (* a (sin (deg2rad angle)))) (square (* b (cos (deg2rad angle))))) (square y-scale)) (/ (+ (square (* a (cos (deg2rad angle)))) (square (* b (sin (deg2rad angle))))) (square x-scale))) (hypot (- (/ (+ (square (* a (cos (deg2rad angle)))) (square (* b (sin (deg2rad angle))))) (square x-scale)) (/ (+ (square (* a (sin (deg2rad angle)))) (square (* b (cos (deg2rad angle))))) (square y-scale))) (* (* 2 (* (sin (deg2rad angle)) (fmsub a a (square b)))) (/ (/ (cos (deg2rad angle)) x-scale) y-scale)))))) (* -4 (/ (neg (square (* b a))) (square (* x-scale y-scale))))) |
(/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b angle) (* b (neg angle)))) (pow (* x-scale y-scale) 2))) (* (* b angle) (* b (neg angle)))) (- (+ (/ (/ (+ (pow (* angle (sin (* (/ a 180) (PI)))) 2) (pow (* b (cos (* (/ a 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* angle (cos (* (/ a 180) (PI)))) 2) (pow (* b (sin (* (/ a 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* angle (sin (* (/ a 180) (PI)))) 2) (pow (* b (cos (* (/ a 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* angle (cos (* (/ a 180) (PI)))) 2) (pow (* b (sin (* (/ a 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow angle 2))) (sin (* (/ a 180) (PI)))) (cos (* (/ a 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* b angle) (* b (neg angle)))) (pow (* x-scale y-scale) 2))) |
(* -1/4 (/ (sqrt (* (* (neg (square (* b angle))) (* 8 (/ (neg (square (* b angle))) (square (* x-scale y-scale))))) (- (+ (/ (fma (square b) (square (cos (deg2rad a))) (square (* angle (sin (deg2rad a))))) (square x-scale)) (/ (+ (square (* angle (cos (deg2rad a)))) (square (* b (sin (deg2rad a))))) (square y-scale))) (hypot (- (/ (fma (square b) (square (cos (deg2rad a))) (square (* angle (sin (deg2rad a))))) (square x-scale)) (/ (+ (square (* angle (cos (deg2rad a)))) (square (* b (sin (deg2rad a))))) (square y-scale))) (* (* 2 (* (sin (deg2rad a)) (fmsub b b (square angle)))) (/ (cos (deg2rad a)) (* x-scale y-scale))))))) (/ (neg (square (* b angle))) (square (* x-scale y-scale))))) |
(/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b x-scale) (* b (neg x-scale)))) (pow (* a y-scale) 2))) (* (* b x-scale) (* b (neg x-scale)))) (- (+ (/ (/ (+ (pow (* x-scale (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) a) a) (/ (/ (+ (pow (* x-scale (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* x-scale (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) a) a) (/ (/ (+ (pow (* x-scale (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow x-scale 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) a) y-scale) 2))))))) (/ (* 4 (* (* b x-scale) (* b (neg x-scale)))) (pow (* a y-scale) 2))) |
(* -1/4 (/ (sqrt (* (* (neg (square (* b x-scale))) (* 8 (/ (neg (square (* b x-scale))) (square (* a y-scale))))) (- (+ (/ (+ (square (* b (cos (deg2rad angle)))) (square (* x-scale (sin (deg2rad angle))))) (square a)) (/ (+ (square (* b (sin (deg2rad angle)))) (square (* x-scale (cos (deg2rad angle))))) (square y-scale))) (hypot (- (/ (+ (square (* b (cos (deg2rad angle)))) (square (* x-scale (sin (deg2rad angle))))) (square a)) (/ (+ (square (* b (sin (deg2rad angle)))) (square (* x-scale (cos (deg2rad angle))))) (square y-scale))) (* (* 2 (* (sin (deg2rad angle)) (fmsub b b (square x-scale)))) (/ (cos (deg2rad angle)) (* a y-scale))))))) (/ (neg (square (* b x-scale))) (square (* a y-scale))))) |
(/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b y-scale) (* b (neg y-scale)))) (pow (* x-scale a) 2))) (* (* b y-scale) (* b (neg y-scale)))) (- (+ (/ (/ (+ (pow (* y-scale (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* y-scale (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) a) a)) (sqrt (+ (pow (- (/ (/ (+ (pow (* y-scale (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* y-scale (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) a) a)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow y-scale 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) a) 2))))))) (/ (* 4 (* (* b y-scale) (* b (neg y-scale)))) (pow (* x-scale a) 2))) |
(* -1/4 (/ (sqrt (* (* (neg (square (* b y-scale))) (* 8 (/ (neg (square (* b y-scale))) (square (* a x-scale))))) (- (+ (/ (fma (square y-scale) (square (sin (deg2rad angle))) (square (* b (cos (deg2rad angle))))) (square x-scale)) (/ (+ (square (* b (sin (deg2rad angle)))) (square (* y-scale (cos (deg2rad angle))))) (square a))) (hypot (- (/ (fma (square y-scale) (square (sin (deg2rad angle))) (square (* b (cos (deg2rad angle))))) (square x-scale)) (/ (+ (square (* b (sin (deg2rad angle)))) (square (* y-scale (cos (deg2rad angle))))) (square a))) (* (* 2 (* (sin (deg2rad angle)) (fmsub b b (square y-scale)))) (/ (cos (deg2rad angle)) (* a x-scale))))))) (/ (neg (square (* b y-scale))) (square (* a x-scale))))) |
(/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* angle a) (* angle (neg a)))) (pow (* x-scale y-scale) 2))) (* (* angle a) (* angle (neg a)))) (- (+ (/ (/ (+ (pow (* a (sin (* (/ b 180) (PI)))) 2) (pow (* angle (cos (* (/ b 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ b 180) (PI)))) 2) (pow (* angle (sin (* (/ b 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ b 180) (PI)))) 2) (pow (* angle (cos (* (/ b 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ b 180) (PI)))) 2) (pow (* angle (sin (* (/ b 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow angle 2) (pow a 2))) (sin (* (/ b 180) (PI)))) (cos (* (/ b 180) (PI)))) x-scale) y-scale) 2))))))) (/ (* 4 (* (* angle a) (* angle (neg a)))) (pow (* x-scale y-scale) 2))) |
(* -1/4 (/ (sqrt (* (* (neg (square (* a angle))) (* 8 (/ (neg (square (* a angle))) (square (* x-scale y-scale))))) (- (+ (/ (+ (square (* a (sin (deg2rad b)))) (square (* angle (cos (deg2rad b))))) (square x-scale)) (/ (+ (square (* a (cos (deg2rad b)))) (square (* angle (sin (deg2rad b))))) (square y-scale))) (hypot (- (/ (+ (square (* a (sin (deg2rad b)))) (square (* angle (cos (deg2rad b))))) (square x-scale)) (/ (+ (square (* a (cos (deg2rad b)))) (square (* angle (sin (deg2rad b))))) (square y-scale))) (* (* (sin (deg2rad b)) (* 2 (- (square angle) (square a)))) (/ (cos (deg2rad b)) (* x-scale y-scale))))))) (/ (neg (square (* a angle))) (square (* x-scale y-scale))))) |
(/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* x-scale a) (* x-scale (neg a)))) (pow (* b y-scale) 2))) (* (* x-scale a) (* x-scale (neg a)))) (- (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* x-scale (cos (* (/ angle 180) (PI)))) 2)) b) b) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* x-scale (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* x-scale (cos (* (/ angle 180) (PI)))) 2)) b) b) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* x-scale (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow x-scale 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) b) y-scale) 2))))))) (/ (* 4 (* (* x-scale a) (* x-scale (neg a)))) (pow (* b y-scale) 2))) |
(* -1/4 (/ (sqrt (* (* (neg (square (* a x-scale))) (* 8 (/ (neg (square (* a x-scale))) (square (* b y-scale))))) (- (+ (/ (fma (square a) (square (sin (deg2rad angle))) (square (* x-scale (cos (deg2rad angle))))) (square b)) (/ (+ (square (* a (cos (deg2rad angle)))) (square (* x-scale (sin (deg2rad angle))))) (square y-scale))) (hypot (- (/ (fma (square a) (square (sin (deg2rad angle))) (square (* x-scale (cos (deg2rad angle))))) (square b)) (/ (+ (square (* a (cos (deg2rad angle)))) (square (* x-scale (sin (deg2rad angle))))) (square y-scale))) (* (* (sin (deg2rad angle)) (* 2 (- (square x-scale) (square a)))) (/ (cos (deg2rad angle)) (* b y-scale))))))) (/ (neg (square (* a x-scale))) (square (* b y-scale))))) |
(/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* y-scale a) (* y-scale (neg a)))) (pow (* x-scale b) 2))) (* (* y-scale a) (* y-scale (neg a)))) (- (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* y-scale (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* y-scale (sin (* (/ angle 180) (PI)))) 2)) b) b)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* y-scale (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* y-scale (sin (* (/ angle 180) (PI)))) 2)) b) b)) 2) (pow (/ (/ (* (* (* 2 (- (pow y-scale 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) b) 2))))))) (/ (* 4 (* (* y-scale a) (* y-scale (neg a)))) (pow (* x-scale b) 2))) |
(* -1/4 (/ (sqrt (* (* (neg (square (* a y-scale))) (* 8 (/ (neg (square (* a y-scale))) (square (* b x-scale))))) (- (+ (/ (+ (square (* a (sin (deg2rad angle)))) (square (* y-scale (cos (deg2rad angle))))) (square x-scale)) (/ (+ (square (* a (cos (deg2rad angle)))) (square (* y-scale (sin (deg2rad angle))))) (square b))) (hypot (- (/ (+ (square (* a (sin (deg2rad angle)))) (square (* y-scale (cos (deg2rad angle))))) (square x-scale)) (/ (+ (square (* a (cos (deg2rad angle)))) (square (* y-scale (sin (deg2rad angle))))) (square b))) (* (* 2 (* (sin (deg2rad angle)) (fmsub y-scale y-scale (square a)))) (/ (cos (deg2rad angle)) (* b x-scale))))))) (/ (neg (square (* a y-scale))) (square (* b x-scale))))) |
(/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* angle y-scale) 2))) (* (* b a) (* b (neg a)))) (- (+ (/ (/ (+ (pow (* a (sin (* (/ x-scale 180) (PI)))) 2) (pow (* b (cos (* (/ x-scale 180) (PI)))) 2)) angle) angle) (/ (/ (+ (pow (* a (cos (* (/ x-scale 180) (PI)))) 2) (pow (* b (sin (* (/ x-scale 180) (PI)))) 2)) y-scale) y-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ x-scale 180) (PI)))) 2) (pow (* b (cos (* (/ x-scale 180) (PI)))) 2)) angle) angle) (/ (/ (+ (pow (* a (cos (* (/ x-scale 180) (PI)))) 2) (pow (* b (sin (* (/ x-scale 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ x-scale 180) (PI)))) (cos (* (/ x-scale 180) (PI)))) angle) y-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* angle y-scale) 2))) |
(* -1/4 (/ (sqrt (* (* (neg (square (* b a))) (* 8 (/ (neg (square (* b a))) (square (* y-scale angle))))) (+ (/ (+ (square (* a (sin (deg2rad x-scale)))) (square (* b (cos (deg2rad x-scale))))) (square angle)) (- (/ (+ (square (* a (cos (deg2rad x-scale)))) (square (* b (sin (deg2rad x-scale))))) (square y-scale)) (hypot (- (/ (+ (square (* a (sin (deg2rad x-scale)))) (square (* b (cos (deg2rad x-scale))))) (square angle)) (/ (+ (square (* a (cos (deg2rad x-scale)))) (square (* b (sin (deg2rad x-scale))))) (square y-scale))) (* (* (* 2 (fnmadd a a (square b))) (sin (deg2rad x-scale))) (/ (cos (deg2rad x-scale)) (* y-scale angle)))))))) (/ (neg (square (* b a))) (square (* y-scale angle))))) |
(/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale angle) 2))) (* (* b a) (* b (neg a)))) (- (+ (/ (/ (+ (pow (* a (sin (* (/ y-scale 180) (PI)))) 2) (pow (* b (cos (* (/ y-scale 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ y-scale 180) (PI)))) 2) (pow (* b (sin (* (/ y-scale 180) (PI)))) 2)) angle) angle)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ y-scale 180) (PI)))) 2) (pow (* b (cos (* (/ y-scale 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ y-scale 180) (PI)))) 2) (pow (* b (sin (* (/ y-scale 180) (PI)))) 2)) angle) angle)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ y-scale 180) (PI)))) (cos (* (/ y-scale 180) (PI)))) x-scale) angle) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale angle) 2))) |
(* -1/4 (/ (sqrt (* (* (neg (square (* b a))) (* 8 (/ (neg (square (* b a))) (square (* x-scale angle))))) (- (+ (/ (+ (square (* a (sin (deg2rad y-scale)))) (square (* b (cos (deg2rad y-scale))))) (square x-scale)) (/ (+ (square (* a (cos (deg2rad y-scale)))) (square (* b (sin (deg2rad y-scale))))) (square angle))) (hypot (- (/ (+ (square (* a (sin (deg2rad y-scale)))) (square (* b (cos (deg2rad y-scale))))) (square x-scale)) (/ (+ (square (* a (cos (deg2rad y-scale)))) (square (* b (sin (deg2rad y-scale))))) (square angle))) (* (* 2 (* (fnmadd a a (square b)) (sin (deg2rad y-scale)))) (/ (cos (deg2rad y-scale)) (* x-scale angle))))))) (/ (neg (square (* b a))) (square (* x-scale angle))))) |
(/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* y-scale x-scale) 2))) (* (* b a) (* b (neg a)))) (- (+ (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) y-scale) x-scale) 2))))))) (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* y-scale x-scale) 2))) |
(/ (sqrt (* (* (neg (square (* b a))) (/ (* 8 (neg (square (* b a)))) (square (* x-scale y-scale)))) (- (+ (/ (+ (square (* a (sin (deg2rad angle)))) (square (* b (cos (deg2rad angle))))) (square y-scale)) (/ (+ (square (* a (cos (deg2rad angle)))) (square (* b (sin (deg2rad angle))))) (square x-scale))) (hypot (* (* 2 (* (sin (deg2rad angle)) (fnmadd a a (square b)))) (/ (cos (deg2rad angle)) (* x-scale y-scale))) (- (/ (+ (square (* a (sin (deg2rad angle)))) (square (* b (cos (deg2rad angle))))) (square y-scale)) (/ (+ (square (* a (cos (deg2rad angle)))) (square (* b (sin (deg2rad angle))))) (square x-scale))))))) (* -4 (/ (neg (square (* b a))) (square (* x-scale y-scale))))) |
(abs a)
(abs b)
(abs x-scale)
(abs y-scale)
| Ground Truth | Overpredictions | Example | Underpredictions | Example | Subexpression |
|---|---|---|---|---|---|
| 174 | 0 | - | 0 | - | (-.f64 (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) |
| 170 | 0 | - | 1 | (8.829164378860309e-255 2.795300539489324e+300 -1.0419569933435988e-109 2.3903272873228487e+92 1.4199609271725245e+35) | (/.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)))) |
| 132 | 0 | - | 0 | - | (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) |
| 132 | 0 | - | 0 | - | (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) |
| 63 | 1 | (3.306705587063391e+300 6.19414895649961e-248 -8.76113870865772e-182 2.7427713373369564e-80 6.662398793656525e+294) | 1 | (8.968197177476353e-82 2.528383346688351e-35 1.8766892399925814e-184 1.264290134301503e-216 6.209165232174424e+59) | (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))) |
| 49 | 0 | - | 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)))) |
| 45 | 0 | - | 0 | - | (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) |
| 39 | 1 | (8.829164378860309e-255 2.795300539489324e+300 -1.0419569933435988e-109 2.3903272873228487e+92 1.4199609271725245e+35) | 1 | (2.2496521435755375e+66 9.126098143752098e-107 5.032877516858062e-96 6.407821543675268e-306 2.3437731798306475e+189) | (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))))))) |
| 33 | 0 | - | 1 | (2.74345202345253e-219 4.997291489558548e-156 -1.3483533429029422e-296 9.756804203401238e-17 2.3424710334407302e+266) | (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) |
| 33 | 0 | - | 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) |
| 32 | 0 | - | 0 | - | (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) |
| 31 | 1 | (2.2496521435755375e+66 9.126098143752098e-107 5.032877516858062e-96 6.407821543675268e-306 2.3437731798306475e+189) | 1 | (7.19472858019152e+77 2.81935850806983e-103 3.823148249861844e+119 8.857871124593143e-122 1.31343020217954e+58) | (*.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)))))) |
| 28 | 1 | (6.481163147209226e-215 4.7290437981262264e-293 1.5653893103410315e+159 4.646616824556473e+108 8.059795150360617e-108) | 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) |
| 25 | 0 | - | 0 | - | (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) |
| 22 | 0 | - | 2 | (1.1635351803897223e-231 4.253264450161823e+74 -1.0651643518445823e+26 5.554499400848236e+38 8.381617532153151e-230) | (*.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)))) |
| 18 | 0 | - | 0 | - | (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))) |
| 14 | 0 | - | 2 | (6.481163147209226e-215 4.7290437981262264e-293 1.5653893103410315e+159 4.646616824556473e+108 8.059795150360617e-108) | (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) |
| 14 | 0 | - | 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) |
| 0 | 0 | - | 0 | - | (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) |
| 0 | 0 | - | 0 | - | y-scale |
| 0 | 0 | - | 0 | - | #s(literal 4 binary64) |
| 0 | 33 | (6.641061649611442e-13 17230035334192204.0 2.642692281402352e-72 54024.73954369395 4.960367350023445e+84) | 0 | - | (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64)) |
| 0 | 0 | - | 0 | - | (/.f64 angle #s(literal 180 binary64)) |
| 0 | 0 | - | 0 | - | (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) |
| 0 | 0 | - | 0 | - | (PI.f64) |
| 0 | 82 | (2.5145528444211435e-71 9.374334351796502e+189 7.461379467377028e+164 2.233359541457485e+163 8.277161458271537e+26) | 0 | - | (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) |
| 0 | 0 | - | 0 | - | (pow.f64 a #s(literal 2 binary64)) |
| 0 | 84 | (1.3277921098178054e+204 4.398343867111649e-50 6.84687304422543e-9 7.882102750855792e+166 3.287942540325599e-171) | 0 | - | (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) |
| 0 | 0 | - | 0 | - | (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) |
| 0 | 0 | - | 0 | - | (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))) |
| 0 | 0 | - | 0 | - | a |
| 0 | 0 | - | 0 | - | b |
| 0 | 0 | - | 0 | - | (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) |
| 0 | 23 | (6.641061649611442e-13 17230035334192204.0 2.642692281402352e-72 54024.73954369395 4.960367350023445e+84) | 0 | - | (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) |
| 0 | 0 | - | 0 | - | #s(literal 2 binary64) |
| 0 | 0 | - | 0 | - | angle |
| 0 | 0 | - | 0 | - | #s(literal 180 binary64) |
| 0 | 0 | - | 0 | - | (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) |
| 0 | 0 | - | 0 | - | (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) |
| 0 | 0 | - | 0 | - | (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) |
| 0 | 0 | - | 0 | - | (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) |
| 0 | 0 | - | 0 | - | (neg.f64 a) |
| 0 | 0 | - | 0 | - | (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) |
| 0 | 0 | - | 0 | - | (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) |
| 0 | 0 | - | 0 | - | (pow.f64 b #s(literal 2 binary64)) |
| 0 | 0 | - | 0 | - | (*.f64 b (neg.f64 a)) |
| 0 | 85 | (1.955217589468725e+120 1.0652829190006461e-77 -6.495598477398037e+306 4.619124653654751e-119 3.670429373366058e+26) | 0 | - | (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)) |
| 0 | 0 | - | 0 | - | (*.f64 x-scale y-scale) |
| 0 | 0 | - | 0 | - | (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))) |
| 0 | 0 | - | 0 | - | (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)) |
| 0 | 0 | - | 0 | - | (neg.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (-.f64 (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64)))))))) |
| 0 | 0 | - | 0 | - | (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) |
| 0 | 60 | (6.641061649611442e-13 17230035334192204.0 2.642692281402352e-72 54024.73954369395 4.960367350023445e+84) | 0 | - | (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) |
| 0 | 51 | (6.641061649611442e-13 17230035334192204.0 2.642692281402352e-72 54024.73954369395 4.960367350023445e+84) | 0 | - | (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) |
| 0 | 0 | - | 0 | - | (*.f64 b a) |
| 0 | 0 | - | 0 | - | x-scale |
| 1.3s | 242× | 3 | valid |
| 746.0ms | 94× | 4 | valid |
| 545.0ms | 136× | 2 | valid |
| 97.0ms | 40× | 1 | valid |
Compiled 3426 to 170 computations (95% saved)
ival-sin: 369.0ms (19.8% of total)ival-cos: 349.0ms (18.7% of total)backward-pass: 300.0ms (16.1% of total)ival-div: 255.0ms (13.7% of total)ival-pow: 238.0ms (12.8% of total)ival-mult: 225.0ms (12.1% of total)ival-add: 40.0ms (2.1% of total)ival-sqrt: 33.0ms (1.8% of total)ival-sub: 31.0ms (1.7% of total)ival-neg: 14.0ms (0.8% of total)ival-pi: 8.0ms (0.4% of total)const: 4.0ms (0.2% of total)Compiled 181 to 54 computations (70.2% saved)
| Status | Accuracy | Program |
|---|---|---|
| ▶ | 0.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 x-scale (*.f64 y-scale y-scale)))))) (-.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))) (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 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64))) (cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) (/.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (*.f64 x-scale y-scale))))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 b a)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) |
Compiled 181 to 54 computations (70.2% saved)
| 1× | egg-herbie |
Found 4 expressions of interest:
| New | Metric | Score | Program |
|---|---|---|---|
| ✓ | cost-diff | 0 | (*.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 x-scale (*.f64 y-scale y-scale)))))) |
| ✓ | cost-diff | 0 | (*.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 x-scale (*.f64 y-scale y-scale)))))) (-.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))) (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 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64))) (cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) (/.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (*.f64 x-scale y-scale)))))) |
| ✓ | cost-diff | 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 x-scale (*.f64 y-scale y-scale)))))) (-.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))) (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 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64))) (cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) (/.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (*.f64 x-scale y-scale))))))) |
| ✓ | cost-diff | 0 | (/.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 x-scale (*.f64 y-scale y-scale)))))) (-.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))) (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 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64))) (cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) (/.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (*.f64 x-scale y-scale))))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 b a)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) |
| 5236× | *-lowering-*.f32 |
| 5236× | *-lowering-*.f64 |
| 3266× | /-lowering-/.f32 |
| 3266× | /-lowering-/.f64 |
| 1756× | fma-lowering-fma.f32 |
Useful iterations: 3 (0.0ms)
| Iter | Nodes | Cost |
|---|---|---|
| 0 | 57 | 922 |
| 1 | 162 | 823 |
| 2 | 798 | 811 |
| 3 | 4560 | 804 |
| 4 | 6573 | 804 |
| 0 | 8003 | 804 |
| 1× | iter limit |
| 1× | node limit |
| Inputs |
|---|
(/ (sqrt (* (* (* b a) (* (* (* b a) 8) (/ (* a (* b (* b a))) (* x-scale (* x-scale (* 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))) (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)))) (* (* (* (sin (/ (* angle (PI)) 180)) (cos (/ (* angle (PI)) 180))) (/ (* (+ b a) (* (- b a) 2)) (* x-scale y-scale))) (* (* (sin (/ (* angle (PI)) 180)) (cos (/ (* angle (PI)) 180))) (/ (* (+ b a) (* (- b a) 2)) (* x-scale y-scale))))))))) (/ (* 4 (* a (* b (* b a)))) (* x-scale (* x-scale (* y-scale y-scale))))) |
(sqrt (* (* (* b a) (* (* (* b a) 8) (/ (* a (* b (* b a))) (* x-scale (* x-scale (* 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))) (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)))) (* (* (* (sin (/ (* angle (PI)) 180)) (cos (/ (* angle (PI)) 180))) (/ (* (+ b a) (* (- b a) 2)) (* x-scale y-scale))) (* (* (sin (/ (* angle (PI)) 180)) (cos (/ (* angle (PI)) 180))) (/ (* (+ b a) (* (- b a) 2)) (* x-scale y-scale))))))))) |
(* (* (* b a) (* (* (* b a) 8) (/ (* a (* b (* b a))) (* x-scale (* x-scale (* 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))) (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)))) (* (* (* (sin (/ (* angle (PI)) 180)) (cos (/ (* angle (PI)) 180))) (/ (* (+ b a) (* (- b a) 2)) (* x-scale y-scale))) (* (* (sin (/ (* angle (PI)) 180)) (cos (/ (* angle (PI)) 180))) (/ (* (+ b a) (* (- b a) 2)) (* x-scale y-scale)))))))) |
(* (* b a) (* (* (* b a) 8) (/ (* a (* b (* b a))) (* x-scale (* x-scale (* y-scale y-scale)))))) |
(* b a) |
b |
a |
(* (* (* b a) 8) (/ (* a (* b (* b a))) (* x-scale (* x-scale (* y-scale y-scale))))) |
(* (* b a) 8) |
8 |
(/ (* a (* b (* b a))) (* x-scale (* x-scale (* y-scale y-scale)))) |
(* a (* b (* b a))) |
(* b (* b a)) |
(* x-scale (* x-scale (* y-scale y-scale))) |
x-scale |
(* x-scale (* y-scale y-scale)) |
(* y-scale 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))) (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)))) (* (* (* (sin (/ (* angle (PI)) 180)) (cos (/ (* angle (PI)) 180))) (/ (* (+ b a) (* (- b a) 2)) (* x-scale y-scale))) (* (* (sin (/ (* angle (PI)) 180)) (cos (/ (* angle (PI)) 180))) (/ (* (+ b a) (* (- b a) 2)) (* x-scale y-scale))))))) |
(+ (/ (+ (pow (* a (sin (/ (* angle (PI)) 180))) 2) (pow (* b (cos (/ (* angle (PI)) 180))) 2)) (* x-scale x-scale)) (/ (+ (pow (* a (cos (/ (* angle (PI)) 180))) 2) (pow (* b (sin (/ (* angle (PI)) 180))) 2)) (* y-scale y-scale))) |
(/ (+ (pow (* a (sin (/ (* angle (PI)) 180))) 2) (pow (* b (cos (/ (* angle (PI)) 180))) 2)) (* x-scale x-scale)) |
(+ (pow (* a (sin (/ (* angle (PI)) 180))) 2) (pow (* b (cos (/ (* angle (PI)) 180))) 2)) |
(pow (* a (sin (/ (* angle (PI)) 180))) 2) |
(* a (sin (/ (* angle (PI)) 180))) |
(sin (/ (* angle (PI)) 180)) |
(/ (* angle (PI)) 180) |
(* angle (PI)) |
angle |
(PI) |
180 |
2 |
(pow (* b (cos (/ (* angle (PI)) 180))) 2) |
(* b (cos (/ (* angle (PI)) 180))) |
(cos (/ (* angle (PI)) 180)) |
(* 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))) |
(pow (* b (sin (/ (* angle (PI)) 180))) 2) |
(* b (sin (/ (* angle (PI)) 180))) |
(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)))) (* (* (* (sin (/ (* angle (PI)) 180)) (cos (/ (* angle (PI)) 180))) (/ (* (+ b a) (* (- b a) 2)) (* x-scale y-scale))) (* (* (sin (/ (* angle (PI)) 180)) (cos (/ (* angle (PI)) 180))) (/ (* (+ b a) (* (- b a) 2)) (* x-scale y-scale)))))) |
(- (/ (+ (pow (* a (sin (/ (* angle (PI)) 180))) 2) (pow (* b (cos (/ (* angle (PI)) 180))) 2)) (* x-scale x-scale)) (/ (+ (pow (* a (cos (/ (* angle (PI)) 180))) 2) (pow (* b (sin (/ (* angle (PI)) 180))) 2)) (* y-scale y-scale))) |
(* (* (sin (/ (* angle (PI)) 180)) (cos (/ (* angle (PI)) 180))) (/ (* (+ b a) (* (- b a) 2)) (* x-scale y-scale))) |
(* (sin (/ (* angle (PI)) 180)) (cos (/ (* angle (PI)) 180))) |
(/ (* (+ b a) (* (- b a) 2)) (* x-scale y-scale)) |
(* (+ b a) (* (- b a) 2)) |
(+ b a) |
(* (- b a) 2) |
(- b a) |
(* x-scale y-scale) |
(/ (* 4 (* a (* b (* b a)))) (* x-scale (* x-scale (* y-scale y-scale)))) |
(* 4 (* a (* b (* b a)))) |
4 |
| Outputs |
|---|
(/ (sqrt (* (* (* b a) (* (* (* b a) 8) (/ (* a (* b (* b a))) (* x-scale (* x-scale (* 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))) (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)))) (* (* (* (sin (/ (* angle (PI)) 180)) (cos (/ (* angle (PI)) 180))) (/ (* (+ b a) (* (- b a) 2)) (* x-scale y-scale))) (* (* (sin (/ (* angle (PI)) 180)) (cos (/ (* angle (PI)) 180))) (/ (* (+ b a) (* (- b a) 2)) (* x-scale y-scale))))))))) (/ (* 4 (* a (* b (* b a)))) (* x-scale (* x-scale (* y-scale y-scale))))) |
(/.f64 (sqrt.f64 (*.f64 (*.f64 b a) (*.f64 (/.f64 (*.f64 (*.f64 b a) (*.f64 b (*.f64 a (*.f64 b (*.f64 a #s(literal 8 binary64)))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (-.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))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (*.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64))) (*.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64))) (*.f64 (+.f64 b a) (/.f64 (*.f64 (/.f64 (-.f64 b a) x-scale) #s(literal 2 binary64)) y-scale))))))))) (/.f64 (*.f64 a (*.f64 (*.f64 b (*.f64 b a)) #s(literal 4 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) |
(sqrt (* (* (* b a) (* (* (* b a) 8) (/ (* a (* b (* b a))) (* x-scale (* x-scale (* 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))) (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)))) (* (* (* (sin (/ (* angle (PI)) 180)) (cos (/ (* angle (PI)) 180))) (/ (* (+ b a) (* (- b a) 2)) (* x-scale y-scale))) (* (* (sin (/ (* angle (PI)) 180)) (cos (/ (* angle (PI)) 180))) (/ (* (+ b a) (* (- b a) 2)) (* x-scale y-scale))))))))) |
(sqrt.f64 (*.f64 (*.f64 b a) (*.f64 (/.f64 (*.f64 (*.f64 b a) (*.f64 b (*.f64 a (*.f64 b (*.f64 a #s(literal 8 binary64)))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (-.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))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (*.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64))) (*.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64))) (*.f64 (+.f64 b a) (/.f64 (*.f64 (/.f64 (-.f64 b a) x-scale) #s(literal 2 binary64)) y-scale))))))))) |
(* (* (* b a) (* (* (* b a) 8) (/ (* a (* b (* b a))) (* x-scale (* x-scale (* 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))) (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)))) (* (* (* (sin (/ (* angle (PI)) 180)) (cos (/ (* angle (PI)) 180))) (/ (* (+ b a) (* (- b a) 2)) (* x-scale y-scale))) (* (* (sin (/ (* angle (PI)) 180)) (cos (/ (* angle (PI)) 180))) (/ (* (+ b a) (* (- b a) 2)) (* x-scale y-scale)))))))) |
(*.f64 (*.f64 b a) (*.f64 (/.f64 (*.f64 (*.f64 b a) (*.f64 b (*.f64 a (*.f64 b (*.f64 a #s(literal 8 binary64)))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (-.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))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (*.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64))) (*.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64))) (*.f64 (+.f64 b a) (/.f64 (*.f64 (/.f64 (-.f64 b a) x-scale) #s(literal 2 binary64)) y-scale)))))))) |
(* (* b a) (* (* (* b a) 8) (/ (* a (* b (* b a))) (* x-scale (* x-scale (* y-scale y-scale)))))) |
(/.f64 (*.f64 (*.f64 b a) (*.f64 (*.f64 b a) (*.f64 b (*.f64 a (*.f64 b (*.f64 a #s(literal 8 binary64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) |
(* b a) |
(*.f64 b a) |
b |
a |
(* (* (* b a) 8) (/ (* a (* b (* b a))) (* x-scale (* x-scale (* y-scale y-scale))))) |
(/.f64 (*.f64 (*.f64 b a) (*.f64 b (*.f64 a (*.f64 b (*.f64 a #s(literal 8 binary64)))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) |
(* (* b a) 8) |
(*.f64 b (*.f64 a #s(literal 8 binary64))) |
8 |
#s(literal 8 binary64) |
(/ (* a (* b (* b a))) (* x-scale (* x-scale (* y-scale y-scale)))) |
(/.f64 (*.f64 b (*.f64 a (*.f64 b a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) |
(* a (* b (* b a))) |
(*.f64 b (*.f64 a (*.f64 b a))) |
(* b (* b a)) |
(*.f64 b (*.f64 b a)) |
(* x-scale (* x-scale (* y-scale y-scale))) |
(*.f64 x-scale (*.f64 x-scale (*.f64 y-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 |
(- (+ (/ (+ (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))) (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)))) (* (* (* (sin (/ (* angle (PI)) 180)) (cos (/ (* angle (PI)) 180))) (/ (* (+ b a) (* (- b a) 2)) (* x-scale y-scale))) (* (* (sin (/ (* angle (PI)) 180)) (cos (/ (* angle (PI)) 180))) (/ (* (+ b a) (* (- b a) 2)) (* x-scale y-scale))))))) |
(-.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))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (*.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64))) (*.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64))) (*.f64 (+.f64 b a) (/.f64 (*.f64 (/.f64 (-.f64 b a) x-scale) #s(literal 2 binary64)) 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))) |
(+.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)))) |
(sin (/ (* angle (PI)) 180)) |
(sin.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 (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)))) |
(cos (/ (* angle (PI)) 180)) |
(cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64))) |
(* x-scale x-scale) |
(*.f64 x-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)))) |
(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)))) |
(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)))) (* (* (* (sin (/ (* angle (PI)) 180)) (cos (/ (* angle (PI)) 180))) (/ (* (+ b a) (* (- b a) 2)) (* x-scale y-scale))) (* (* (sin (/ (* angle (PI)) 180)) (cos (/ (* angle (PI)) 180))) (/ (* (+ b a) (* (- b a) 2)) (* x-scale y-scale)))))) |
(hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (*.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64))) (*.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64))) (*.f64 (+.f64 b a) (/.f64 (*.f64 (/.f64 (-.f64 b a) x-scale) #s(literal 2 binary64)) 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))) |
(-.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))) |
(* (* (sin (/ (* angle (PI)) 180)) (cos (/ (* angle (PI)) 180))) (/ (* (+ b a) (* (- b a) 2)) (* x-scale 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))) (*.f64 (+.f64 b a) (/.f64 (*.f64 (/.f64 (-.f64 b a) x-scale) #s(literal 2 binary64)) y-scale)))) |
(* (sin (/ (* angle (PI)) 180)) (cos (/ (* angle (PI)) 180))) |
(*.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64))) (cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) |
(/ (* (+ b a) (* (- b a) 2)) (* x-scale y-scale)) |
(*.f64 (+.f64 b a) (/.f64 (*.f64 (/.f64 (-.f64 b a) x-scale) #s(literal 2 binary64)) y-scale)) |
(* (+ b a) (* (- b a) 2)) |
(*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a))) |
(+ b a) |
(+.f64 b a) |
(* (- b a) 2) |
(*.f64 #s(literal 2 binary64) (-.f64 b a)) |
(- b a) |
(-.f64 b a) |
(* x-scale y-scale) |
(*.f64 x-scale y-scale) |
(/ (* 4 (* a (* b (* b a)))) (* x-scale (* x-scale (* y-scale y-scale)))) |
(/.f64 (*.f64 a (*.f64 (*.f64 b (*.f64 b a)) #s(literal 4 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) |
(* 4 (* a (* b (* b a)))) |
(*.f64 a (*.f64 (*.f64 b (*.f64 b a)) #s(literal 4 binary64))) |
4 |
#s(literal 4 binary64) |
Found 4 expressions of interest:
| New | Metric | Score | Program |
|---|---|---|---|
| ✓ | accuracy | 99.6% | (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 b a)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) |
| ✓ | accuracy | 99.6% | (/.f64 (*.f64 a (*.f64 b (*.f64 b a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) |
| ✓ | accuracy | 99.6% | (cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64))) |
| ✓ | accuracy | 3.5% | (PI.f64) |
| 2.3s | 255× | 5 | exit |
| 1.0ms | 1× | 1 | valid |
Compiled 1204 to 55 computations (95.4% saved)
ival-sin: 606.0ms (37.3% of total)ival-cos: 254.0ms (15.6% of total)ival-mult: 252.0ms (15.5% of total)backward-pass: 187.0ms (11.5% of total)ival-div: 97.0ms (6% of total)ival-pow: 84.0ms (5.2% of total)ival-add: 57.0ms (3.5% of total)compiled-spec: 37.0ms (2.3% of total)ival-sub: 24.0ms (1.5% of total)ival-sqrt: 17.0ms (1% of total)ival-pi: 9.0ms (0.6% of total)const: 3.0ms (0.2% of total)| Inputs |
|---|
#<alt (/ (sqrt (* (* (* b a) (* (* (* b a) 8) (/ (* a (* b (* b a))) (* x-scale (* x-scale (* 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))) (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)))) (* (* (* (sin (/ (* angle (PI)) 180)) (cos (/ (* angle (PI)) 180))) (/ (* (+ b a) (* (- b a) 2)) (* x-scale y-scale))) (* (* (sin (/ (* angle (PI)) 180)) (cos (/ (* angle (PI)) 180))) (/ (* (+ b a) (* (- b a) 2)) (* x-scale y-scale))))))))) (/ (* 4 (* a (* b (* b a)))) (* x-scale (* x-scale (* y-scale y-scale)))))> |
#<alt (sqrt (* (* (* b a) (* (* (* b a) 8) (/ (* a (* b (* b a))) (* x-scale (* x-scale (* 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))) (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)))) (* (* (* (sin (/ (* angle (PI)) 180)) (cos (/ (* angle (PI)) 180))) (/ (* (+ b a) (* (- b a) 2)) (* x-scale y-scale))) (* (* (sin (/ (* angle (PI)) 180)) (cos (/ (* angle (PI)) 180))) (/ (* (+ b a) (* (- b a) 2)) (* x-scale y-scale)))))))))> |
#<alt (* (* (* b a) (* (* (* b a) 8) (/ (* a (* b (* b a))) (* x-scale (* x-scale (* 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))) (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)))) (* (* (* (sin (/ (* angle (PI)) 180)) (cos (/ (* angle (PI)) 180))) (/ (* (+ b a) (* (- b a) 2)) (* x-scale y-scale))) (* (* (sin (/ (* angle (PI)) 180)) (cos (/ (* angle (PI)) 180))) (/ (* (+ b a) (* (- b a) 2)) (* x-scale y-scale))))))))> |
#<alt (* (* b a) (* (* (* b a) 8) (/ (* a (* b (* b a))) (* x-scale (* x-scale (* y-scale y-scale))))))> |
#<alt (PI)> |
#<alt (cos (/ (* angle (PI)) 180))> |
#<alt (/ (* a (* b (* b a))) (* x-scale (* x-scale (* y-scale y-scale))))> |
#<alt (/ (* 4 (* a (* b (* b a)))) (* x-scale (* x-scale (* y-scale y-scale))))> |
| 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/4 (* (/ (* b (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (- (+ (/ (* (pow a 2) (pow (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))))))) (* b (+ (* -1/4 (* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (- (+ (/ (* (pow a 2) (pow (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 (* (* b (* 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 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2))) (* (pow x-scale 4) (* (pow y-scale 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)) (- (+ (/ (* (pow a 2) (pow (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)))))))))))))) (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))))))) (* b (+ (* -1/4 (* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (- (+ (/ (* (pow a 2) (pow (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))))))))) (* b (+ (* -1/8 (* (* b (* x-scale (* y-scale (* (sqrt 8) (+ (* -1 (* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -2 (pow a 3)) (* 2 (pow a 3))) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 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)))) (- (+ (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2))) (* (pow x-scale 4) (* (pow y-scale 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)) (- (+ (/ (* (pow a 2) (pow (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 a 2) (pow (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))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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) (+ (* -2 a) (* 2 a)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -2 (pow a 3)) (* 2 (pow a 3))) (- (+ (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2))) (* (pow x-scale 4) (* (pow y-scale 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)))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2))) (* (pow x-scale 4) (* (pow y-scale 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)) (- (+ (/ (* (pow a 2) (pow (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))))))))))))) (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/4 (* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a))))) (* b (* x-scale y-scale))) (sqrt (/ 1 (* (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 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 (* (* 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/4 (* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a))))) (* b (* x-scale y-scale))) (sqrt (/ 1 (* (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 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/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 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (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 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 4) (* (pow y-scale 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)) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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/4 (* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a))))) (* b (* x-scale y-scale))) (sqrt (/ 1 (* (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 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/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* -1 (* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -2 a) (* 2 a)) (- (+ (/ (* (pow a 2) (pow (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 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (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 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 4) (* (pow y-scale 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)) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -2 a) (* 2 a)) (- (+ (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 4) (* (pow y-scale 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)))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (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)) (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 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (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 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 4) (* (pow y-scale 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)) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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/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 (* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a))))) (* b (* x-scale y-scale))) (sqrt (/ 1 (* (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 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))))))))))))> |
#<alt (* -1 (* b (+ (* -1 (/ (+ (* -1/4 (* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a))))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 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/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 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (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 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 4) (* (pow y-scale 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)) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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) (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))))))))) b)) (* 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 (/ (+ (* -1 (/ (+ (* 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 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (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 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 4) (* (pow y-scale 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)) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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 (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -2 a) (* 2 a)) (- (+ (/ (* (pow a 2) (pow (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 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (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 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 4) (* (pow y-scale 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)) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -2 a) (* 2 a)) (- (+ (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 4) (* (pow y-scale 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)))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))))))) b) (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))))))))) b)) (* -1/4 (* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a))))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 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)))))))))) b)) (* 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/4 (* (/ (* a (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (- (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* 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))))))) (* a (+ (* -1/4 (* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (- (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* 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 (* (* a (* 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 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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))) (- (/ (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) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2))) (* (pow x-scale 4) (* (pow y-scale 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)) (- (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* 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)))))))))))))) (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))))))) (* a (+ (* -1/4 (* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (- (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* 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))))))))) (* a (+ (* -1/8 (* (* a (* x-scale (* y-scale (* (sqrt 8) (+ (* -1 (* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -2 (pow b 3)) (* 2 (pow b 3))) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 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)))) (- (+ (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2))) (* (pow x-scale 4) (* (pow y-scale 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)) (- (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* 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 b 2) (pow (cos (* 1/180 (* 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))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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) (+ (* -2 b) (* 2 b)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -2 (pow b 3)) (* 2 (pow b 3))) (- (+ (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2))) (* (pow x-scale 4) (* (pow y-scale 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)))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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))) (- (/ (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) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2))) (* (pow x-scale 4) (* (pow y-scale 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)) (- (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* 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))))))))))))) (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/4 (* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b))))) (* a (* x-scale y-scale))) (sqrt (/ 1 (* (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 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 (* (* 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/4 (* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b))))) (* a (* x-scale y-scale))) (sqrt (/ 1 (* (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 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/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 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (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 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 4) (* (pow y-scale 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)) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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/4 (* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b))))) (* a (* x-scale y-scale))) (sqrt (/ 1 (* (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 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/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* -1 (* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -2 b) (* 2 b)) (- (+ (/ (* (pow b 2) (pow (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 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (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 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 4) (* (pow y-scale 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)) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -2 b) (* 2 b)) (- (+ (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 4) (* (pow y-scale 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)))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (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)) (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 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (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 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 4) (* (pow y-scale 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)) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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/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 (* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b))))) (* a (* x-scale y-scale))) (sqrt (/ 1 (* (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 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))))))))))))> |
#<alt (* -1 (* a (+ (* -1 (/ (+ (* -1/4 (* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b))))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 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/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 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (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 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 4) (* (pow y-scale 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)) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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) (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))))))))) a)) (* 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 (/ (+ (* -1 (/ (+ (* 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 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (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 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 4) (* (pow y-scale 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)) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -2 b) (* 2 b)) (- (+ (/ (* (pow b 2) (pow (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 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (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 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 4) (* (pow y-scale 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)) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -2 b) (* 2 b)) (- (+ (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 4) (* (pow y-scale 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)))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))))))) a) (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))))))))) a)) (* -1/4 (* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b))))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 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)))))))))) a)) (* 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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 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 (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 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 (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (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 (+ a b) 2) (pow (- b a) 2)))) (pow x-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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (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 (+ a b) 2) (pow (- b a) 2)))) (pow x-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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (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 (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow 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 (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow 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 (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow 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 (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow 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 (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow 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 (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow 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 (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow 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 (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- b a) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow (+ a b) 2) (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow 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 (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 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 (+ a b) 2) (pow (- b a) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 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 (* (/ (* (pow a 2) (* b (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))))))) (* (pow x-scale 3) (pow y-scale 3))) (sqrt (/ 1 (* (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (- (+ (/ (* (pow a 2) (pow (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) (+ (* b (+ (* -1 (* (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))))) (* (pow x-scale 3) (pow y-scale 3))) (sqrt (/ 1 (* (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (- (+ (/ (* (pow a 2) (pow (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) (* b (* (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 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2))) (* (pow x-scale 4) (* (pow y-scale 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)) (- (+ (/ (* (pow a 2) (pow (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))))))))))))) (* 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) (+ (* b (+ (* -1 (* (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))))) (* (pow x-scale 3) (pow y-scale 3))) (sqrt (/ 1 (* (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (- (+ (/ (* (pow a 2) (pow (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))))))))) (* b (+ (* -1/2 (* (/ (* (pow a 2) (* b (* (sqrt 8) (+ (* -1 (* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -2 (pow a 3)) (* 2 (pow a 3))) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 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)))) (- (+ (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2))) (* (pow x-scale 4) (* (pow y-scale 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)) (- (+ (/ (* (pow a 2) (pow (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 a 2) (pow (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))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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) (+ (* -2 a) (* 2 a)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -2 (pow a 3)) (* 2 (pow a 3))) (- (+ (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2))) (* (pow x-scale 4) (* (pow y-scale 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)))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2))) (* (pow x-scale 4) (* (pow y-scale 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)) (- (+ (/ (* (pow a 2) (pow (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)))))))))))) (* 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 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 (* (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))))) (* b (* (pow x-scale 3) (pow y-scale 3)))) (sqrt (/ 1 (* (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 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))))))))) (* (/ (* (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 (* (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))))) (* b (* (pow x-scale 3) (pow y-scale 3)))) (sqrt (/ 1 (* (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 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 (* (/ (* (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 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (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 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 4) (* (pow y-scale 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)) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (* (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))))) (* b (* (pow x-scale 3) (pow y-scale 3)))) (sqrt (/ 1 (* (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 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 (* (/ (* (pow a 2) (* (sqrt 8) (+ (* -1 (* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -2 a) (* 2 a)) (- (+ (/ (* (pow a 2) (pow (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 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (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 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 4) (* (pow y-scale 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)) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -2 a) (* 2 a)) (- (+ (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 4) (* (pow y-scale 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)))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (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) (* 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 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (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 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 4) (* (pow y-scale 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)) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (+ (* (/ (* (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 (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))))) (* b (* (pow x-scale 3) (pow y-scale 3)))) (sqrt (/ 1 (* (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 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)))))))))))> |
#<alt (* -1 (* (pow b 3) (+ (* -1 (/ (+ (* -1 (* (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))))) (* (pow x-scale 3) (pow y-scale 3))) (sqrt (/ 1 (* (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 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 (* (/ (* (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 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (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 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 4) (* (pow y-scale 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)) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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 (* 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))))))))) b)) (* (/ (* (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 (/ (+ (* -1 (* (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))))) (* (pow x-scale 3) (pow y-scale 3))) (sqrt (/ 1 (* (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 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 (/ (+ (* 1/2 (* (/ (* (pow a 2) (* (sqrt 8) (+ (* -1 (* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -2 a) (* 2 a)) (- (+ (/ (* (pow a 2) (pow (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 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (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 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 4) (* (pow y-scale 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)) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -2 a) (* 2 a)) (- (+ (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 4) (* (pow y-scale 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)))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))))) (* b (* 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 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (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 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 4) (* (pow y-scale 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)) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 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))))))))) b))) b)) (* (/ (* (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 (* (/ (* a (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))))))) (* (pow x-scale 3) (pow y-scale 3))) (sqrt (/ 1 (* (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (- (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* 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) (+ (* a (+ (* -1 (* (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))))) (* (pow x-scale 3) (pow y-scale 3))) (sqrt (/ 1 (* (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (- (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* 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 (* (/ (* a (* (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 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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))) (- (/ (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) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2))) (* (pow x-scale 4) (* (pow y-scale 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)) (- (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* 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))))))))))))) (* 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) (+ (* a (+ (* -1 (* (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))))) (* (pow x-scale 3) (pow y-scale 3))) (sqrt (/ 1 (* (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (- (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* 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))))))))) (* a (+ (* -1/2 (* (/ (* a (* (pow b 2) (* (sqrt 8) (+ (* -1 (* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -2 (pow b 3)) (* 2 (pow b 3))) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 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)))) (- (+ (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2))) (* (pow x-scale 4) (* (pow y-scale 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)) (- (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* 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 b 2) (pow (cos (* 1/180 (* 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))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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) (+ (* -2 b) (* 2 b)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -2 (pow b 3)) (* 2 (pow b 3))) (- (+ (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2))) (* (pow x-scale 4) (* (pow y-scale 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)))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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))) (- (/ (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) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2))) (* (pow x-scale 4) (* (pow y-scale 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)) (- (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* 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)))))))))))) (* 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 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 (* (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))))) (* a (* (pow x-scale 3) (pow y-scale 3)))) (sqrt (/ 1 (* (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 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))))))))) (* (/ (* (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 (* (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))))) (* a (* (pow x-scale 3) (pow y-scale 3)))) (sqrt (/ 1 (* (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 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 (* (/ (* (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 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (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 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 4) (* (pow y-scale 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)) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (* (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))))) (* a (* (pow x-scale 3) (pow y-scale 3)))) (sqrt (/ 1 (* (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 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 (* (/ (* (pow b 2) (* (sqrt 8) (+ (* -1 (* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -2 b) (* 2 b)) (- (+ (/ (* (pow b 2) (pow (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 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (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 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 4) (* (pow y-scale 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)) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -2 b) (* 2 b)) (- (+ (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 4) (* (pow y-scale 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)))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (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) (* 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 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (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 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 4) (* (pow y-scale 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)) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (+ (* (/ (* (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 b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))))) (* a (* (pow x-scale 3) (pow y-scale 3)))) (sqrt (/ 1 (* (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 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)))))))))))> |
#<alt (* -1 (* (pow a 3) (+ (* -1 (/ (+ (* -1 (* (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))))) (* (pow x-scale 3) (pow y-scale 3))) (sqrt (/ 1 (* (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 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 (* (/ (* (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 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (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 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 4) (* (pow y-scale 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)) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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 (* 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))))))))) a)) (* (/ (* (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 (/ (+ (* -1 (* (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))))) (* (pow x-scale 3) (pow y-scale 3))) (sqrt (/ 1 (* (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 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 (/ (+ (* 1/2 (* (/ (* (pow b 2) (* (sqrt 8) (+ (* -1 (* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -2 b) (* 2 b)) (- (+ (/ (* (pow b 2) (pow (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 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (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 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 4) (* (pow y-scale 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)) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -2 b) (* 2 b)) (- (+ (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 4) (* (pow y-scale 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)))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))))) (* a (* 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 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (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 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 4) (* (pow y-scale 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)) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 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))))))))) a))) a)) (* (/ (* (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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 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 (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 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 (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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 (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow 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 (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow 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 (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow 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 (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow 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 (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow 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 (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow 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 (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- b a) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow (+ a b) 2) (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow 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 (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow 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 (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 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 (+ a b) 2) (pow (- b a) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 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) (+ (* -16 (* (/ (* (pow a 4) (* b (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))))) (* (pow x-scale 4) (pow y-scale 4))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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 a 2) (pow (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)))) (* b (+ (* -16 (* (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))))) (* (pow x-scale 4) (pow y-scale 4))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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) (* b (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 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)))) (- (+ (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2))) (* (pow x-scale 4) (* (pow y-scale 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)))))))))))) (* (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)))) (* b (+ (* -16 (* (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))))) (* (pow x-scale 4) (pow y-scale 4))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* b (+ (* -4 (* (/ (* (pow a 4) (* b (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -2 (pow a 3)) (* 2 (pow a 3))) (- (+ (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2))) (* (pow x-scale 4) (* (pow y-scale 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)))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))))) (* (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) (+ (* -16 (* (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))))) (* b (* (pow x-scale 4) (pow y-scale 4)))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 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) (+ (* -16 (* (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))))) (* b (* (pow x-scale 4) (pow y-scale 4)))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (* 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 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (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 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))))) (* (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) (+ (* -16 (* (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))))) (* b (* (pow x-scale 4) (pow y-scale 4)))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (* -4 (* (/ (* (pow a 4) (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -2 a) (* 2 a)) (- (+ (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 4) (* (pow y-scale 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)))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (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) (* (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 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (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 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))))) (* (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 (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)))) (* 16 (* (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))))) (* b (* (pow x-scale 4) (pow y-scale 4)))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))> |
#<alt (* (pow b 6) (+ (* -1 (/ (+ (* -16 (* (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))))) (* (pow x-scale 4) (pow y-scale 4))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -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 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (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 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))))) (* b (* (pow x-scale 2) (pow y-scale 2)))))) b)) (* 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) (+ (* -1 (/ (+ (* -16 (* (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))))) (* (pow x-scale 4) (pow y-scale 4))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (/ (+ (* 4 (* (/ (* (pow a 4) (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -2 a) (* 2 a)) (- (+ (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 4) (* (pow y-scale 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)))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* b (* (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 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (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 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))))) (* (pow x-scale 2) (pow y-scale 2))))) b))) b)) (* 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) (+ (* -16 (* (/ (* a (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))))) (* (pow x-scale 4) (pow y-scale 4))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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 b 2) (pow (cos (* 1/180 (* 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)))) (* a (+ (* -16 (* (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))))) (* (pow x-scale 4) (pow y-scale 4))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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 (/ (* a (* (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 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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))) (- (/ (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) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2))) (* (pow x-scale 4) (* (pow y-scale 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)))))))))))) (* (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)))) (* a (+ (* -16 (* (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))))) (* (pow x-scale 4) (pow y-scale 4))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* a (+ (* -4 (* (/ (* a (* (pow b 4) (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -2 (pow b 3)) (* 2 (pow b 3))) (- (+ (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2))) (* (pow x-scale 4) (* (pow y-scale 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)))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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))) (- (/ (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) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))))) (* (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) (+ (* -16 (* (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))))) (* a (* (pow x-scale 4) (pow y-scale 4)))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 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) (+ (* -16 (* (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))))) (* a (* (pow x-scale 4) (pow y-scale 4)))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (* 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 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (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 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))))) (* (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) (+ (* -16 (* (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))))) (* a (* (pow x-scale 4) (pow y-scale 4)))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (* -4 (* (/ (* (pow b 4) (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -2 b) (* 2 b)) (- (+ (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 4) (* (pow y-scale 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)))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (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) (* (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 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (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 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))))) (* (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)))) (* 16 (* (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))))) (* a (* (pow x-scale 4) (pow y-scale 4)))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))> |
#<alt (* (pow a 6) (+ (* -1 (/ (+ (* -16 (* (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))))) (* (pow x-scale 4) (pow y-scale 4))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -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 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (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 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))))) (* a (* (pow x-scale 2) (pow y-scale 2)))))) a)) (* 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) (+ (* -1 (/ (+ (* -16 (* (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))))) (* (pow x-scale 4) (pow y-scale 4))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (/ (+ (* 4 (* (/ (* (pow b 4) (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -2 b) (* 2 b)) (- (+ (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 4) (* (pow y-scale 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)))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* a (* (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 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (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 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))))) (* (pow x-scale 2) (pow y-scale 2))))) a))) a)) (* 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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 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 (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 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 (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 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 (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 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 (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow x-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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow x-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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow x-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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow x-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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (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 (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow 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 (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow 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 (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow 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 (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- b a) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow (+ a b) 2) (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow 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 (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 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 (+ a b) 2) (pow (- b a) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (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 (+ a b) 2) (pow (- b a) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (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 (+ a b) 2) (pow (- b a) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (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 (+ a b) 2) (pow (- b a) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (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 (+ a b) 2) (pow (- b a) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (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 (+ a b) 2) (pow (- b a) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (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 (+ a b) 2) (pow (- b a) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (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 (+ a b) 2) (pow (- b a) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (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 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))> |
#<alt (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))> |
#<alt (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))> |
#<alt (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))> |
#<alt (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))> |
#<alt (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))> |
#<alt (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))> |
#<alt (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))> |
#<alt (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))> |
#<alt (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))> |
#<alt (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))> |
#<alt (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))> |
#<alt (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))> |
#<alt (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))> |
#<alt (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))> |
#<alt (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))> |
#<alt (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))> |
#<alt (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))> |
#<alt (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))> |
#<alt (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))> |
#<alt (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))> |
#<alt (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))> |
#<alt (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))> |
#<alt (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))> |
#<alt (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))> |
#<alt (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))> |
#<alt (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))> |
#<alt (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))> |
#<alt (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))> |
#<alt (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))> |
#<alt (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))> |
#<alt (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))> |
#<alt (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))> |
#<alt (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))> |
#<alt (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))> |
#<alt (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))> |
#<alt (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))> |
#<alt (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))> |
#<alt (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))> |
#<alt (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))> |
#<alt (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))> |
#<alt (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))> |
#<alt (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))> |
#<alt (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))> |
#<alt (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))> |
#<alt (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))> |
#<alt (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))> |
#<alt (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))> |
#<alt (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))> |
84 calls:
| Time | Variable | Point | Expression | |
|---|---|---|---|---|
| 53.0ms | b | @ | -inf | (/ (sqrt (* (* (* b a) (* (* (* b a) 8) (/ (* a (* b (* b a))) (* x-scale (* x-scale (* 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))) (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)))) (* (* (* (sin (/ (* angle (PI)) 180)) (cos (/ (* angle (PI)) 180))) (/ (* (+ b a) (* (- b a) 2)) (* x-scale y-scale))) (* (* (sin (/ (* angle (PI)) 180)) (cos (/ (* angle (PI)) 180))) (/ (* (+ b a) (* (- b a) 2)) (* x-scale y-scale))))))))) (/ (* 4 (* a (* b (* b a)))) (* x-scale (* x-scale (* y-scale y-scale))))) |
| 28.0ms | y-scale | @ | 0 | (/ (sqrt (* (* (* b a) (* (* (* b a) 8) (/ (* a (* b (* b a))) (* x-scale (* x-scale (* 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))) (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)))) (* (* (* (sin (/ (* angle (PI)) 180)) (cos (/ (* angle (PI)) 180))) (/ (* (+ b a) (* (- b a) 2)) (* x-scale y-scale))) (* (* (sin (/ (* angle (PI)) 180)) (cos (/ (* angle (PI)) 180))) (/ (* (+ b a) (* (- b a) 2)) (* x-scale y-scale))))))))) (/ (* 4 (* a (* b (* b a)))) (* x-scale (* x-scale (* y-scale y-scale))))) |
| 26.0ms | y-scale | @ | 0 | (/ (* a (* b (* b a))) (* x-scale (* x-scale (* y-scale y-scale)))) |
| 22.0ms | a | @ | 0 | (* (* b a) (* (* (* b a) 8) (/ (* a (* b (* b a))) (* x-scale (* x-scale (* y-scale y-scale)))))) |
| 20.0ms | angle | @ | inf | (/ (sqrt (* (* (* b a) (* (* (* b a) 8) (/ (* a (* b (* b a))) (* x-scale (* x-scale (* 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))) (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)))) (* (* (* (sin (/ (* angle (PI)) 180)) (cos (/ (* angle (PI)) 180))) (/ (* (+ b a) (* (- b a) 2)) (* x-scale y-scale))) (* (* (sin (/ (* angle (PI)) 180)) (cos (/ (* angle (PI)) 180))) (/ (* (+ b a) (* (- b a) 2)) (* x-scale y-scale))))))))) (/ (* 4 (* a (* b (* b a)))) (* x-scale (* x-scale (* y-scale y-scale))))) |
| 1× | batch-egg-rewrite |
| 5220× | *-lowering-*.f32 |
| 5220× | *-lowering-*.f64 |
| 2394× | pow-lowering-pow.f64 |
| 2394× | pow-lowering-pow.f32 |
| 2066× | fma-lowering-fma.f32 |
Useful iterations: 2 (0.0ms)
| Iter | Nodes | Cost |
|---|---|---|
| 0 | 57 | 436 |
| 1 | 362 | 373 |
| 2 | 4026 | 366 |
| 0 | 9165 | 366 |
| 1× | iter limit |
| 1× | node limit |
| Inputs |
|---|
(/ (sqrt (* (* (* b a) (* (* (* b a) 8) (/ (* a (* b (* b a))) (* x-scale (* x-scale (* 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))) (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)))) (* (* (* (sin (/ (* angle (PI)) 180)) (cos (/ (* angle (PI)) 180))) (/ (* (+ b a) (* (- b a) 2)) (* x-scale y-scale))) (* (* (sin (/ (* angle (PI)) 180)) (cos (/ (* angle (PI)) 180))) (/ (* (+ b a) (* (- b a) 2)) (* x-scale y-scale))))))))) (/ (* 4 (* a (* b (* b a)))) (* x-scale (* x-scale (* y-scale y-scale))))) |
(sqrt (* (* (* b a) (* (* (* b a) 8) (/ (* a (* b (* b a))) (* x-scale (* x-scale (* 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))) (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)))) (* (* (* (sin (/ (* angle (PI)) 180)) (cos (/ (* angle (PI)) 180))) (/ (* (+ b a) (* (- b a) 2)) (* x-scale y-scale))) (* (* (sin (/ (* angle (PI)) 180)) (cos (/ (* angle (PI)) 180))) (/ (* (+ b a) (* (- b a) 2)) (* x-scale y-scale))))))))) |
(* (* (* b a) (* (* (* b a) 8) (/ (* a (* b (* b a))) (* x-scale (* x-scale (* 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))) (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)))) (* (* (* (sin (/ (* angle (PI)) 180)) (cos (/ (* angle (PI)) 180))) (/ (* (+ b a) (* (- b a) 2)) (* x-scale y-scale))) (* (* (sin (/ (* angle (PI)) 180)) (cos (/ (* angle (PI)) 180))) (/ (* (+ b a) (* (- b a) 2)) (* x-scale y-scale)))))))) |
(* (* b a) (* (* (* b a) 8) (/ (* a (* b (* b a))) (* x-scale (* x-scale (* y-scale y-scale)))))) |
(PI) |
(cos (/ (* angle (PI)) 180)) |
(/ (* a (* b (* b a))) (* x-scale (* x-scale (* y-scale y-scale)))) |
(/ (* 4 (* a (* b (* b a)))) (* x-scale (* x-scale (* y-scale y-scale)))) |
| Outputs |
|---|
(exp.f64 (*.f64 (log.f64 (/.f64 (/.f64 (*.f64 (*.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 a (*.f64 b b)) x-scale)) (*.f64 x-scale (*.f64 y-scale y-scale))) (sqrt.f64 (*.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 (*.f64 b 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 a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 0 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 x-scale y-scale) (*.f64 (+.f64 b a) (*.f64 #s(literal 2 binary64) (-.f64 b a))))))))))) #s(literal -1 binary64))) |
(neg.f64 (/.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 (*.f64 b 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 a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 0 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 x-scale y-scale) (*.f64 (+.f64 b a) (*.f64 #s(literal 2 binary64) (-.f64 b a))))))))) (/.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 b (*.f64 a (*.f64 (*.f64 b 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 a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 0 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 x-scale y-scale) (*.f64 (+.f64 b a) (*.f64 #s(literal 2 binary64) (-.f64 b a)))))))))) (/.f64 (*.f64 (*.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 a (*.f64 b b)) x-scale)) (*.f64 x-scale (*.f64 y-scale y-scale))))) |
(/.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 (*.f64 b 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 a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 0 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 x-scale y-scale) (*.f64 (+.f64 b a) (*.f64 #s(literal 2 binary64) (-.f64 b a))))))))) (/.f64 (*.f64 (*.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 a (*.f64 b b)) x-scale)) (*.f64 x-scale (*.f64 y-scale y-scale)))) |
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 (*.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 a (*.f64 b b)) x-scale)) (*.f64 x-scale (*.f64 y-scale y-scale))) (sqrt.f64 (*.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 (*.f64 b 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 a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 0 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 x-scale y-scale) (*.f64 (+.f64 b a) (*.f64 #s(literal 2 binary64) (-.f64 b a))))))))))) |
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (/.f64 (*.f64 (*.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 a (*.f64 b b)) x-scale)) (*.f64 x-scale (*.f64 y-scale y-scale))) (sqrt.f64 (*.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 (*.f64 b 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 a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 0 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 x-scale y-scale) (*.f64 (+.f64 b a) (*.f64 #s(literal 2 binary64) (-.f64 b a)))))))))) #s(literal 1 binary64))) |
(/.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 (*.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 (*.f64 b 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 a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 0 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 x-scale y-scale) (*.f64 (+.f64 b a) (*.f64 #s(literal 2 binary64) (-.f64 b a)))))))))) (/.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 b (*.f64 a (*.f64 (*.f64 b 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 a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 0 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 x-scale y-scale) (*.f64 (+.f64 b a) (*.f64 #s(literal 2 binary64) (-.f64 b a))))))))) (*.f64 a (*.f64 (*.f64 a (*.f64 b b)) #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (*.f64 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)) (/.f64 (*.f64 a (*.f64 b b)) x-scale)) (*.f64 x-scale (*.f64 y-scale y-scale))) (sqrt.f64 (*.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 (*.f64 b 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 a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 0 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 x-scale y-scale) (*.f64 (+.f64 b a) (*.f64 #s(literal 2 binary64) (-.f64 b a)))))))))))) |
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 (*.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 (*.f64 b 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 a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 0 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 x-scale y-scale) (*.f64 (+.f64 b a) (*.f64 #s(literal 2 binary64) (-.f64 b a))))))))))) (/.f64 (*.f64 (*.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 a (*.f64 b b)) x-scale)) (*.f64 x-scale (*.f64 y-scale y-scale)))) |
(/.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 (*.f64 b 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 a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 0 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 x-scale y-scale) (*.f64 (+.f64 b a) (*.f64 #s(literal 2 binary64) (-.f64 b a))))))))) #s(literal 1 binary64)) (/.f64 (*.f64 (*.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 a (*.f64 b b)) x-scale)) (*.f64 x-scale (*.f64 y-scale y-scale)))) |
(/.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 (*.f64 b 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 a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 0 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 x-scale y-scale) (*.f64 (+.f64 b a) (*.f64 #s(literal 2 binary64) (-.f64 b a))))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 a (*.f64 (*.f64 a (*.f64 b b)) #s(literal 4 binary64)))) |
(/.f64 (/.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 (*.f64 b 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 a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 0 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 x-scale y-scale) (*.f64 (+.f64 b a) (*.f64 #s(literal 2 binary64) (-.f64 b a))))))))) #s(literal 4 binary64)) (*.f64 (/.f64 (*.f64 a (*.f64 b b)) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale))))) |
(/.f64 (/.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 (*.f64 b 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 a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 0 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 x-scale y-scale) (*.f64 (+.f64 b a) (*.f64 #s(literal 2 binary64) (-.f64 b a))))))))) (/.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)) (/.f64 (*.f64 a (*.f64 b b)) x-scale)) (*.f64 x-scale (*.f64 y-scale y-scale))) (sqrt.f64 (*.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 (*.f64 b 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 a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 0 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 x-scale y-scale) (*.f64 (+.f64 b a) (*.f64 #s(literal 2 binary64) (-.f64 b a)))))))))) #s(literal -1 binary64)) |
(pow.f64 (/.f64 (/.f64 (/.f64 (*.f64 (*.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 a (*.f64 b b)) x-scale)) (*.f64 x-scale (*.f64 y-scale y-scale))) (sqrt.f64 (*.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 (*.f64 b 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 a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 0 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 x-scale y-scale) (*.f64 (+.f64 b a) (*.f64 #s(literal 2 binary64) (-.f64 b a)))))))))) #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 b (*.f64 a (*.f64 (*.f64 b 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 a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 0 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 x-scale y-scale) (*.f64 (+.f64 b a) (*.f64 #s(literal 2 binary64) (-.f64 b a))))))))) (*.f64 a (*.f64 (*.f64 a (*.f64 b b)) #s(literal 4 binary64))))) |
(*.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 (*.f64 b 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 a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 0 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 x-scale y-scale) (*.f64 (+.f64 b a) (*.f64 #s(literal 2 binary64) (-.f64 b a))))))))) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 a (*.f64 (*.f64 a (*.f64 b b)) #s(literal 4 binary64))))) |
(*.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 (*.f64 b 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 a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 0 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 x-scale y-scale) (*.f64 (+.f64 b a) (*.f64 #s(literal 2 binary64) (-.f64 b a))))))))) (/.f64 (*.f64 (*.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 a (*.f64 b b)) x-scale)) (*.f64 x-scale (*.f64 y-scale y-scale))))) |
(*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 (*.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 (*.f64 b 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 a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 0 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 x-scale y-scale) (*.f64 (+.f64 b a) (*.f64 #s(literal 2 binary64) (-.f64 b a)))))))))) (/.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 a (*.f64 b b)) #s(literal 4 binary64)))) (sqrt.f64 (*.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 (*.f64 b 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 a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 0 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 x-scale y-scale) (*.f64 (+.f64 b a) (*.f64 #s(literal 2 binary64) (-.f64 b a)))))))))) |
(*.f64 (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 a (*.f64 (*.f64 a (*.f64 b b)) #s(literal 4 binary64)))) (pow.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 (*.f64 b 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 a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 0 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 x-scale y-scale) (*.f64 (+.f64 b a) (*.f64 #s(literal 2 binary64) (-.f64 b a)))))))))) #s(literal -1 binary64))) |
(*.f64 (/.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 (*.f64 b 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 a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 0 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 x-scale y-scale) (*.f64 (+.f64 b a) (*.f64 #s(literal 2 binary64) (-.f64 b a))))))))) (*.f64 a (*.f64 (*.f64 a (*.f64 b b)) #s(literal 4 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) |
(*.f64 (sqrt.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 (*.f64 b 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 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 0 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 x-scale y-scale) (*.f64 (+.f64 b a) (*.f64 #s(literal 2 binary64) (-.f64 b a)))))))) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 a (*.f64 (*.f64 a (*.f64 b b)) #s(literal 4 binary64)))))) |
(*.f64 (sqrt.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 (*.f64 b 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 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 0 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 x-scale y-scale) (*.f64 (+.f64 b a) (*.f64 #s(literal 2 binary64) (-.f64 b a)))))))) (/.f64 (*.f64 (*.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 a (*.f64 b b)) x-scale)) (*.f64 x-scale (*.f64 y-scale y-scale))))) |
(*.f64 (/.f64 (sqrt.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 (*.f64 b a) #s(literal 8 binary64)))) (/.f64 (*.f64 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 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 0 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 x-scale y-scale) (*.f64 (+.f64 b a) (*.f64 #s(literal 2 binary64) (-.f64 b a)))))))) (*.f64 (/.f64 (*.f64 a (*.f64 b b)) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale)))))) |
(*.f64 (/.f64 (sqrt.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 (*.f64 b a) #s(literal 8 binary64)))) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 b (*.f64 a (*.f64 b a)))))) (*.f64 a (*.f64 (*.f64 a (*.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 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 0 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 x-scale y-scale) (*.f64 (+.f64 b a) (*.f64 #s(literal 2 binary64) (-.f64 b a)))))))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) |
(*.f64 (/.f64 (sqrt.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 (*.f64 b a) #s(literal 8 binary64)))) (/.f64 (*.f64 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 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 0 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 x-scale y-scale) (*.f64 (+.f64 b a) (*.f64 #s(literal 2 binary64) (-.f64 b a)))))))) (/.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 a (*.f64 b b)) #s(literal 4 binary64)))) (pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (sqrt.f64 (*.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 (*.f64 b 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 a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 0 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 x-scale y-scale) (*.f64 (+.f64 b a) (*.f64 #s(literal 2 binary64) (-.f64 b a)))))))))) #s(literal -1 binary64))) |
(*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (*.f64 (/.f64 (*.f64 a (*.f64 b b)) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale)))) (sqrt.f64 (*.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 (*.f64 b 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 a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 0 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 x-scale y-scale) (*.f64 (+.f64 b a) (*.f64 #s(literal 2 binary64) (-.f64 b a)))))))))) #s(literal -1 binary64))) |
(*.f64 (*.f64 (/.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 (*.f64 b 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 a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 0 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 x-scale y-scale) (*.f64 (+.f64 b a) (*.f64 #s(literal 2 binary64) (-.f64 b a))))))))) (*.f64 a (*.f64 (*.f64 a (*.f64 b b)) #s(literal 4 binary64)))) x-scale) (*.f64 x-scale (*.f64 y-scale y-scale))) |
(*.f64 (*.f64 (/.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 (*.f64 b 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 a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 0 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 x-scale y-scale) (*.f64 (+.f64 b a) (*.f64 #s(literal 2 binary64) (-.f64 b a))))))))) (*.f64 a (*.f64 (*.f64 a (*.f64 b b)) #s(literal 4 binary64)))) (*.f64 x-scale (*.f64 y-scale y-scale))) x-scale) |
(*.f64 (*.f64 (/.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 (*.f64 b 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 a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 0 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 x-scale y-scale) (*.f64 (+.f64 b a) (*.f64 #s(literal 2 binary64) (-.f64 b a))))))))) (*.f64 a (*.f64 (*.f64 a (*.f64 b b)) #s(literal 4 binary64)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-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 b (*.f64 a (*.f64 (*.f64 b 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 a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 0 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 x-scale y-scale) (*.f64 (+.f64 b a) (*.f64 #s(literal 2 binary64) (-.f64 b a)))))))))) #s(literal -1 binary64))) |
(*.f64 (/.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 (*.f64 b 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 a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 0 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 x-scale y-scale) (*.f64 (+.f64 b a) (*.f64 #s(literal 2 binary64) (-.f64 b a))))))))) #s(literal 1 binary64)) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 a (*.f64 (*.f64 a (*.f64 b b)) #s(literal 4 binary64))))) |
(*.f64 (/.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 (*.f64 b 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 a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 0 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 x-scale y-scale) (*.f64 (+.f64 b a) (*.f64 #s(literal 2 binary64) (-.f64 b a))))))))) (*.f64 (*.f64 b (*.f64 a (*.f64 b a))) #s(literal -4 binary64))) (-.f64 #s(literal 0 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) |
(*.f64 (/.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 (*.f64 b 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 a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 0 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 x-scale y-scale) (*.f64 (+.f64 b a) (*.f64 #s(literal 2 binary64) (-.f64 b a))))))))) (*.f64 (*.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 a (*.f64 b b)) x-scale))) (*.f64 x-scale (*.f64 y-scale y-scale))) |
(*.f64 (pow.f64 (/.f64 #s(literal 4 binary64) (sqrt.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 (*.f64 b 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 (*.f64 a (*.f64 b b)) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-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 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 0 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 x-scale y-scale) (*.f64 (+.f64 b a) (*.f64 #s(literal 2 binary64) (-.f64 b a))))))))) #s(literal -1 binary64))) |
(*.f64 (pow.f64 (/.f64 (*.f64 a (*.f64 (*.f64 a (*.f64 b b)) #s(literal 4 binary64))) (sqrt.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 (*.f64 b 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 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-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 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 0 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 x-scale y-scale) (*.f64 (+.f64 b a) (*.f64 #s(literal 2 binary64) (-.f64 b a))))))))) #s(literal -1 binary64))) |
(*.f64 (pow.f64 (/.f64 (/.f64 #s(literal 4 binary64) x-scale) (sqrt.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 (*.f64 b 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 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 0 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 x-scale y-scale) (*.f64 (+.f64 b a) (*.f64 #s(literal 2 binary64) (-.f64 b a))))))))) #s(literal -1 binary64))) |
(exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 (*.f64 b 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 a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 0 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 x-scale y-scale) (*.f64 (+.f64 b a) (*.f64 #s(literal 2 binary64) (-.f64 b a))))))))) #s(literal 1/2 binary64))) |
(sqrt.f64 (*.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 (*.f64 b 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 a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 0 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 x-scale y-scale) (*.f64 (+.f64 b a) (*.f64 #s(literal 2 binary64) (-.f64 b a))))))))) |
(pow.f64 (*.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 (*.f64 b 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 a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 0 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 x-scale y-scale) (*.f64 (+.f64 b a) (*.f64 #s(literal 2 binary64) (-.f64 b a)))))))) #s(literal 1/2 binary64)) |
(*.f64 (pow.f64 (*.f64 b a) #s(literal 1/2 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 (*.f64 b a) #s(literal 8 binary64)) (*.f64 (/.f64 (*.f64 a (*.f64 b b)) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale))))) (-.f64 (+.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 0 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 x-scale y-scale) (*.f64 (+.f64 b a) (*.f64 #s(literal 2 binary64) (-.f64 b a)))))))) #s(literal 1/2 binary64))) |
(*.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (*.f64 b a) #s(literal 8 binary64)) (*.f64 (/.f64 (*.f64 a (*.f64 b b)) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale))))) (-.f64 (+.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 0 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 x-scale y-scale) (*.f64 (+.f64 b a) (*.f64 #s(literal 2 binary64) (-.f64 b a)))))))) #s(literal 1/2 binary64)) (pow.f64 (*.f64 b a) #s(literal 1/2 binary64))) |
(*.f64 (sqrt.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 (*.f64 b a) #s(literal 8 binary64)))) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 b (*.f64 a (*.f64 b a)))))) (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 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 0 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 x-scale y-scale) (*.f64 (+.f64 b a) (*.f64 #s(literal 2 binary64) (-.f64 b a))))))))) |
(*.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 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 0 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 x-scale y-scale) (*.f64 (+.f64 b a) (*.f64 #s(literal 2 binary64) (-.f64 b a)))))))) (sqrt.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 (*.f64 b 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 (*.f64 b a) #s(literal 8 binary64)) (*.f64 (/.f64 (*.f64 a (*.f64 b b)) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale))))) (-.f64 (+.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 0 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 x-scale y-scale) (*.f64 (+.f64 b a) (*.f64 #s(literal 2 binary64) (-.f64 b a)))))))))) |
(*.f64 (pow.f64 (*.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 (*.f64 b 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 a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 0 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 x-scale y-scale) (*.f64 (+.f64 b a) (*.f64 #s(literal 2 binary64) (-.f64 b a)))))))) #s(literal 1/4 binary64)) (pow.f64 (*.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 (*.f64 b 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 a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 0 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 x-scale y-scale) (*.f64 (+.f64 b a) (*.f64 #s(literal 2 binary64) (-.f64 b a)))))))) #s(literal 1/4 binary64))) |
(*.f64 (pow.f64 b #s(literal 1/2 binary64)) (pow.f64 (*.f64 a (*.f64 (*.f64 (*.f64 (*.f64 b a) #s(literal 8 binary64)) (*.f64 (/.f64 (*.f64 a (*.f64 b b)) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale))))) (-.f64 (+.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 0 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 x-scale y-scale) (*.f64 (+.f64 b a) (*.f64 #s(literal 2 binary64) (-.f64 b a))))))))) #s(literal 1/2 binary64))) |
(*.f64 (pow.f64 b #s(literal 1/2 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 a (*.f64 (*.f64 b a) #s(literal 8 binary64))) (*.f64 (/.f64 (*.f64 a (*.f64 b b)) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale))))) (-.f64 (+.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 0 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 x-scale y-scale) (*.f64 (+.f64 b a) (*.f64 #s(literal 2 binary64) (-.f64 b a)))))))) #s(literal 1/2 binary64))) |
(*.f64 (pow.f64 a #s(literal 1/2 binary64)) (pow.f64 (*.f64 b (*.f64 (*.f64 (*.f64 (*.f64 b a) #s(literal 8 binary64)) (*.f64 (/.f64 (*.f64 a (*.f64 b b)) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale))))) (-.f64 (+.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 0 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 x-scale y-scale) (*.f64 (+.f64 b a) (*.f64 #s(literal 2 binary64) (-.f64 b a))))))))) #s(literal 1/2 binary64))) |
(*.f64 (pow.f64 (*.f64 (*.f64 (*.f64 b a) #s(literal 8 binary64)) (*.f64 (/.f64 (*.f64 a (*.f64 b b)) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)) (pow.f64 (*.f64 (*.f64 b a) (-.f64 (+.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 0 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 x-scale y-scale) (*.f64 (+.f64 b a) (*.f64 #s(literal 2 binary64) (-.f64 b a)))))))) #s(literal 1/2 binary64))) |
(*.f64 (pow.f64 (*.f64 b (*.f64 a (*.f64 (*.f64 b a) #s(literal 8 binary64)))) #s(literal 1/2 binary64)) (pow.f64 (*.f64 (*.f64 (/.f64 (*.f64 a (*.f64 b b)) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale)))) (-.f64 (+.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 0 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 x-scale y-scale) (*.f64 (+.f64 b a) (*.f64 #s(literal 2 binary64) (-.f64 b a)))))))) #s(literal 1/2 binary64))) |
(*.f64 (pow.f64 (*.f64 (-.f64 (+.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 0 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 x-scale y-scale) (*.f64 (+.f64 b a) (*.f64 #s(literal 2 binary64) (-.f64 b a))))))) b) #s(literal 1/2 binary64)) (pow.f64 (*.f64 (*.f64 a (*.f64 (*.f64 b a) #s(literal 8 binary64))) (*.f64 (/.f64 (*.f64 a (*.f64 b b)) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64))) |
(*.f64 (pow.f64 (*.f64 (-.f64 (+.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 0 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 x-scale y-scale) (*.f64 (+.f64 b a) (*.f64 #s(literal 2 binary64) (-.f64 b a))))))) (*.f64 b a)) #s(literal 1/2 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 b a) #s(literal 8 binary64)) (*.f64 (/.f64 (*.f64 a (*.f64 b b)) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64))) |
(*.f64 (pow.f64 (*.f64 (-.f64 (+.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 0 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 x-scale y-scale) (*.f64 (+.f64 b a) (*.f64 #s(literal 2 binary64) (-.f64 b a))))))) (*.f64 b (*.f64 a (*.f64 (*.f64 b a) #s(literal 8 binary64))))) #s(literal 1/2 binary64)) (pow.f64 (*.f64 (/.f64 (*.f64 a (*.f64 b b)) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64))) |
(+.f64 (*.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 (*.f64 b 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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 b (*.f64 a (*.f64 (*.f64 b 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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 0 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 x-scale y-scale) (*.f64 (+.f64 b a) (*.f64 #s(literal 2 binary64) (-.f64 b a))))))))) |
(+.f64 (*.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 (*.f64 b 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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 y-scale y-scale)))) (*.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 (*.f64 b 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 0 binary64) (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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 0 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 x-scale y-scale) (*.f64 (+.f64 b a) (*.f64 #s(literal 2 binary64) (-.f64 b a))))))))) |
(+.f64 (*.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b (*.f64 a (*.f64 (*.f64 b 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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 0 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 x-scale y-scale) (*.f64 (+.f64 b a) (*.f64 #s(literal 2 binary64) (-.f64 b a))))))) (/.f64 (*.f64 b (*.f64 a (*.f64 (*.f64 b 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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 b (*.f64 a (*.f64 (*.f64 b 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 #s(literal 0 binary64) (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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 0 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 x-scale y-scale) (*.f64 (+.f64 b a) (*.f64 #s(literal 2 binary64) (-.f64 b a))))))) (/.f64 (*.f64 b (*.f64 a (*.f64 (*.f64 b 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 b (*.f64 a (*.f64 (*.f64 b 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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 b (*.f64 a (*.f64 (*.f64 b 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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 0 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 x-scale y-scale) (*.f64 (+.f64 b a) (*.f64 #s(literal 2 binary64) (-.f64 b a))))))))) |
(fma.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 (*.f64 b 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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 (*.f64 b 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 0 binary64) (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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 0 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 x-scale y-scale) (*.f64 (+.f64 b a) (*.f64 #s(literal 2 binary64) (-.f64 b a))))))))) |
(fma.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b (*.f64 a (*.f64 (*.f64 b 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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 0 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 x-scale y-scale) (*.f64 (+.f64 b a) (*.f64 #s(literal 2 binary64) (-.f64 b a))))))) (/.f64 (*.f64 b (*.f64 a (*.f64 (*.f64 b 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 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 b (*.f64 a (*.f64 (*.f64 b 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 #s(literal 0 binary64) (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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 0 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 x-scale y-scale) (*.f64 (+.f64 b a) (*.f64 #s(literal 2 binary64) (-.f64 b a))))))) (/.f64 (*.f64 b (*.f64 a (*.f64 (*.f64 b 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 (*.f64 a (*.f64 (*.f64 b 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 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 y-scale y-scale))) #s(literal 3 binary64)) (pow.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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 0 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 x-scale y-scale) (*.f64 (+.f64 b a) (*.f64 #s(literal 2 binary64) (-.f64 b a)))))) #s(literal 3 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 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (*.f64 (hypot.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 0 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 x-scale y-scale) (*.f64 (+.f64 b a) (*.f64 #s(literal 2 binary64) (-.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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 0 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 x-scale y-scale) (*.f64 (+.f64 b a) (*.f64 #s(literal 2 binary64) (-.f64 b a))))))))))) |
(/.f64 (*.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 (*.f64 b 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 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 0 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 x-scale y-scale) (*.f64 (+.f64 b a) (*.f64 #s(literal 2 binary64) (-.f64 b a)))))) #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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 0 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 x-scale y-scale) (*.f64 (+.f64 b a) (*.f64 #s(literal 2 binary64) (-.f64 b a))))))))) |
(/.f64 (*.f64 (-.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 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 y-scale y-scale))) #s(literal 3 binary64)) (pow.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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 0 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 x-scale y-scale) (*.f64 (+.f64 b a) (*.f64 #s(literal 2 binary64) (-.f64 b a)))))) #s(literal 3 binary64))) (/.f64 (*.f64 b (*.f64 a (*.f64 (*.f64 b 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 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (*.f64 (hypot.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 0 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 x-scale y-scale) (*.f64 (+.f64 b a) (*.f64 #s(literal 2 binary64) (-.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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 0 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 x-scale y-scale) (*.f64 (+.f64 b a) (*.f64 #s(literal 2 binary64) (-.f64 b a))))))))))) |
(/.f64 (*.f64 (-.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 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 0 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 x-scale y-scale) (*.f64 (+.f64 b a) (*.f64 #s(literal 2 binary64) (-.f64 b a)))))) #s(literal 2 binary64))) (/.f64 (*.f64 b (*.f64 a (*.f64 (*.f64 b 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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 0 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 x-scale y-scale) (*.f64 (+.f64 b a) (*.f64 #s(literal 2 binary64) (-.f64 b a))))))))) |
(*.f64 b (*.f64 a (*.f64 (*.f64 (*.f64 (*.f64 b a) #s(literal 8 binary64)) (*.f64 (/.f64 (*.f64 a (*.f64 b b)) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale))))) (-.f64 (+.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 0 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 x-scale y-scale) (*.f64 (+.f64 b a) (*.f64 #s(literal 2 binary64) (-.f64 b a)))))))))) |
(*.f64 b (*.f64 (*.f64 (*.f64 a (*.f64 (*.f64 b a) #s(literal 8 binary64))) (*.f64 (/.f64 (*.f64 a (*.f64 b b)) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale))))) (-.f64 (+.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 0 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 x-scale y-scale) (*.f64 (+.f64 b a) (*.f64 #s(literal 2 binary64) (-.f64 b a))))))))) |
(*.f64 a (*.f64 b (*.f64 (*.f64 (*.f64 (*.f64 b a) #s(literal 8 binary64)) (*.f64 (/.f64 (*.f64 a (*.f64 b b)) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale))))) (-.f64 (+.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 0 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 x-scale y-scale) (*.f64 (+.f64 b a) (*.f64 #s(literal 2 binary64) (-.f64 b a)))))))))) |
(*.f64 (*.f64 b a) (*.f64 (*.f64 (*.f64 (*.f64 b a) #s(literal 8 binary64)) (*.f64 (/.f64 (*.f64 a (*.f64 b b)) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale))))) (-.f64 (+.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 0 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 x-scale y-scale) (*.f64 (+.f64 b a) (*.f64 #s(literal 2 binary64) (-.f64 b a))))))))) |
(*.f64 (*.f64 (*.f64 (*.f64 b a) #s(literal 8 binary64)) (*.f64 (/.f64 (*.f64 a (*.f64 b b)) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 (*.f64 b a) (-.f64 (+.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 0 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 x-scale y-scale) (*.f64 (+.f64 b a) (*.f64 #s(literal 2 binary64) (-.f64 b a))))))))) |
(*.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 (*.f64 b 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 a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 0 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 x-scale y-scale) (*.f64 (+.f64 b a) (*.f64 #s(literal 2 binary64) (-.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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 0 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 x-scale y-scale) (*.f64 (+.f64 b a) (*.f64 #s(literal 2 binary64) (-.f64 b a))))))) (/.f64 (*.f64 b (*.f64 a (*.f64 (*.f64 b 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 (*.f64 (*.f64 b a) #s(literal 8 binary64)))) (*.f64 (*.f64 (/.f64 (*.f64 a (*.f64 b b)) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale)))) (-.f64 (+.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 0 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 x-scale y-scale) (*.f64 (+.f64 b a) (*.f64 #s(literal 2 binary64) (-.f64 b a))))))))) |
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 b a) #s(literal 8 binary64)) (*.f64 (/.f64 (*.f64 a (*.f64 b b)) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale))))) (-.f64 (+.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 0 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 x-scale y-scale) (*.f64 (+.f64 b a) (*.f64 #s(literal 2 binary64) (-.f64 b a)))))))) (*.f64 b a)) |
(*.f64 (*.f64 (-.f64 (+.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 0 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 x-scale y-scale) (*.f64 (+.f64 b a) (*.f64 #s(literal 2 binary64) (-.f64 b a))))))) b) (*.f64 (*.f64 a (*.f64 (*.f64 b a) #s(literal 8 binary64))) (*.f64 (/.f64 (*.f64 a (*.f64 b b)) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale)))))) |
(*.f64 (*.f64 (-.f64 (+.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 0 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 x-scale y-scale) (*.f64 (+.f64 b a) (*.f64 #s(literal 2 binary64) (-.f64 b a))))))) (*.f64 b a)) (*.f64 (*.f64 (*.f64 b a) #s(literal 8 binary64)) (*.f64 (/.f64 (*.f64 a (*.f64 b b)) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale)))))) |
(*.f64 (*.f64 (-.f64 (+.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 0 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 x-scale y-scale) (*.f64 (+.f64 b a) (*.f64 #s(literal 2 binary64) (-.f64 b a))))))) (*.f64 b (*.f64 a (*.f64 (*.f64 b a) #s(literal 8 binary64))))) (*.f64 (/.f64 (*.f64 a (*.f64 b b)) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale))))) |
(/.f64 (*.f64 b (*.f64 a (*.f64 (*.f64 b 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 (*.f64 a (*.f64 (*.f64 b 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 (*.f64 b 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 (*.f64 a (*.f64 (*.f64 b 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 b (*.f64 a (*.f64 (*.f64 b a) #s(literal 8 binary64)))) (*.f64 (*.f64 a (*.f64 b b)) (-.f64 #s(literal 0 binary64) a))) (-.f64 #s(literal 0 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) |
(/.f64 (*.f64 (*.f64 b (*.f64 a (*.f64 (*.f64 b a) #s(literal 8 binary64)))) (*.f64 a (/.f64 (*.f64 a (*.f64 b b)) x-scale))) (*.f64 x-scale (*.f64 y-scale y-scale))) |
(/.f64 (*.f64 (*.f64 (*.f64 (*.f64 b a) #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 (*.f64 b a) #s(literal 8 binary64))) (*.f64 (/.f64 (*.f64 a (*.f64 b b)) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale)))))) |
(*.f64 a (*.f64 b (*.f64 (*.f64 (*.f64 b a) #s(literal 8 binary64)) (*.f64 (/.f64 (*.f64 a (*.f64 b b)) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale))))))) |
(*.f64 (*.f64 b a) (*.f64 (*.f64 (*.f64 b a) #s(literal 8 binary64)) (*.f64 (/.f64 (*.f64 a (*.f64 b b)) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale)))))) |
(*.f64 (*.f64 (*.f64 b a) #s(literal 8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a (*.f64 b b)) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 b a))) |
(*.f64 (*.f64 b (*.f64 a (*.f64 b a))) (/.f64 #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 b b)) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 b (*.f64 a (*.f64 (*.f64 b a) #s(literal 8 binary64))))) |
(*.f64 (*.f64 (*.f64 (*.f64 b a) #s(literal 8 binary64)) (*.f64 (/.f64 (*.f64 a (*.f64 b b)) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 b a)) |
(*.f64 (*.f64 b (*.f64 a (*.f64 (*.f64 b a) #s(literal 8 binary64)))) (*.f64 (/.f64 (*.f64 a (*.f64 b b)) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale))))) |
(*.f64 (*.f64 (*.f64 a (*.f64 (*.f64 b a) #s(literal 8 binary64))) (*.f64 (/.f64 (*.f64 a (*.f64 b b)) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale))))) b) |
(*.f64 (*.f64 (*.f64 b a) (*.f64 (/.f64 (*.f64 a (*.f64 b b)) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 (*.f64 b a) #s(literal 8 binary64))) |
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 b a) #s(literal 8 binary64)) (*.f64 (/.f64 (*.f64 a (*.f64 b b)) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale))))) b) a) |
(*.f64 (*.f64 (*.f64 b (*.f64 a (*.f64 (*.f64 b a) #s(literal 8 binary64)))) a) (/.f64 (*.f64 a (*.f64 b b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) |
(*.f64 (*.f64 (*.f64 b (*.f64 a (*.f64 (*.f64 b a) #s(literal 8 binary64)))) (*.f64 b (*.f64 a (*.f64 b a)))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) |
(*.f64 (*.f64 (*.f64 b (*.f64 a (*.f64 (*.f64 b a) #s(literal 8 binary64)))) (/.f64 a x-scale)) (/.f64 (*.f64 a (*.f64 b b)) (*.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))) |
(exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 b (*.f64 a (*.f64 b a))))) #s(literal -1 binary64))) |
(neg.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 b a))) (-.f64 #s(literal 0 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) |
(neg.f64 (/.f64 (*.f64 (*.f64 a (*.f64 b b)) (-.f64 #s(literal 0 binary64) a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) |
(/.f64 (*.f64 b (*.f64 a (*.f64 b a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) |
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 b (*.f64 a (*.f64 b a))))) |
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 b (*.f64 a (*.f64 b a)))) #s(literal 1 binary64))) |
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (*.f64 a (/.f64 (*.f64 a (*.f64 b b)) x-scale)))) |
(/.f64 (*.f64 (*.f64 a (*.f64 b b)) (-.f64 #s(literal 0 binary64) a)) (-.f64 #s(literal 0 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) |
(/.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 b a))) (*.f64 x-scale (*.f64 y-scale y-scale))) x-scale) |
(/.f64 (*.f64 a (/.f64 (*.f64 a (*.f64 b b)) x-scale)) (*.f64 x-scale (*.f64 y-scale y-scale))) |
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 b (*.f64 a (*.f64 b a)))))) |
(/.f64 (neg.f64 (*.f64 (*.f64 a (*.f64 b b)) (-.f64 #s(literal 0 binary64) a))) (neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) |
(/.f64 (neg.f64 (*.f64 a (/.f64 (*.f64 a (*.f64 b b)) x-scale))) (neg.f64 (*.f64 x-scale (*.f64 y-scale y-scale)))) |
(/.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 b a))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) |
(/.f64 (*.f64 (*.f64 b (*.f64 a (*.f64 b a))) #s(literal 1 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) |
(/.f64 (*.f64 (/.f64 a x-scale) (*.f64 a (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) |
(/.f64 (/.f64 (*.f64 a (/.f64 (*.f64 a (*.f64 b b)) x-scale)) x-scale) (*.f64 y-scale y-scale)) |
(/.f64 (/.f64 (*.f64 a (/.f64 (*.f64 a (*.f64 b b)) x-scale)) (*.f64 x-scale y-scale)) y-scale) |
(pow.f64 (/.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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 b (*.f64 a (*.f64 b a)))) #s(literal 1 binary64)) #s(literal -1 binary64)) |
(pow.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (*.f64 a (/.f64 (*.f64 a (*.f64 b b)) x-scale))) #s(literal -1 binary64)) |
(*.f64 a (/.f64 (*.f64 a (*.f64 b b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) |
(*.f64 (*.f64 b a) (*.f64 (*.f64 b a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) |
(*.f64 (*.f64 b a) (/.f64 (*.f64 b a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) |
(*.f64 (*.f64 a (*.f64 b b)) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) |
(*.f64 (*.f64 a (*.f64 b b)) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) |
(*.f64 (*.f64 b (*.f64 a (*.f64 b a))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) |
(*.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 a (*.f64 b b)) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale))))) |
(*.f64 (*.f64 (*.f64 a (*.f64 b b)) (-.f64 #s(literal 0 binary64) a)) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) |
(*.f64 (/.f64 a x-scale) (/.f64 (*.f64 a (*.f64 b b)) (*.f64 x-scale (*.f64 y-scale y-scale)))) |
(*.f64 (/.f64 (*.f64 a (*.f64 b b)) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale)) |
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 b (*.f64 a (*.f64 b a)))) |
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 b (*.f64 a (*.f64 b a)))) #s(literal -1 binary64))) |
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (pow.f64 (/.f64 (*.f64 y-scale y-scale) (*.f64 b (*.f64 a (*.f64 b a)))) #s(literal -1 binary64))) |
(*.f64 (*.f64 a (/.f64 (*.f64 a (*.f64 b b)) x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale y-scale)))) |
(*.f64 (/.f64 (*.f64 a (*.f64 b b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) a) |
(*.f64 (/.f64 (*.f64 a (*.f64 b b)) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale)))) |
(*.f64 (/.f64 (*.f64 b a) x-scale) (/.f64 (*.f64 b a) (*.f64 x-scale (*.f64 y-scale y-scale)))) |
(*.f64 (/.f64 (*.f64 b a) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 (*.f64 b a) x-scale)) |
(*.f64 (/.f64 (*.f64 b a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b a) (*.f64 y-scale y-scale))) |
(*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 (*.f64 a (*.f64 b b)) x-scale)) |
(*.f64 (/.f64 a (*.f64 x-scale x-scale)) (/.f64 (*.f64 a (*.f64 b b)) (*.f64 y-scale y-scale))) |
(*.f64 (/.f64 (*.f64 a (*.f64 b b)) (*.f64 x-scale x-scale)) (/.f64 a (*.f64 y-scale y-scale))) |
(*.f64 (/.f64 #s(literal 1 binary64) x-scale) (/.f64 (*.f64 b (*.f64 a (*.f64 b a))) (*.f64 x-scale (*.f64 y-scale y-scale)))) |
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 a (/.f64 (*.f64 a (*.f64 b b)) x-scale))) |
(*.f64 (pow.f64 (/.f64 x-scale (*.f64 a (*.f64 b b))) #s(literal -1 binary64)) (pow.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) a) #s(literal -1 binary64))) |
(*.f64 (pow.f64 (/.f64 x-scale (*.f64 b a)) #s(literal -1 binary64)) (pow.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (*.f64 b a)) #s(literal -1 binary64))) |
(*.f64 (pow.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (*.f64 b a)) #s(literal -1 binary64)) (pow.f64 (/.f64 x-scale (*.f64 b a)) #s(literal -1 binary64))) |
(*.f64 (pow.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) a) #s(literal -1 binary64)) (pow.f64 (/.f64 x-scale (*.f64 a (*.f64 b b))) #s(literal -1 binary64))) |
(*.f64 (pow.f64 (/.f64 (*.f64 x-scale x-scale) a) #s(literal -1 binary64)) (pow.f64 (/.f64 (*.f64 y-scale y-scale) (*.f64 a (*.f64 b b))) #s(literal -1 binary64))) |
(*.f64 (pow.f64 (/.f64 (*.f64 x-scale x-scale) (*.f64 b a)) #s(literal -1 binary64)) (pow.f64 (/.f64 (*.f64 y-scale y-scale) (*.f64 b a)) #s(literal -1 binary64))) |
(*.f64 (pow.f64 (/.f64 (*.f64 x-scale x-scale) (*.f64 a (*.f64 b b))) #s(literal -1 binary64)) (pow.f64 (/.f64 (*.f64 y-scale y-scale) a) #s(literal -1 binary64))) |
(exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 a (*.f64 (*.f64 a (*.f64 b b)) #s(literal 4 binary64))))) #s(literal -1 binary64))) |
(neg.f64 (/.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 #s(literal 4 binary64) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 b (*.f64 a (*.f64 b a))))) |
(/.f64 (*.f64 a (*.f64 (*.f64 a (*.f64 b b)) #s(literal 4 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) |
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 a (*.f64 (*.f64 a (*.f64 b b)) #s(literal 4 binary64))))) |
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 a (*.f64 (*.f64 a (*.f64 b b)) #s(literal 4 binary64)))) #s(literal 1 binary64))) |
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (*.f64 (*.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 a (*.f64 b b)) x-scale)))) |
(/.f64 (*.f64 (*.f64 b (*.f64 a (*.f64 b a))) #s(literal -4 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) |
(/.f64 (*.f64 (*.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 a (*.f64 b b)) x-scale)) (*.f64 x-scale (*.f64 y-scale y-scale))) |
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 a (*.f64 (*.f64 a (*.f64 b b)) #s(literal 4 binary64)))))) |
(/.f64 (neg.f64 (*.f64 (*.f64 b (*.f64 a (*.f64 b a))) #s(literal -4 binary64))) (neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) |
(/.f64 (neg.f64 (*.f64 (*.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 a (*.f64 b b)) x-scale))) (neg.f64 (*.f64 x-scale (*.f64 y-scale y-scale)))) |
(/.f64 (*.f64 (*.f64 a (*.f64 (*.f64 a (*.f64 b b)) #s(literal 4 binary64))) #s(literal 1 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) |
(/.f64 (*.f64 (/.f64 #s(literal 4 binary64) x-scale) (*.f64 b (*.f64 a (*.f64 b a)))) (*.f64 x-scale (*.f64 y-scale y-scale))) |
(/.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 b (*.f64 a (*.f64 b a))) (*.f64 x-scale (*.f64 y-scale y-scale)))) x-scale) |
(/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 a (*.f64 b b)) #s(literal 4 binary64))) (*.f64 x-scale (*.f64 y-scale y-scale))) x-scale) |
(/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 a (*.f64 b b)) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) |
(/.f64 (/.f64 (*.f64 (*.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 a (*.f64 b b)) x-scale)) x-scale) (*.f64 y-scale y-scale)) |
(/.f64 (/.f64 (*.f64 (*.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 a (*.f64 b b)) x-scale)) (*.f64 y-scale y-scale)) x-scale) |
(/.f64 (/.f64 (*.f64 (*.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 a (*.f64 b b)) x-scale)) (*.f64 x-scale y-scale)) y-scale) |
(pow.f64 (/.f64 (*.f64 (*.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 a (*.f64 b b)) x-scale)) (*.f64 x-scale (*.f64 y-scale y-scale))) #s(literal 1 binary64)) |
(pow.f64 (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 a (*.f64 (*.f64 a (*.f64 b b)) #s(literal 4 binary64)))) #s(literal -1 binary64)) |
(pow.f64 (/.f64 (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 a (*.f64 (*.f64 a (*.f64 b b)) #s(literal 4 binary64)))) #s(literal 1 binary64)) #s(literal -1 binary64)) |
(pow.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (*.f64 (*.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 a (*.f64 b b)) x-scale))) #s(literal -1 binary64)) |
(*.f64 (*.f64 b (*.f64 a (*.f64 b a))) (*.f64 #s(literal 4 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) |
(*.f64 (*.f64 b (*.f64 a (*.f64 b a))) (/.f64 #s(literal 4 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) |
(*.f64 (*.f64 (/.f64 (*.f64 a (*.f64 b b)) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(literal 4 binary64)) |
(*.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 a (*.f64 b b)) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale))))) |
(*.f64 (*.f64 a (*.f64 (*.f64 a (*.f64 b b)) #s(literal 4 binary64))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) |
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 a (*.f64 b b)) x-scale)) (*.f64 x-scale (*.f64 y-scale y-scale)))) |
(*.f64 (*.f64 (*.f64 b (*.f64 a (*.f64 b a))) #s(literal -4 binary64)) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) |
(*.f64 (/.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 (*.f64 b (*.f64 a (*.f64 b a))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 #s(literal 4 binary64) x-scale)) |
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 a (*.f64 (*.f64 a (*.f64 b b)) #s(literal 4 binary64)))) |
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 a (*.f64 (*.f64 a (*.f64 b b)) #s(literal 4 binary64)))) #s(literal -1 binary64))) |
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (pow.f64 (/.f64 (*.f64 y-scale y-scale) (*.f64 a (*.f64 (*.f64 a (*.f64 b b)) #s(literal 4 binary64)))) #s(literal -1 binary64))) |
(*.f64 (*.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 a (*.f64 b b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) |
(*.f64 (*.f64 (*.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 a (*.f64 b b)) x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale y-scale)))) |
(*.f64 (*.f64 a (/.f64 (*.f64 a (*.f64 b b)) x-scale)) (/.f64 #s(literal 4 binary64) (*.f64 x-scale (*.f64 y-scale y-scale)))) |
(*.f64 (*.f64 a (/.f64 (*.f64 a (*.f64 b b)) x-scale)) (pow.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) #s(literal 4 binary64)) #s(literal -1 binary64))) |
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 a (/.f64 (*.f64 a (*.f64 b b)) x-scale))) |
(*.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 b a))) (*.f64 x-scale x-scale)) (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale))) |
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b (*.f64 a (*.f64 b a))) (*.f64 y-scale y-scale))) |
(*.f64 (/.f64 (*.f64 a #s(literal 4 binary64)) x-scale) (/.f64 (*.f64 a (*.f64 b b)) (*.f64 x-scale (*.f64 y-scale y-scale)))) |
(*.f64 (/.f64 (*.f64 a #s(literal 4 binary64)) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 (*.f64 a (*.f64 b b)) x-scale)) |
(*.f64 (/.f64 (*.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a (*.f64 b b)) (*.f64 y-scale y-scale))) |
(*.f64 (/.f64 #s(literal 1 binary64) x-scale) (pow.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (*.f64 a (*.f64 (*.f64 a (*.f64 b b)) #s(literal 4 binary64)))) #s(literal -1 binary64))) |
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 (*.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 a (*.f64 b b)) x-scale))) |
(*.f64 (*.f64 #s(literal 4 binary64) (/.f64 a x-scale)) (/.f64 (*.f64 a (*.f64 b b)) (*.f64 x-scale (*.f64 y-scale y-scale)))) |
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 a (*.f64 (*.f64 a (*.f64 b b)) #s(literal 4 binary64)))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) |
(*.f64 (pow.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) #s(literal 4 binary64)) #s(literal -1 binary64)) (*.f64 a (/.f64 (*.f64 a (*.f64 b b)) x-scale))) |
(*.f64 (pow.f64 (/.f64 x-scale (*.f64 a #s(literal 4 binary64))) #s(literal -1 binary64)) (/.f64 (*.f64 a (*.f64 b b)) (*.f64 x-scale (*.f64 y-scale y-scale)))) |
(*.f64 (pow.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (*.f64 a #s(literal 4 binary64))) #s(literal -1 binary64)) (pow.f64 (/.f64 x-scale (*.f64 a (*.f64 b b))) #s(literal -1 binary64))) |
(*.f64 (pow.f64 (/.f64 (*.f64 x-scale x-scale) (*.f64 b (*.f64 a (*.f64 b a)))) #s(literal -1 binary64)) (pow.f64 (/.f64 (*.f64 y-scale y-scale) #s(literal 4 binary64)) #s(literal -1 binary64))) |
(*.f64 (pow.f64 (/.f64 (*.f64 x-scale x-scale) #s(literal 4 binary64)) #s(literal -1 binary64)) (pow.f64 (/.f64 (*.f64 y-scale y-scale) (*.f64 b (*.f64 a (*.f64 b a)))) #s(literal -1 binary64))) |
(*.f64 (pow.f64 (/.f64 (*.f64 x-scale x-scale) (*.f64 a #s(literal 4 binary64))) #s(literal -1 binary64)) (pow.f64 (/.f64 (*.f64 y-scale y-scale) (*.f64 a (*.f64 b b))) #s(literal -1 binary64))) |
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 b (*.f64 a (*.f64 b a))) #s(literal -4 binary64))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) |
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 a (*.f64 b b)) x-scale))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale y-scale)))) |
| 1× | egg-herbie |
| 6208× | *-lowering-*.f32 |
| 6208× | *-lowering-*.f64 |
| 4028× | +-lowering-+.f64 |
| 4028× | +-lowering-+.f32 |
| 2718× | /-lowering-/.f32 |
Useful iterations: 1 (0.0ms)
| Iter | Nodes | Cost |
|---|---|---|
| 0 | 1759 | 140840 |
| 1 | 5749 | 112209 |
| 0 | 8390 | 112209 |
| 1× | iter limit |
| 1× | node limit |
| 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/4 (* (/ (* b (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (- (+ (/ (* (pow a 2) (pow (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))))))) (* b (+ (* -1/4 (* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (- (+ (/ (* (pow a 2) (pow (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 (* (* b (* 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 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2))) (* (pow x-scale 4) (* (pow y-scale 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)) (- (+ (/ (* (pow a 2) (pow (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)))))))))))))) (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))))))) (* b (+ (* -1/4 (* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (- (+ (/ (* (pow a 2) (pow (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))))))))) (* b (+ (* -1/8 (* (* b (* x-scale (* y-scale (* (sqrt 8) (+ (* -1 (* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -2 (pow a 3)) (* 2 (pow a 3))) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 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)))) (- (+ (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2))) (* (pow x-scale 4) (* (pow y-scale 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)) (- (+ (/ (* (pow a 2) (pow (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 a 2) (pow (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))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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) (+ (* -2 a) (* 2 a)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -2 (pow a 3)) (* 2 (pow a 3))) (- (+ (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2))) (* (pow x-scale 4) (* (pow y-scale 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)))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2))) (* (pow x-scale 4) (* (pow y-scale 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)) (- (+ (/ (* (pow a 2) (pow (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))))))))))))) (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/4 (* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a))))) (* b (* x-scale y-scale))) (sqrt (/ 1 (* (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 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 (* (* 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/4 (* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a))))) (* b (* x-scale y-scale))) (sqrt (/ 1 (* (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 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/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 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (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 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 4) (* (pow y-scale 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)) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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/4 (* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a))))) (* b (* x-scale y-scale))) (sqrt (/ 1 (* (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 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/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* -1 (* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -2 a) (* 2 a)) (- (+ (/ (* (pow a 2) (pow (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 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (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 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 4) (* (pow y-scale 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)) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -2 a) (* 2 a)) (- (+ (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 4) (* (pow y-scale 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)))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (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)) (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 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (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 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 4) (* (pow y-scale 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)) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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/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 (* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a))))) (* b (* x-scale y-scale))) (sqrt (/ 1 (* (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 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 (* b (+ (* -1 (/ (+ (* -1/4 (* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a))))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 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/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 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (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 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 4) (* (pow y-scale 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)) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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) (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))))))))) b)) (* 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 (/ (+ (* -1 (/ (+ (* 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 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (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 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 4) (* (pow y-scale 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)) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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 (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -2 a) (* 2 a)) (- (+ (/ (* (pow a 2) (pow (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 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (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 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 4) (* (pow y-scale 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)) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -2 a) (* 2 a)) (- (+ (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 4) (* (pow y-scale 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)))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))))))) b) (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))))))))) b)) (* -1/4 (* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a))))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 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)))))))))) b)) (* 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/4 (* (/ (* a (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (- (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* 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))))))) (* a (+ (* -1/4 (* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (- (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* 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 (* (* a (* 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 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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))) (- (/ (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) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2))) (* (pow x-scale 4) (* (pow y-scale 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)) (- (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* 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)))))))))))))) (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))))))) (* a (+ (* -1/4 (* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (- (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* 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))))))))) (* a (+ (* -1/8 (* (* a (* x-scale (* y-scale (* (sqrt 8) (+ (* -1 (* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -2 (pow b 3)) (* 2 (pow b 3))) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 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)))) (- (+ (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2))) (* (pow x-scale 4) (* (pow y-scale 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)) (- (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* 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 b 2) (pow (cos (* 1/180 (* 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))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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) (+ (* -2 b) (* 2 b)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -2 (pow b 3)) (* 2 (pow b 3))) (- (+ (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2))) (* (pow x-scale 4) (* (pow y-scale 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)))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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))) (- (/ (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) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2))) (* (pow x-scale 4) (* (pow y-scale 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)) (- (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* 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))))))))))))) (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/4 (* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b))))) (* a (* x-scale y-scale))) (sqrt (/ 1 (* (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 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 (* (* 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/4 (* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b))))) (* a (* x-scale y-scale))) (sqrt (/ 1 (* (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 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/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 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (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 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 4) (* (pow y-scale 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)) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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/4 (* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b))))) (* a (* x-scale y-scale))) (sqrt (/ 1 (* (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 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/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* -1 (* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -2 b) (* 2 b)) (- (+ (/ (* (pow b 2) (pow (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 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (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 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 4) (* (pow y-scale 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)) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -2 b) (* 2 b)) (- (+ (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 4) (* (pow y-scale 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)))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (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)) (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 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (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 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 4) (* (pow y-scale 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)) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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/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 (* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b))))) (* a (* x-scale y-scale))) (sqrt (/ 1 (* (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 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 (* a (+ (* -1 (/ (+ (* -1/4 (* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b))))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 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/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 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (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 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 4) (* (pow y-scale 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)) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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) (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))))))))) a)) (* 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 (/ (+ (* -1 (/ (+ (* 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 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (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 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 4) (* (pow y-scale 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)) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -2 b) (* 2 b)) (- (+ (/ (* (pow b 2) (pow (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 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (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 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 4) (* (pow y-scale 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)) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -2 b) (* 2 b)) (- (+ (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 4) (* (pow y-scale 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)))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))))))) a) (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))))))))) a)) (* -1/4 (* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b))))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 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)))))))))) a)) (* 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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 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 (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 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 (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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 (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow 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 (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow 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 (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow 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 (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow 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 (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow 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 (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow 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 (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow 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 (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- b a) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow (+ a b) 2) (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow 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 (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 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 (+ a b) 2) (pow (- b a) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* 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 (+ a b) 2) (pow (- b a) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* 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 (+ a b) 2) (pow (- b a) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* 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 (+ a b) 2) (pow (- b a) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* 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 (+ a b) 2) (pow (- b a) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* 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 (+ a b) 2) (pow (- b a) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* 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 (+ a b) 2) (pow (- b a) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* 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 (+ a b) 2) (pow (- b a) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 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 (* (/ (* (pow a 2) (* b (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))))))) (* (pow x-scale 3) (pow y-scale 3))) (sqrt (/ 1 (* (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (- (+ (/ (* (pow a 2) (pow (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) (+ (* b (+ (* -1 (* (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))))) (* (pow x-scale 3) (pow y-scale 3))) (sqrt (/ 1 (* (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (- (+ (/ (* (pow a 2) (pow (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) (* b (* (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 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2))) (* (pow x-scale 4) (* (pow y-scale 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)) (- (+ (/ (* (pow a 2) (pow (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))))))))))))) (* 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) (+ (* b (+ (* -1 (* (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))))) (* (pow x-scale 3) (pow y-scale 3))) (sqrt (/ 1 (* (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (- (+ (/ (* (pow a 2) (pow (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))))))))) (* b (+ (* -1/2 (* (/ (* (pow a 2) (* b (* (sqrt 8) (+ (* -1 (* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -2 (pow a 3)) (* 2 (pow a 3))) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 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)))) (- (+ (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2))) (* (pow x-scale 4) (* (pow y-scale 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)) (- (+ (/ (* (pow a 2) (pow (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 a 2) (pow (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))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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) (+ (* -2 a) (* 2 a)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -2 (pow a 3)) (* 2 (pow a 3))) (- (+ (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2))) (* (pow x-scale 4) (* (pow y-scale 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)))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2))) (* (pow x-scale 4) (* (pow y-scale 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)) (- (+ (/ (* (pow a 2) (pow (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)))))))))))) (* 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 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 (* (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))))) (* b (* (pow x-scale 3) (pow y-scale 3)))) (sqrt (/ 1 (* (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 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))))))))) (* (/ (* (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 (* (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))))) (* b (* (pow x-scale 3) (pow y-scale 3)))) (sqrt (/ 1 (* (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 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 (* (/ (* (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 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (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 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 4) (* (pow y-scale 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)) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (* (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))))) (* b (* (pow x-scale 3) (pow y-scale 3)))) (sqrt (/ 1 (* (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 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 (* (/ (* (pow a 2) (* (sqrt 8) (+ (* -1 (* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -2 a) (* 2 a)) (- (+ (/ (* (pow a 2) (pow (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 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (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 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 4) (* (pow y-scale 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)) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -2 a) (* 2 a)) (- (+ (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 4) (* (pow y-scale 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)))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (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) (* 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 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (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 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 4) (* (pow y-scale 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)) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (+ (* (/ (* (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 (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))))) (* b (* (pow x-scale 3) (pow y-scale 3)))) (sqrt (/ 1 (* (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 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 (* (pow b 3) (+ (* -1 (/ (+ (* -1 (* (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))))) (* (pow x-scale 3) (pow y-scale 3))) (sqrt (/ 1 (* (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 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 (* (/ (* (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 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (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 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 4) (* (pow y-scale 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)) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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 (* 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))))))))) b)) (* (/ (* (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 (/ (+ (* -1 (* (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))))) (* (pow x-scale 3) (pow y-scale 3))) (sqrt (/ 1 (* (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 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 (/ (+ (* 1/2 (* (/ (* (pow a 2) (* (sqrt 8) (+ (* -1 (* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -2 a) (* 2 a)) (- (+ (/ (* (pow a 2) (pow (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 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (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 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 4) (* (pow y-scale 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)) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -2 a) (* 2 a)) (- (+ (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 4) (* (pow y-scale 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)))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))))) (* b (* 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 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (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 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 4) (* (pow y-scale 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)) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 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))))))))) b))) b)) (* (/ (* (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 (* (/ (* a (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))))))) (* (pow x-scale 3) (pow y-scale 3))) (sqrt (/ 1 (* (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (- (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* 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) (+ (* a (+ (* -1 (* (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))))) (* (pow x-scale 3) (pow y-scale 3))) (sqrt (/ 1 (* (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (- (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* 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 (* (/ (* a (* (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 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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))) (- (/ (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) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2))) (* (pow x-scale 4) (* (pow y-scale 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)) (- (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* 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))))))))))))) (* 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) (+ (* a (+ (* -1 (* (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))))) (* (pow x-scale 3) (pow y-scale 3))) (sqrt (/ 1 (* (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (- (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* 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))))))))) (* a (+ (* -1/2 (* (/ (* a (* (pow b 2) (* (sqrt 8) (+ (* -1 (* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -2 (pow b 3)) (* 2 (pow b 3))) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 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)))) (- (+ (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2))) (* (pow x-scale 4) (* (pow y-scale 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)) (- (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* 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 b 2) (pow (cos (* 1/180 (* 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))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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) (+ (* -2 b) (* 2 b)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -2 (pow b 3)) (* 2 (pow b 3))) (- (+ (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2))) (* (pow x-scale 4) (* (pow y-scale 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)))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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))) (- (/ (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) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2))) (* (pow x-scale 4) (* (pow y-scale 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)) (- (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* 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)))))))))))) (* 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 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 (* (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))))) (* a (* (pow x-scale 3) (pow y-scale 3)))) (sqrt (/ 1 (* (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 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))))))))) (* (/ (* (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 (* (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))))) (* a (* (pow x-scale 3) (pow y-scale 3)))) (sqrt (/ 1 (* (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 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 (* (/ (* (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 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (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 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 4) (* (pow y-scale 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)) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (* (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))))) (* a (* (pow x-scale 3) (pow y-scale 3)))) (sqrt (/ 1 (* (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 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 (* (/ (* (pow b 2) (* (sqrt 8) (+ (* -1 (* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -2 b) (* 2 b)) (- (+ (/ (* (pow b 2) (pow (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 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (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 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 4) (* (pow y-scale 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)) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -2 b) (* 2 b)) (- (+ (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 4) (* (pow y-scale 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)))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (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) (* 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 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (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 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 4) (* (pow y-scale 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)) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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) (+ (* (/ (* (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 b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))))) (* a (* (pow x-scale 3) (pow y-scale 3)))) (sqrt (/ 1 (* (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 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 (* (pow a 3) (+ (* -1 (/ (+ (* -1 (* (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))))) (* (pow x-scale 3) (pow y-scale 3))) (sqrt (/ 1 (* (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 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 (* (/ (* (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 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (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 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 4) (* (pow y-scale 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)) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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 (* 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))))))))) a)) (* (/ (* (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 (/ (+ (* -1 (* (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))))) (* (pow x-scale 3) (pow y-scale 3))) (sqrt (/ 1 (* (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 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 (/ (+ (* 1/2 (* (/ (* (pow b 2) (* (sqrt 8) (+ (* -1 (* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -2 b) (* 2 b)) (- (+ (/ (* (pow b 2) (pow (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 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (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 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 4) (* (pow y-scale 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)) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -2 b) (* 2 b)) (- (+ (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 4) (* (pow y-scale 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)))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))))) (* a (* 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 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (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 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 4) (* (pow y-scale 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)) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 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))))))))) a))) a)) (* (/ (* (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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 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 (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 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 (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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 (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow 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 (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow 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 (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow 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 (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow 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 (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow 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 (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow 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 (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- b a) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow (+ a b) 2) (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow 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 (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow 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 (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 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 (+ a b) 2) (pow (- b a) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 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 (+ a b) 2) (pow (- b a) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 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 (+ a b) 2) (pow (- b a) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 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 (+ a b) 2) (pow (- b a) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 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 (+ a b) 2) (pow (- b a) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 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 (+ a b) 2) (pow (- b a) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 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 (+ a b) 2) (pow (- b a) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 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 (+ a b) 2) (pow (- b a) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 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) (+ (* -16 (* (/ (* (pow a 4) (* b (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))))) (* (pow x-scale 4) (pow y-scale 4))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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 a 2) (pow (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)))) (* b (+ (* -16 (* (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))))) (* (pow x-scale 4) (pow y-scale 4))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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) (* b (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 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)))) (- (+ (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2))) (* (pow x-scale 4) (* (pow y-scale 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)))))))))))) (* (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)))) (* b (+ (* -16 (* (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))))) (* (pow x-scale 4) (pow y-scale 4))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* b (+ (* -4 (* (/ (* (pow a 4) (* b (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -2 (pow a 3)) (* 2 (pow a 3))) (- (+ (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2))) (* (pow x-scale 4) (* (pow y-scale 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)))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))))) (* (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) (+ (* -16 (* (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))))) (* b (* (pow x-scale 4) (pow y-scale 4)))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 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) (+ (* -16 (* (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))))) (* b (* (pow x-scale 4) (pow y-scale 4)))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (* 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 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (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 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))))) (* (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) (+ (* -16 (* (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))))) (* b (* (pow x-scale 4) (pow y-scale 4)))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (* -4 (* (/ (* (pow a 4) (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -2 a) (* 2 a)) (- (+ (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 4) (* (pow y-scale 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)))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (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) (* (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 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (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 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))))) (* (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 (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)))) (* 16 (* (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))))) (* b (* (pow x-scale 4) (pow y-scale 4)))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) |
(* (pow b 6) (+ (* -1 (/ (+ (* -16 (* (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))))) (* (pow x-scale 4) (pow y-scale 4))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -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 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (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 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))))) (* b (* (pow x-scale 2) (pow y-scale 2)))))) b)) (* 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) (+ (* -1 (/ (+ (* -16 (* (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))))) (* (pow x-scale 4) (pow y-scale 4))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (/ (+ (* 4 (* (/ (* (pow a 4) (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -2 a) (* 2 a)) (- (+ (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 4) (* (pow y-scale 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)))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* b (* (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 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (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 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))))) (* (pow x-scale 2) (pow y-scale 2))))) b))) b)) (* 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) (+ (* -16 (* (/ (* a (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))))) (* (pow x-scale 4) (pow y-scale 4))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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 b 2) (pow (cos (* 1/180 (* 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)))) (* a (+ (* -16 (* (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))))) (* (pow x-scale 4) (pow y-scale 4))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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 (/ (* a (* (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 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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))) (- (/ (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) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2))) (* (pow x-scale 4) (* (pow y-scale 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)))))))))))) (* (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)))) (* a (+ (* -16 (* (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))))) (* (pow x-scale 4) (pow y-scale 4))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* a (+ (* -4 (* (/ (* a (* (pow b 4) (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -2 (pow b 3)) (* 2 (pow b 3))) (- (+ (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2))) (* (pow x-scale 4) (* (pow y-scale 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)))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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))) (- (/ (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) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))))) (* (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) (+ (* -16 (* (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))))) (* a (* (pow x-scale 4) (pow y-scale 4)))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 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) (+ (* -16 (* (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))))) (* a (* (pow x-scale 4) (pow y-scale 4)))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (* 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 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (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 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))))) (* (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) (+ (* -16 (* (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))))) (* a (* (pow x-scale 4) (pow y-scale 4)))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (* -4 (* (/ (* (pow b 4) (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -2 b) (* 2 b)) (- (+ (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 4) (* (pow y-scale 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)))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (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) (* (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 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (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 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))))) (* (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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)))) (* 16 (* (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))))) (* a (* (pow x-scale 4) (pow y-scale 4)))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) |
(* (pow a 6) (+ (* -1 (/ (+ (* -16 (* (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))))) (* (pow x-scale 4) (pow y-scale 4))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -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 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (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 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))))) (* a (* (pow x-scale 2) (pow y-scale 2)))))) a)) (* 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) (+ (* -1 (/ (+ (* -16 (* (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))))) (* (pow x-scale 4) (pow y-scale 4))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (/ (+ (* 4 (* (/ (* (pow b 4) (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -2 b) (* 2 b)) (- (+ (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 4) (* (pow y-scale 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)))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* a (* (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 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (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 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))))) (* (pow x-scale 2) (pow y-scale 2))))) a))) a)) (* 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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 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 (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 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 (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 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 (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 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 (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow x-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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow x-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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow x-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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow x-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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (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 (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow 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 (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow 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 (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow 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 (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- b a) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow (+ a b) 2) (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow 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 (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 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 (+ a b) 2) (pow (- b a) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (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 (+ a b) 2) (pow (- b a) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (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 (+ a b) 2) (pow (- b a) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (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 (+ a b) 2) (pow (- b a) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (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 (+ a b) 2) (pow (- b a) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (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 (+ a b) 2) (pow (- b a) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (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 (+ a b) 2) (pow (- b a) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (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 (+ a b) 2) (pow (- b a) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (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)))) |
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) |
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) |
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) |
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) |
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) |
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) |
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) |
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) |
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) |
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) |
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) |
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) |
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) |
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) |
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) |
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) |
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) |
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) |
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) |
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) |
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) |
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) |
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) |
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) |
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) |
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) |
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) |
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) |
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) |
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) |
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) |
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) |
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) |
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) |
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) |
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) |
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) |
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) |
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) |
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) |
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) |
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) |
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) |
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) |
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) |
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) |
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) |
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) |
(* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
| 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 x-scale x-scale) (*.f64 y-scale y-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 (* (/ (* b (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (- (+ (/ (* (pow a 2) (pow (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 x-scale x-scale) (*.f64 y-scale y-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 (*.f64 (*.f64 b (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) #s(literal 0 binary64)))) (*.f64 x-scale y-scale))) (sqrt.f64 (/.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 x-scale x-scale) (*.f64 y-scale y-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 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.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 x-scale x-scale) (*.f64 y-scale y-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))))))) (* b (+ (* -1/4 (* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (- (+ (/ (* (pow a 2) (pow (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 (* (* b (* 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 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2))) (* (pow x-scale 4) (* (pow y-scale 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)) (- (+ (/ (* (pow a 2) (pow (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)))))))))))))) (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 x-scale x-scale) (*.f64 y-scale y-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 b (+.f64 (*.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) #s(literal 0 binary64)))) (*.f64 x-scale y-scale))) (sqrt.f64 (/.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 x-scale x-scale) (*.f64 y-scale y-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 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.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 x-scale x-scale) (*.f64 y-scale y-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 (*.f64 b 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 #s(literal 1/2 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 x-scale x-scale) (*.f64 y-scale y-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 2 binary64) (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 0 binary64))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 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 x-scale x-scale) (*.f64 y-scale y-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 (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 4 binary64)) #s(literal 0 binary64))) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 (*.f64 (pow.f64 y-scale #s(literal 4 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 x-scale x-scale) (*.f64 y-scale y-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 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.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 x-scale x-scale) (*.f64 y-scale y-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))))))))))) (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 x-scale x-scale) (*.f64 y-scale y-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))))))) (* b (+ (* -1/4 (* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (- (+ (/ (* (pow a 2) (pow (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))))))))) (* b (+ (* -1/8 (* (* b (* x-scale (* y-scale (* (sqrt 8) (+ (* -1 (* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -2 (pow a 3)) (* 2 (pow a 3))) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 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)))) (- (+ (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2))) (* (pow x-scale 4) (* (pow y-scale 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)) (- (+ (/ (* (pow a 2) (pow (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 a 2) (pow (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))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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) (+ (* -2 a) (* 2 a)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -2 (pow a 3)) (* 2 (pow a 3))) (- (+ (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2))) (* (pow x-scale 4) (* (pow y-scale 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)))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2))) (* (pow x-scale 4) (* (pow y-scale 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)) (- (+ (/ (* (pow a 2) (pow (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))))))))))))) (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 x-scale x-scale) (*.f64 y-scale y-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 b (+.f64 (*.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) #s(literal 0 binary64)))) (*.f64 x-scale y-scale))) (sqrt.f64 (/.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 x-scale x-scale) (*.f64 y-scale y-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 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.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 x-scale x-scale) (*.f64 y-scale y-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 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 x-scale x-scale) (*.f64 y-scale y-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 b x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (-.f64 (*.f64 (*.f64 #s(literal 1/2 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 x-scale x-scale) (*.f64 y-scale y-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)) #s(literal 0 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 binary64)) (+.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 0 binary64))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 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 x-scale x-scale) (*.f64 y-scale y-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 x-scale x-scale) (*.f64 y-scale y-scale)) (+.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 x-scale x-scale) (*.f64 y-scale y-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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 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 #s(literal 1/2 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 x-scale x-scale) (*.f64 y-scale y-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 2 binary64) (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 0 binary64))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 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 x-scale x-scale) (*.f64 y-scale y-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 (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 4 binary64)) #s(literal 0 binary64))) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 (*.f64 (pow.f64 y-scale #s(literal 4 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 x-scale x-scale) (*.f64 y-scale y-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 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.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 x-scale x-scale) (*.f64 y-scale y-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))))))))))) (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 x-scale x-scale) (*.f64 y-scale y-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 x-scale x-scale) (*.f64 y-scale y-scale)) (-.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 x-scale x-scale) (*.f64 y-scale y-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 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 #s(literal 1/2 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 x-scale x-scale) (*.f64 y-scale y-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 2 binary64) (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 0 binary64))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 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 x-scale x-scale) (*.f64 y-scale y-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 (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 4 binary64)) #s(literal 0 binary64))) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 (*.f64 (pow.f64 y-scale #s(literal 4 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 x-scale x-scale) (*.f64 y-scale y-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 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.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 x-scale x-scale) (*.f64 y-scale y-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 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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/4 (* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a))))) (* b (* x-scale y-scale))) (sqrt (/ 1 (* (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 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 (* (* 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 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) b) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) #s(literal 0 binary64))) (*.f64 x-scale y-scale)))) (sqrt.f64 (/.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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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/4 (* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a))))) (* b (* x-scale y-scale))) (sqrt (/ 1 (* (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 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/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 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (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 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 4) (* (pow y-scale 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)) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) b) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) #s(literal 0 binary64))) (*.f64 x-scale y-scale)))) (sqrt.f64 (/.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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 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 x-scale (*.f64 (*.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 (*.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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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 2 binary64) (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 0 binary64))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 0 binary64))) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.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))))) |
(* b (+ (* -1/4 (* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a))))) (* b (* x-scale y-scale))) (sqrt (/ 1 (* (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 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/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* -1 (* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -2 a) (* 2 a)) (- (+ (/ (* (pow a 2) (pow (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 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (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 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 4) (* (pow y-scale 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)) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -2 a) (* 2 a)) (- (+ (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 4) (* (pow y-scale 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)))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (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)) (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 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (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 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 4) (* (pow y-scale 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)) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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 x-scale (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (-.f64 (*.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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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)) #s(literal 0 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 binary64)) (+.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 0 binary64))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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 x-scale x-scale) (*.f64 y-scale y-scale)) (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 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 (*.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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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 2 binary64) (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 0 binary64))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 0 binary64))) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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 x-scale x-scale) (*.f64 y-scale y-scale)) (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.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 (*.f64 b b))))) (*.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 (*.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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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 2 binary64) (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 0 binary64))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 0 binary64))) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.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 (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) b) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) #s(literal 0 binary64))) (*.f64 x-scale y-scale)))) (sqrt.f64 (/.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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))))) |
(* -1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) |
(*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 b (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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/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 (* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a))))) (* b (* x-scale y-scale))) (sqrt (/ 1 (* (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 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)))))))))))) |
(*.f64 (neg.f64 b) (*.f64 #s(literal 1/4 binary64) (+.f64 (*.f64 (*.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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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)) b) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) #s(literal 0 binary64))) (*.f64 x-scale y-scale))) (sqrt.f64 (/.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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (/ (+ (* -1/4 (* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a))))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 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/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 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (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 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 4) (* (pow y-scale 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)) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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) (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))))))))) b)) (* 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 (neg.f64 b) (-.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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (/.f64 (+.f64 (*.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) #s(literal 0 binary64)))) (*.f64 x-scale y-scale))) (sqrt.f64 (/.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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 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 x-scale (*.f64 (*.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 (*.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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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 2 binary64) (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 0 binary64))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 0 binary64))) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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))) b))) |
(* -1 (* b (+ (* -1 (/ (+ (* -1 (/ (+ (* 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 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (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 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 4) (* (pow y-scale 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)) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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 (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -2 a) (* 2 a)) (- (+ (/ (* (pow a 2) (pow (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 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (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 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 4) (* (pow y-scale 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)) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -2 a) (* 2 a)) (- (+ (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 4) (* (pow y-scale 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)))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))))))) b) (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))))))))) b)) (* -1/4 (* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a))))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 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)))))))))) b)) (* 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 (neg.f64 b) (-.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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (/.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) #s(literal 0 binary64)))) (*.f64 x-scale y-scale))) (sqrt.f64 (/.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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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 (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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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 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 (*.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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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 2 binary64) (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 0 binary64))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 0 binary64))) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.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 (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (-.f64 (*.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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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)) #s(literal 0 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 binary64)) (+.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 0 binary64))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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 x-scale x-scale) (*.f64 y-scale y-scale)) (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 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 (*.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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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 2 binary64) (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 0 binary64))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 0 binary64))) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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 x-scale x-scale) (*.f64 y-scale y-scale)) (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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))))) b)) 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 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-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 (* (/ (* a (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (- (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* 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 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-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 (*.f64 a (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) #s(literal 0 binary64)))) (*.f64 x-scale y-scale))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-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 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-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))))))) (* a (+ (* -1/4 (* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (- (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* 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 (* (* a (* 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 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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))) (- (/ (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) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2))) (* (pow x-scale 4) (* (pow y-scale 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)) (- (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* 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)))))))))))))) (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 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-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 a (+.f64 (*.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) #s(literal 0 binary64)))) (*.f64 x-scale y-scale))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-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 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-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 (*.f64 a 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 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-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 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)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 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 (*.f64 b b) #s(literal -2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 0 binary64))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-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 (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 4 binary64)) #s(literal 0 binary64))) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-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 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-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 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-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))))))) (* a (+ (* -1/4 (* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (- (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* 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))))))))) (* a (+ (* -1/8 (* (* a (* x-scale (* y-scale (* (sqrt 8) (+ (* -1 (* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -2 (pow b 3)) (* 2 (pow b 3))) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 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)))) (- (+ (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2))) (* (pow x-scale 4) (* (pow y-scale 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)) (- (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* 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 b 2) (pow (cos (* 1/180 (* 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))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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) (+ (* -2 b) (* 2 b)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -2 (pow b 3)) (* 2 (pow b 3))) (- (+ (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2))) (* (pow x-scale 4) (* (pow y-scale 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)))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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))) (- (/ (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) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2))) (* (pow x-scale 4) (* (pow y-scale 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)) (- (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* 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))))))))))))) (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 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-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 a (+.f64 (*.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) #s(literal 0 binary64)))) (*.f64 x-scale y-scale))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-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 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-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 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 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-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 a (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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)) #s(literal 0 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 binary64)) (+.f64 (*.f64 #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)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 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 (*.f64 b b) #s(literal -2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 0 binary64))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-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 x-scale x-scale) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 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 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-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 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)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 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 (*.f64 b b) #s(literal -2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 0 binary64))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-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 (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 4 binary64)) #s(literal 0 binary64))) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-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 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-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 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-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 x-scale x-scale) (*.f64 y-scale y-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)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-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 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-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 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)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 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 (*.f64 b b) #s(literal -2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 0 binary64))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-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 (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 4 binary64)) #s(literal 0 binary64))) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-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 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-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 (* (* 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 a (*.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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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/4 (* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b))))) (* a (* x-scale y-scale))) (sqrt (/ 1 (* (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 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 (* (* 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 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) #s(literal 0 binary64)))) (*.f64 a (*.f64 x-scale y-scale)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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/4 (* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b))))) (* a (* x-scale y-scale))) (sqrt (/ 1 (* (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 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/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 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (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 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 4) (* (pow y-scale 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)) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) #s(literal 0 binary64)))) (*.f64 a (*.f64 x-scale y-scale)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 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 x-scale (*.f64 (*.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 (*.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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #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 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)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 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 (*.f64 b b) #s(literal -2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 0 binary64))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 0 binary64))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.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))))) |
(* a (+ (* -1/4 (* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b))))) (* a (* x-scale y-scale))) (sqrt (/ 1 (* (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 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/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* -1 (* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -2 b) (* 2 b)) (- (+ (/ (* (pow b 2) (pow (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 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (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 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 4) (* (pow y-scale 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)) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -2 b) (* 2 b)) (- (+ (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 4) (* (pow y-scale 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)))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (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)) (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 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (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 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 4) (* (pow y-scale 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)) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #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) (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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #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)) #s(literal 0 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 binary64)) (+.f64 (*.f64 #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)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 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 (*.f64 b b) #s(literal -2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 0 binary64))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #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 x-scale x-scale) (*.f64 y-scale y-scale)) (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #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 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 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 (*.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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #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 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)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 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 (*.f64 b b) #s(literal -2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 0 binary64))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 0 binary64))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #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 x-scale x-scale) (*.f64 y-scale y-scale)) (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.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 (*.f64 a a)))) (*.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 (*.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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #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 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)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 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 (*.f64 b b) #s(literal -2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 0 binary64))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 0 binary64))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.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 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) #s(literal 0 binary64)))) (*.f64 a (*.f64 x-scale y-scale)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))))) |
(* -1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) |
(*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 a (*.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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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/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 (* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b))))) (* a (* x-scale y-scale))) (sqrt (/ 1 (* (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 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)))))))))))) |
(*.f64 (-.f64 #s(literal 0 binary64) a) (*.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)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) #s(literal 0 binary64)))) (*.f64 a (*.f64 x-scale y-scale))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #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 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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (/ (+ (* -1/4 (* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b))))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 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/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 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (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 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 4) (* (pow y-scale 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)) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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) (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))))))))) a)) (* 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 #s(literal 0 binary64) a) (-.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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (/.f64 (+.f64 (*.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) #s(literal 0 binary64)))) (*.f64 x-scale y-scale))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 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 x-scale (*.f64 (*.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 (*.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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #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 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)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 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 (*.f64 b b) #s(literal -2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 0 binary64))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 0 binary64))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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))) a))) |
(* -1 (* a (+ (* -1 (/ (+ (* -1 (/ (+ (* 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 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (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 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 4) (* (pow y-scale 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)) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -2 b) (* 2 b)) (- (+ (/ (* (pow b 2) (pow (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 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (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 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 4) (* (pow y-scale 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)) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -2 b) (* 2 b)) (- (+ (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 4) (* (pow y-scale 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)))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))))))) a) (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))))))))) a)) (* -1/4 (* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b))))) (* x-scale y-scale)) (sqrt (/ 1 (* (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 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)))))))))) a)) (* 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 #s(literal 0 binary64) a) (-.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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (/.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) #s(literal 0 binary64)))) (*.f64 x-scale y-scale))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #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 (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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #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 b b) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #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 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)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 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 (*.f64 b b) #s(literal -2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 0 binary64))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 0 binary64))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #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/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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #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)) #s(literal 0 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 binary64)) (+.f64 (*.f64 #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)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 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 (*.f64 b b) #s(literal -2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 0 binary64))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #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 x-scale x-scale) (*.f64 y-scale y-scale)) (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #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 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 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 (*.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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #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 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)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 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 (*.f64 b b) #s(literal -2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 0 binary64))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 0 binary64))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #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 x-scale x-scale) (*.f64 y-scale y-scale)) (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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)))) a)) 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 (+ a b) 2) (pow (- b a) 2)))) (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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) |
(* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 -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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))))) |
(* 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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 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 (+ a b) 2) (pow (- b a) 2)))) (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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (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 (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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.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/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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 -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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 -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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.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)))) #s(literal 2 binary64)) (+.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.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/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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 -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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (+.f64 (*.f64 (*.f64 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))))))))))) |
(* 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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 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 (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (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 (*.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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 -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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (+.f64 (*.f64 (*.f64 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))))) (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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (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 (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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 -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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 -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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.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)))) #s(literal 2 binary64)) (+.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 y-scale (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) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 -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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 -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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (+.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)))) #s(literal 2 binary64))))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 -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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 -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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.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)))) #s(literal 2 binary64)) (+.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 -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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (+.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))))))))))))))) |
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (- (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (+.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (+.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (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/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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (+.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))))) (*.f64 (*.f64 x-scale x-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (+.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.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/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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 3 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #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 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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 b b) (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (+.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))))))) (pow.f64 x-scale #s(literal 4 binary64)))) (*.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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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 b b) (pow.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/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.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 b b) (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 #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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (+.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.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/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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 3 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #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 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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 b b) (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (+.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))))))) (pow.f64 x-scale #s(literal 4 binary64)))) (*.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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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 b b) (pow.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/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.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 b b) (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 #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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.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) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) (/.f64 (*.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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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 b b) (pow.f64 (sin.f64 (*.f64 #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) (pow.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (+.f64 (*.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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 3 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #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 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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 b b) (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (+.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))))) (/.f64 (+.f64 (pow.f64 (+.f64 (*.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)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (*.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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 b b) (pow.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (+.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (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 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (+.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))))) (pow.f64 x-scale #s(literal 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (+.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (+.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (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/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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (+.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))))) (*.f64 (*.f64 x-scale x-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (+.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.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/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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 3 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #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 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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 b b) (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (+.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))))))) (pow.f64 x-scale #s(literal 4 binary64)))) (*.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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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 b b) (pow.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/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.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 b b) (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 #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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (+.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.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/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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 3 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #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 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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 b b) (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (+.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))))))) (pow.f64 x-scale #s(literal 4 binary64)))) (*.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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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 b b) (pow.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/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.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 b b) (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 #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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.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) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) (/.f64 (*.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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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 b b) (pow.f64 (sin.f64 (*.f64 #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) (pow.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (+.f64 (*.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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 3 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #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 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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 b b) (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (+.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))))) (/.f64 (+.f64 (pow.f64 (+.f64 (*.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)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (*.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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 b b) (pow.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (+.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (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 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (+.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))))) (pow.f64 x-scale #s(literal 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 (+ a b) 2) (pow (- b a) 2)))) (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 (*.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 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) |
(* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (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 (*.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 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))))) (+.f64 (*.f64 (*.f64 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/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 (*.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 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))))) |
(* 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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 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 (+ a b) 2) (pow (- b a) 2)))) (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 (*.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 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (*.f64 (*.f64 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 (*.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 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 3 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) #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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (+.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))))))))) (*.f64 #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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (+.f64 (*.f64 (*.f64 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))))))))))) |
(* 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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 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 (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (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 (*.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 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (*.f64 (*.f64 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (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 (*.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 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))))) (+.f64 (*.f64 (*.f64 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 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 (*.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 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (+.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 3 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) #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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (+.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))))))) (*.f64 x-scale (*.f64 (*.f64 (*.f64 y-scale y-scale) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) #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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (+.f64 (*.f64 (*.f64 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/4 binary64) (*.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 3 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) #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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (+.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))))) (/.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 (+.f64 (*.f64 (*.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 (*.f64 a a) (pow.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 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))))))))))))))))) |
(* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.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 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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/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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) |
(+.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.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 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) (*.f64 #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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.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 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))) (*.f64 (*.f64 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) |
(+ (* -1/8 (* (/ (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) |
(+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.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 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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))) #s(literal 3 binary64))) (/.f64 (*.f64 #s(literal 1/16 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) #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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (+.f64 (+.f64 (*.f64 (*.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 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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)))))))))) (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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)))))) (*.f64 (*.f64 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (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 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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/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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))))) |
(+.f64 (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.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 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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))) #s(literal 3 binary64))) (/.f64 (*.f64 #s(literal 1/16 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) #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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (+.f64 (+.f64 (*.f64 (*.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 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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)))))))))) (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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)))))) (*.f64 (*.f64 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (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 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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))) #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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) #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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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 #s(literal 1/4 binary64) (*.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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))) #s(literal 3 binary64))) (/.f64 (*.f64 #s(literal 1/16 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) #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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (+.f64 (+.f64 (*.f64 (*.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 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))) (/.f64 (+.f64 (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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) (*.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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 (*.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 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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)))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.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 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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))))))))) (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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.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 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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/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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) |
(+.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.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 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) (*.f64 #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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.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 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))) (*.f64 (*.f64 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))) |
(+ (* -1/8 (* (/ (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) |
(+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.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 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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))) #s(literal 3 binary64))) (/.f64 (*.f64 #s(literal 1/16 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) #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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (+.f64 (+.f64 (*.f64 (*.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 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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)))))))))) (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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)))))) (*.f64 (*.f64 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (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 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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/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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))))) |
(+.f64 (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.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 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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))) #s(literal 3 binary64))) (/.f64 (*.f64 #s(literal 1/16 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) #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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (+.f64 (+.f64 (*.f64 (*.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 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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)))))))))) (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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)))))) (*.f64 (*.f64 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (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 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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))) #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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) #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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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 #s(literal 1/4 binary64) (*.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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))) #s(literal 3 binary64))) (/.f64 (*.f64 #s(literal 1/16 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) #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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (+.f64 (+.f64 (*.f64 (*.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 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))) (/.f64 (+.f64 (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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) (*.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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 (*.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 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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)))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.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 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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))))))))) (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 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 (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow 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 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) (/.f64 (*.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 (*.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 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 (*.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 (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 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale 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 (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow 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 (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow 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 (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))))) (* a (sqrt 2))))))) |
(+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 angle angle) (*.f64 #s(literal 1/8 binary64) (+.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 (*.f64 y-scale y-scale) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (+.f64 (*.f64 (*.f64 a a) (/.f64 (*.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 (*.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 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 (*.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 (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 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale 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 (*.f64 a a) (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 a a) (/.f64 (*.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/4 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (pow.f64 (+.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (+.f64 (*.f64 (*.f64 a a) (/.f64 (*.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 (*.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 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 (*.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 (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 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale 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 #s(literal -1/2 binary64) (/.f64 (+.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.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 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 y-scale y-scale)) (*.f64 (*.f64 a a) (/.f64 (*.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 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal -1/787320000 binary64))) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.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 (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 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)))) (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.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 (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 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.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 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 (*.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 (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 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale 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 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 (*.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 (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 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale 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 (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow 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 (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow 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 (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow 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 (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow 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 (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- b a) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow (+ a b) 2) (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow 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 (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))))) (* a (sqrt 2))))))))) |
(+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) (*.f64 (*.f64 angle angle) (+.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 x-scale (*.f64 (*.f64 (*.f64 y-scale y-scale) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (+.f64 (*.f64 (*.f64 a a) (/.f64 (*.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 (*.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 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 (*.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 (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 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale 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 (*.f64 a a) (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 a a) (/.f64 (*.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/4 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (pow.f64 (+.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (+.f64 (*.f64 (*.f64 a a) (/.f64 (*.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 (*.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 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 (*.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 (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 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale 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 #s(literal -1/2 binary64) (/.f64 (+.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.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 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 y-scale y-scale)) (*.f64 (*.f64 a a) (/.f64 (*.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 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal -1/787320000 binary64))) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.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 (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 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)))) (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.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 (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 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.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 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 (*.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 (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 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale 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 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 (*.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 (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 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale 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 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 #s(literal 2 binary64) (+.f64 (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.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 (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 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)))) (-.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.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 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 y-scale y-scale)) (*.f64 (*.f64 a a) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 y-scale y-scale)))))) (*.f64 (-.f64 (+.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 b b) (/.f64 (*.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 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (*.f64 #s(literal 4 binary64) (+.f64 (/.f64 (*.f64 #s(literal 1/102036672000000 binary64) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 (*.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 (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 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale 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 (*.f64 #s(literal -1/3149280000 binary64) (*.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 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 y-scale y-scale)) (*.f64 (*.f64 a a) (/.f64 (*.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 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal -1/787320000 binary64))) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.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 (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 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)))) (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.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 (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 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.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 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 (*.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 (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 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale 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 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 (*.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 (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 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale 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 (*.f64 (*.f64 (*.f64 y-scale y-scale) (+.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (+.f64 (*.f64 (*.f64 a a) (/.f64 (*.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 (*.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 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 (*.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 (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 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale 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 (*.f64 a a) (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 a a) (/.f64 (*.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/4 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (pow.f64 (+.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (+.f64 (*.f64 (*.f64 a a) (/.f64 (*.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 (*.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 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 (*.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 (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 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale 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 #s(literal -1/2 binary64) (/.f64 (+.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.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 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 y-scale y-scale)) (*.f64 (*.f64 a a) (/.f64 (*.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 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal -1/787320000 binary64))) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.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 (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 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)))) (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.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 (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 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.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 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 (*.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 (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 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale 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 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 (*.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 (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 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale 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 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 (+ a b) 2) (pow (- b a) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (-.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 b b) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (sqrt.f64 (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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 b b) (pow.f64 (sin.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 (+ a b) 2) (pow (- b a) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (-.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 b b) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (sqrt.f64 (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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 b b) (pow.f64 (sin.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 (+ a b) 2) (pow (- b a) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (-.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 b b) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (sqrt.f64 (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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 b b) (pow.f64 (sin.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 (+ a b) 2) (pow (- b a) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (-.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 b b) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (sqrt.f64 (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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 b b) (pow.f64 (sin.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 (+ a b) 2) (pow (- b a) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (-.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 b b) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (sqrt.f64 (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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 b b) (pow.f64 (sin.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 (+ a b) 2) (pow (- b a) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (-.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 b b) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (sqrt.f64 (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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 b b) (pow.f64 (sin.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 (+ a b) 2) (pow (- b a) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (-.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 b b) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (sqrt.f64 (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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 b b) (pow.f64 (sin.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 (+ a b) 2) (pow (- b a) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (-.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 b b) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (sqrt.f64 (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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 b b) (pow.f64 (sin.f64 (*.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 (/.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 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 x-scale x-scale) (*.f64 y-scale y-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))))))) |
(* (pow b 2) (+ (* -1 (* (/ (* (pow a 2) (* b (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))))))) (* (pow x-scale 3) (pow y-scale 3))) (sqrt (/ 1 (* (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (- (+ (/ (* (pow a 2) (pow (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 (/.f64 (*.f64 (*.f64 a a) (sqrt.f64 #s(literal 8 binary64))) (*.f64 x-scale y-scale)) (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 x-scale x-scale) (*.f64 y-scale y-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 a a) (*.f64 (*.f64 b (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) #s(literal 0 binary64))))) (*.f64 (*.f64 x-scale (*.f64 x-scale x-scale)) (*.f64 y-scale (*.f64 y-scale y-scale)))) (sqrt.f64 (/.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 x-scale x-scale) (*.f64 y-scale y-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 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.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 x-scale x-scale) (*.f64 y-scale y-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)))))))))) |
(* (pow b 2) (+ (* b (+ (* -1 (* (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))))) (* (pow x-scale 3) (pow y-scale 3))) (sqrt (/ 1 (* (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (- (+ (/ (* (pow a 2) (pow (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) (* b (* (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 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2))) (* (pow x-scale 4) (* (pow y-scale 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)) (- (+ (/ (* (pow a 2) (pow (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))))))))))))) (* 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 (/.f64 (*.f64 (*.f64 a a) (sqrt.f64 #s(literal 8 binary64))) (*.f64 x-scale y-scale)) (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 x-scale x-scale) (*.f64 y-scale y-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 b (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b (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 #s(literal 1/2 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 x-scale x-scale) (*.f64 y-scale y-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 2 binary64) (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 0 binary64))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 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 x-scale x-scale) (*.f64 y-scale y-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 (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 4 binary64)) #s(literal 0 binary64))) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 (*.f64 (pow.f64 y-scale #s(literal 4 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 x-scale x-scale) (*.f64 y-scale y-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 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.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 x-scale x-scale) (*.f64 y-scale y-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))))))))))) (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 x-scale x-scale) (*.f64 y-scale y-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 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) #s(literal 0 binary64)))) (*.f64 (*.f64 x-scale (*.f64 x-scale x-scale)) (*.f64 y-scale (*.f64 y-scale y-scale)))) (sqrt.f64 (/.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 x-scale x-scale) (*.f64 y-scale y-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 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.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 x-scale x-scale) (*.f64 y-scale y-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)))))))))))) |
(* (pow b 2) (+ (* b (+ (* -1 (* (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))))) (* (pow x-scale 3) (pow y-scale 3))) (sqrt (/ 1 (* (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (- (+ (/ (* (pow a 2) (pow (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))))))))) (* b (+ (* -1/2 (* (/ (* (pow a 2) (* b (* (sqrt 8) (+ (* -1 (* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -2 (pow a 3)) (* 2 (pow a 3))) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 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)))) (- (+ (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2))) (* (pow x-scale 4) (* (pow y-scale 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)) (- (+ (/ (* (pow a 2) (pow (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 a 2) (pow (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))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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) (+ (* -2 a) (* 2 a)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -2 (pow a 3)) (* 2 (pow a 3))) (- (+ (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2))) (* (pow x-scale 4) (* (pow y-scale 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)))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2))) (* (pow x-scale 4) (* (pow y-scale 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)) (- (+ (/ (* (pow a 2) (pow (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)))))))))))) (* 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 (/.f64 (*.f64 (*.f64 a a) (sqrt.f64 #s(literal 8 binary64))) (*.f64 x-scale y-scale)) (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 x-scale x-scale) (*.f64 y-scale y-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 b (-.f64 (*.f64 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 x-scale x-scale) (*.f64 y-scale y-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 (sqrt.f64 #s(literal 8 binary64))) (-.f64 (*.f64 (*.f64 #s(literal 1/2 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 x-scale x-scale) (*.f64 y-scale y-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)) #s(literal 0 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 binary64)) (+.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 0 binary64))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 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 x-scale x-scale) (*.f64 y-scale y-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 x-scale x-scale) (*.f64 y-scale y-scale)) (+.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 x-scale x-scale) (*.f64 y-scale y-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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 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 #s(literal 1/2 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 x-scale x-scale) (*.f64 y-scale y-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 2 binary64) (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 0 binary64))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 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 x-scale x-scale) (*.f64 y-scale y-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 (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 4 binary64)) #s(literal 0 binary64))) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 (*.f64 (pow.f64 y-scale #s(literal 4 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 x-scale x-scale) (*.f64 y-scale y-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 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.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 x-scale x-scale) (*.f64 y-scale y-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))))))))))) (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 x-scale x-scale) (*.f64 y-scale y-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 x-scale x-scale) (*.f64 y-scale y-scale)) (-.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 x-scale x-scale) (*.f64 y-scale y-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 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (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 #s(literal 1/2 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 x-scale x-scale) (*.f64 y-scale y-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 2 binary64) (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 0 binary64))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 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 x-scale x-scale) (*.f64 y-scale y-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 (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 4 binary64)) #s(literal 0 binary64))) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 (*.f64 (pow.f64 y-scale #s(literal 4 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 x-scale x-scale) (*.f64 y-scale y-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 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.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 x-scale x-scale) (*.f64 y-scale y-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 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) #s(literal 0 binary64)))) (*.f64 (*.f64 x-scale (*.f64 x-scale x-scale)) (*.f64 y-scale (*.f64 y-scale y-scale)))) (sqrt.f64 (/.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 x-scale x-scale) (*.f64 y-scale y-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 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.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 x-scale x-scale) (*.f64 y-scale y-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)))))))))))) |
(* (/ (* (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 (/.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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) |
(* (pow b 3) (+ (* -1 (* (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))))) (* b (* (pow x-scale 3) (pow y-scale 3)))) (sqrt (/ 1 (* (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 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))))))))) (* (/ (* (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 (*.f64 (*.f64 a a) (sqrt.f64 #s(literal 8 binary64))) (*.f64 x-scale y-scale)) (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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) #s(literal 0 binary64)))) (*.f64 (*.f64 b (*.f64 x-scale (*.f64 x-scale x-scale))) (*.f64 y-scale (*.f64 y-scale y-scale)))) (sqrt.f64 (/.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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))))) |
(* (pow b 3) (+ (* -1 (* (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))))) (* b (* (pow x-scale 3) (pow y-scale 3)))) (sqrt (/ 1 (* (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 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 (* (/ (* (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 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (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 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 4) (* (pow y-scale 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)) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (/.f64 (*.f64 (*.f64 a a) (sqrt.f64 #s(literal 8 binary64))) (*.f64 x-scale y-scale)) (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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) #s(literal 0 binary64)))) (*.f64 (*.f64 b (*.f64 x-scale (*.f64 x-scale x-scale))) (*.f64 y-scale (*.f64 y-scale y-scale)))) (sqrt.f64 (/.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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 a a) (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 (*.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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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 2 binary64) (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 0 binary64))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 0 binary64))) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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 x-scale y-scale)))))) |
(* (pow b 3) (+ (* -1 (* (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))))) (* b (* (pow x-scale 3) (pow y-scale 3)))) (sqrt (/ 1 (* (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 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 (* (/ (* (pow a 2) (* (sqrt 8) (+ (* -1 (* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -2 a) (* 2 a)) (- (+ (/ (* (pow a 2) (pow (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 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (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 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 4) (* (pow y-scale 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)) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -2 a) (* 2 a)) (- (+ (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 4) (* (pow y-scale 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)))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (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) (* 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 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (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 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 4) (* (pow y-scale 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)) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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 (*.f64 a a) (sqrt.f64 #s(literal 8 binary64))) (-.f64 (*.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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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)) #s(literal 0 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 binary64)) (+.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 0 binary64))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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 x-scale x-scale) (*.f64 y-scale y-scale)) (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 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 (*.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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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 2 binary64) (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 0 binary64))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 0 binary64))) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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 x-scale x-scale) (*.f64 y-scale y-scale)) (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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 (*.f64 b b)) x-scale) y-scale))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (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 (*.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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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 2 binary64) (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 0 binary64))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 0 binary64))) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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 x-scale y-scale)))))) (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) (sqrt.f64 #s(literal 8 binary64))) (*.f64 x-scale y-scale)) (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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) #s(literal 0 binary64)))) (*.f64 (*.f64 b (*.f64 x-scale (*.f64 x-scale x-scale))) (*.f64 y-scale (*.f64 y-scale y-scale)))) (sqrt.f64 (/.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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (* (/ (* (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 (neg.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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (* (pow b 3) (+ (* (/ (* (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 (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))))) (* b (* (pow x-scale 3) (pow y-scale 3)))) (sqrt (/ 1 (* (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 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))))))))))) |
(*.f64 (*.f64 #s(literal -1 binary64) (*.f64 b (*.f64 b b))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) #s(literal 0 binary64)))) (*.f64 (*.f64 b (*.f64 x-scale (*.f64 x-scale x-scale))) (*.f64 y-scale (*.f64 y-scale y-scale)))) (sqrt.f64 (/.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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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) (sqrt.f64 #s(literal 8 binary64))) (*.f64 x-scale y-scale)) (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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (* (pow b 3) (+ (* -1 (/ (+ (* -1 (* (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))))) (* (pow x-scale 3) (pow y-scale 3))) (sqrt (/ 1 (* (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 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 (* (/ (* (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 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (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 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 4) (* (pow y-scale 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)) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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 (* 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))))))))) b)) (* (/ (* (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 #s(literal -1 binary64) (*.f64 b (*.f64 b b))) (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) (sqrt.f64 #s(literal 8 binary64))) (*.f64 x-scale y-scale)) (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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 a a) (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 (*.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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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 2 binary64) (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 0 binary64))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 0 binary64))) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.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 (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) #s(literal 0 binary64)))) (*.f64 (*.f64 x-scale (*.f64 x-scale x-scale)) (*.f64 y-scale (*.f64 y-scale y-scale)))) (sqrt.f64 (/.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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (* (pow b 3) (+ (* -1 (/ (+ (* -1 (* (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a)))))) (* (pow x-scale 3) (pow y-scale 3))) (sqrt (/ 1 (* (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 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 (/ (+ (* 1/2 (* (/ (* (pow a 2) (* (sqrt 8) (+ (* -1 (* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -2 a) (* 2 a)) (- (+ (/ (* (pow a 2) (pow (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 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (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 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 4) (* (pow y-scale 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)) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -2 a) (* 2 a)) (- (+ (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 4) (* (pow y-scale 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)))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))))) (* b (* 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 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (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 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 4) (* (pow y-scale 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)) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 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))))))))) b))) b)) (* (/ (* (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 #s(literal -1 binary64) (*.f64 b (*.f64 b b))) (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) (sqrt.f64 #s(literal 8 binary64))) (*.f64 x-scale y-scale)) (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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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 (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) #s(literal 0 binary64)))) (*.f64 (*.f64 x-scale (*.f64 x-scale x-scale)) (*.f64 y-scale (*.f64 y-scale y-scale))))) (sqrt.f64 (/.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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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 (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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (+.f64 (/.f64 (*.f64 (*.f64 (*.f64 a a) (sqrt.f64 #s(literal 8 binary64))) (-.f64 (*.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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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)) #s(literal 0 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 binary64)) (+.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 0 binary64))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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 x-scale x-scale) (*.f64 y-scale y-scale)) (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 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 (*.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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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 2 binary64) (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 0 binary64))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 0 binary64))) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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 x-scale x-scale) (*.f64 y-scale y-scale)) (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.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 (*.f64 x-scale y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (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 (*.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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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 2 binary64) (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 0 binary64))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 0 binary64))) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.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))))) 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 (/.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 b b) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.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) (+ (* -1 (* (/ (* a (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))))))) (* (pow x-scale 3) (pow y-scale 3))) (sqrt (/ 1 (* (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (- (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* 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 (/.f64 (*.f64 (*.f64 b b) (sqrt.f64 #s(literal 8 binary64))) (*.f64 x-scale y-scale)) (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 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-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 (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) #s(literal 0 binary64))))) (*.f64 (*.f64 x-scale (*.f64 x-scale x-scale)) (*.f64 y-scale (*.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-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 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-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)))))))))) |
(* (pow a 2) (+ (* a (+ (* -1 (* (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))))) (* (pow x-scale 3) (pow y-scale 3))) (sqrt (/ 1 (* (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (- (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* 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 (* (/ (* a (* (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 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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))) (- (/ (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) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2))) (* (pow x-scale 4) (* (pow y-scale 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)) (- (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* 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))))))))))))) (* 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 (/.f64 (*.f64 (*.f64 b b) (sqrt.f64 #s(literal 8 binary64))) (*.f64 x-scale y-scale)) (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 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-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 a (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a (*.f64 (*.f64 (*.f64 b b) (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 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-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 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)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 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 (*.f64 b b) #s(literal -2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 0 binary64))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-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 (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 4 binary64)) #s(literal 0 binary64))) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-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 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-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 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-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 (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) #s(literal 0 binary64)))) (*.f64 (*.f64 x-scale (*.f64 x-scale x-scale)) (*.f64 y-scale (*.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-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 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-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)))))))))))) |
(* (pow a 2) (+ (* a (+ (* -1 (* (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))))) (* (pow x-scale 3) (pow y-scale 3))) (sqrt (/ 1 (* (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (- (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* 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))))))))) (* a (+ (* -1/2 (* (/ (* a (* (pow b 2) (* (sqrt 8) (+ (* -1 (* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -2 (pow b 3)) (* 2 (pow b 3))) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 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)))) (- (+ (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2))) (* (pow x-scale 4) (* (pow y-scale 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)) (- (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* 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 b 2) (pow (cos (* 1/180 (* 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))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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) (+ (* -2 b) (* 2 b)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -2 (pow b 3)) (* 2 (pow b 3))) (- (+ (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2))) (* (pow x-scale 4) (* (pow y-scale 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)))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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))) (- (/ (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) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2))) (* (pow x-scale 4) (* (pow y-scale 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)) (- (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* 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)))))))))))) (* 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 (/.f64 (*.f64 (*.f64 b b) (sqrt.f64 #s(literal 8 binary64))) (*.f64 x-scale y-scale)) (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 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-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 a (-.f64 (*.f64 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 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-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 a (*.f64 (*.f64 (*.f64 b b) (sqrt.f64 #s(literal 8 binary64))) (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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)) #s(literal 0 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 binary64)) (+.f64 (*.f64 #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)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 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 (*.f64 b b) #s(literal -2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 0 binary64))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-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 x-scale x-scale) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 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 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-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 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)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 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 (*.f64 b b) #s(literal -2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 0 binary64))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-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 (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 4 binary64)) #s(literal 0 binary64))) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-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 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-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 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-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 x-scale x-scale) (*.f64 y-scale y-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)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-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 (*.f64 b b) (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 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-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 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)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 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 (*.f64 b b) #s(literal -2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 0 binary64))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-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 (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 4 binary64)) #s(literal 0 binary64))) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-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 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-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 (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) #s(literal 0 binary64)))) (*.f64 (*.f64 x-scale (*.f64 x-scale x-scale)) (*.f64 y-scale (*.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-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 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-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)))))))))))) |
(* (/ (* (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 (/.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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.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 3) (+ (* -1 (* (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))))) (* a (* (pow x-scale 3) (pow y-scale 3)))) (sqrt (/ 1 (* (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 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))))))))) (* (/ (* (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 (*.f64 (*.f64 b b) (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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.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 (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) #s(literal 0 binary64)))) (*.f64 a (*.f64 (*.f64 x-scale (*.f64 x-scale x-scale)) (*.f64 y-scale (*.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.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 3) (+ (* -1 (* (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))))) (* a (* (pow x-scale 3) (pow y-scale 3)))) (sqrt (/ 1 (* (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 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 (* (/ (* (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 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (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 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 4) (* (pow y-scale 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)) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (*.f64 (*.f64 (*.f64 b b) (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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.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 (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) #s(literal 0 binary64)))) (*.f64 a (*.f64 (*.f64 x-scale (*.f64 x-scale x-scale)) (*.f64 y-scale (*.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 b b) (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 (*.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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #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 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)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 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 (*.f64 b b) #s(literal -2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 0 binary64))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 0 binary64))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #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)))))) |
(* (pow a 3) (+ (* -1 (* (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))))) (* a (* (pow x-scale 3) (pow y-scale 3)))) (sqrt (/ 1 (* (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 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 (* (/ (* (pow b 2) (* (sqrt 8) (+ (* -1 (* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -2 b) (* 2 b)) (- (+ (/ (* (pow b 2) (pow (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 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (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 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 4) (* (pow y-scale 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)) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -2 b) (* 2 b)) (- (+ (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 4) (* (pow y-scale 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)))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (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) (* 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 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (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 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 4) (* (pow y-scale 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)) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #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 (*.f64 b b) (sqrt.f64 #s(literal 8 binary64))) (-.f64 (*.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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #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)) #s(literal 0 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 binary64)) (+.f64 (*.f64 #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)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 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 (*.f64 b b) #s(literal -2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 0 binary64))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #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 x-scale x-scale) (*.f64 y-scale y-scale)) (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #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 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 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 (*.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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #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 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)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 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 (*.f64 b b) #s(literal -2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 0 binary64))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 0 binary64))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #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 x-scale x-scale) (*.f64 y-scale y-scale)) (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #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 (*.f64 a a)) (*.f64 x-scale y-scale)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) (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 (*.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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #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 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)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 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 (*.f64 b b) #s(literal -2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 0 binary64))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 0 binary64))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #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 (/.f64 (*.f64 (*.f64 (*.f64 b b) (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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.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 (*.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) #s(literal 0 binary64)))) (*.f64 a (*.f64 (*.f64 x-scale (*.f64 x-scale x-scale)) (*.f64 y-scale (*.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (* (/ (* (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 (neg.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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (* (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 b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))))) (* a (* (pow x-scale 3) (pow y-scale 3)))) (sqrt (/ 1 (* (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 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))))))))))) |
(*.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (*.f64 a a))) (+.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) #s(literal 0 binary64)))) (*.f64 a (*.f64 (*.f64 x-scale (*.f64 x-scale x-scale)) (*.f64 y-scale (*.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #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 b b) (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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.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)))) |
(* -1 (* (pow a 3) (+ (* -1 (/ (+ (* -1 (* (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))))) (* (pow x-scale 3) (pow y-scale 3))) (sqrt (/ 1 (* (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 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 (* (/ (* (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 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (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 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 4) (* (pow y-scale 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)) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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 (* 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))))))))) a)) (* (/ (* (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 #s(literal -1 binary64) (*.f64 a (*.f64 a a))) (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 b b) (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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.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 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 b b) (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 (*.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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #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 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)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 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 (*.f64 b b) #s(literal -2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 0 binary64))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 0 binary64))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.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 (*.f64 x-scale y-scale)))) (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) #s(literal 0 binary64)))) (*.f64 (*.f64 x-scale (*.f64 x-scale x-scale)) (*.f64 y-scale (*.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 (* (pow a 3) (+ (* -1 (/ (+ (* -1 (* (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b)))))) (* (pow x-scale 3) (pow y-scale 3))) (sqrt (/ 1 (* (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 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 (/ (+ (* 1/2 (* (/ (* (pow b 2) (* (sqrt 8) (+ (* -1 (* (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -2 b) (* 2 b)) (- (+ (/ (* (pow b 2) (pow (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 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (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 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 4) (* (pow y-scale 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)) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (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 (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -2 b) (* 2 b)) (- (+ (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 4) (* (pow y-scale 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)))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))))) (* a (* 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 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (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 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 4) (* (pow y-scale 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)) (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 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))))))))) a))) a)) (* (/ (* (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 #s(literal -1 binary64) (*.f64 a (*.f64 a a))) (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 b b) (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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.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 (*.f64 (neg.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) #s(literal 0 binary64)))) (*.f64 (*.f64 x-scale (*.f64 x-scale x-scale)) (*.f64 y-scale (*.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #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 (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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (+.f64 (/.f64 (*.f64 (*.f64 (*.f64 b b) (sqrt.f64 #s(literal 8 binary64))) (-.f64 (*.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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #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)) #s(literal 0 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 binary64)) (+.f64 (*.f64 #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)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 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 (*.f64 b b) #s(literal -2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 0 binary64))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #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 x-scale x-scale) (*.f64 y-scale y-scale)) (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #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 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 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 (*.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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #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 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)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 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 (*.f64 b b) #s(literal -2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 0 binary64))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 0 binary64))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #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 x-scale x-scale) (*.f64 y-scale y-scale)) (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.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 (*.f64 x-scale y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 b b) (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 (*.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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #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 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)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 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 (*.f64 b b) #s(literal -2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 0 binary64))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 0 binary64))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.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))))) 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 (+ a b) 2) (pow (- b a) 2)))) (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 (*.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) (pow.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) |
(/ (+ (* -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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 -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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (*.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 a a) (*.f64 (*.f64 b b) (sqrt.f64 #s(literal 8 binary64)))) y-scale) (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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))))) 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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 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 (+ a b) 2) (pow (- b a) 2)))) (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 (/.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) (pow.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (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 (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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.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/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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 -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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 -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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.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)))) #s(literal 2 binary64)) (+.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))))))) y-scale)) (*.f64 #s(literal -1/4 binary64) (/.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) (pow.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 -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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))))) 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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 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 (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (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 (/.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) (pow.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (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/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) (pow.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 -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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (*.f64 b b) (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/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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.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 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) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 -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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 -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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.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)))) #s(literal 2 binary64)) (+.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 -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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 -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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (+.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)))) #s(literal 2 binary64))))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 -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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 -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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.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)))) #s(literal 2 binary64)) (+.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 -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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))) (*.f64 (+.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))))))) 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (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 (*.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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (+.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (*.f64 b b) (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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (+.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))))) (*.f64 (*.f64 (*.f64 x-scale x-scale) 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 (*.f64 b b) (pow.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 a a) (*.f64 (*.f64 b b) (sqrt.f64 #s(literal 8 binary64)))) y-scale) (sqrt.f64 (+.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 b b) (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 #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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))))) (*.f64 x-scale x-scale)) |
(/ (+ (* -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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (+.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.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 (*.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) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 3 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #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 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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 b b) (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (+.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) y-scale))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (*.f64 b b) (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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #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 x-scale x-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 (*.f64 b b) (pow.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 a a) (*.f64 (*.f64 b b) (sqrt.f64 #s(literal 8 binary64)))) y-scale) (sqrt.f64 (+.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 b b) (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 #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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))))) (*.f64 x-scale x-scale)) |
(/ (+ (* -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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (+.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.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 (*.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) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 3 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #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 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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 b b) (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (+.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) y-scale))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (*.f64 b b) (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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #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 x-scale x-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 (*.f64 b b) (pow.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 a a) (*.f64 (*.f64 b b) (sqrt.f64 #s(literal 8 binary64)))) y-scale) (sqrt.f64 (+.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 b b) (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 #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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (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 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) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) (/.f64 (*.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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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 b b) (pow.f64 (sin.f64 (*.f64 #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) (pow.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (+.f64 (*.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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 3 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #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 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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 b b) (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (+.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))))) (/.f64 (+.f64 (pow.f64 (+.f64 (*.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)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (*.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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 b b) (pow.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (+.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (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 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (+.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))))) (*.f64 (pow.f64 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) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (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 (*.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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (+.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (*.f64 b b) (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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (+.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))))) (*.f64 (*.f64 (*.f64 x-scale x-scale) 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 (*.f64 b b) (pow.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 a a) (*.f64 (*.f64 b b) (sqrt.f64 #s(literal 8 binary64)))) y-scale) (sqrt.f64 (+.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 b b) (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 #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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))))) (*.f64 x-scale x-scale)) |
(/ (+ (* -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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (+.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.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 (*.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) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 3 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #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 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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 b b) (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (+.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) y-scale))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (*.f64 b b) (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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #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 x-scale x-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 (*.f64 b b) (pow.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 a a) (*.f64 (*.f64 b b) (sqrt.f64 #s(literal 8 binary64)))) y-scale) (sqrt.f64 (+.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 b b) (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 #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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))))) (*.f64 x-scale x-scale)) |
(/ (+ (* -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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (+.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.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 (*.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) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 3 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #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 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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 b b) (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (+.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) y-scale))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (*.f64 b b) (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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #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 x-scale x-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 (*.f64 b b) (pow.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 a a) (*.f64 (*.f64 b b) (sqrt.f64 #s(literal 8 binary64)))) y-scale) (sqrt.f64 (+.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 b b) (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 #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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (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 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) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) (/.f64 (*.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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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 b b) (pow.f64 (sin.f64 (*.f64 #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) (pow.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (+.f64 (*.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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 3 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #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 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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 b b) (pow.f64 (sin.f64 (*.f64 #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) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (+.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))))) (/.f64 (+.f64 (pow.f64 (+.f64 (*.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)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (*.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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 b b) (pow.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (+.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (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 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (+.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))))))) (*.f64 (pow.f64 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) (pow (sin (* 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 (+ a b) 2) (pow (- b a) 2)))) (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 (*.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) (pow.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 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) |
(/ (+ (* -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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (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 (*.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 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))))) (*.f64 x-scale (+.f64 (*.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) (*.f64 (*.f64 b b) (sqrt.f64 #s(literal 8 binary64)))) x-scale) (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 (*.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 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))))) 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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 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 (+ a b) 2) (pow (- b a) 2)))) (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 (/.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) (pow.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 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (*.f64 (*.f64 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 (*.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 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (*.f64 b b) (*.f64 y-scale y-scale)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 3 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) #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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (+.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))))))))) x-scale)) (*.f64 #s(literal -1/4 binary64) (/.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) (pow.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))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 x-scale (+.f64 (*.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))))))))))) 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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 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 (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (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 (/.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) (pow.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 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (*.f64 (*.f64 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) (pow.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))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (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 (*.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 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))))) (*.f64 x-scale (+.f64 (*.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 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 (*.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 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.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) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 3 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) #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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (+.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))))))) x-scale) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (*.f64 (*.f64 (*.f64 y-scale y-scale) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) #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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (+.f64 (*.f64 (*.f64 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/4 binary64) (*.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 3 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) #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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (+.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))))) (/.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) (*.f64 (+.f64 (*.f64 (*.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 (*.f64 a a) (pow.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 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))))))))) 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (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 (*.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) (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 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (* (/ (* (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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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 (*.f64 b b) (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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.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 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))) (*.f64 (*.f64 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (sqrt.f64 #s(literal 8 binary64)))) x-scale) (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 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))) (*.f64 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (pow y-scale 2)) |
(/.f64 (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.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 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.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) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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))) #s(literal 3 binary64))) (/.f64 (*.f64 #s(literal 1/16 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) #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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (+.f64 (+.f64 (*.f64 (*.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 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))))) (*.f64 x-scale (pow.f64 y-scale #s(literal 4 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (*.f64 b b) (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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))))) (*.f64 (*.f64 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (sqrt.f64 #s(literal 8 binary64)))) x-scale) (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 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))) (*.f64 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) (pow y-scale 2)) |
(/.f64 (+.f64 (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.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 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.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) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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))) #s(literal 3 binary64))) (/.f64 (*.f64 #s(literal 1/16 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) #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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (+.f64 (+.f64 (*.f64 (*.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 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))))) (*.f64 x-scale (pow.f64 y-scale #s(literal 4 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (*.f64 b b) (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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))))) (*.f64 (*.f64 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (sqrt.f64 #s(literal 8 binary64)))) x-scale) (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 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))) (*.f64 #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) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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))) #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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) #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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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 #s(literal 1/4 binary64) (*.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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))) #s(literal 3 binary64))) (/.f64 (*.f64 #s(literal 1/16 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) #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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (+.f64 (+.f64 (*.f64 (*.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 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))) (/.f64 (+.f64 (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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) (*.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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 (*.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 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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))))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.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 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))) (*.f64 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (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 (*.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) (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 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (* (/ (* (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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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 (*.f64 b b) (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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.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 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))) (*.f64 (*.f64 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (sqrt.f64 #s(literal 8 binary64)))) x-scale) (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 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))) (*.f64 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (pow y-scale 2)) |
(/.f64 (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.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 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.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) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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))) #s(literal 3 binary64))) (/.f64 (*.f64 #s(literal 1/16 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) #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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (+.f64 (+.f64 (*.f64 (*.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 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))))) (*.f64 x-scale (pow.f64 y-scale #s(literal 4 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (*.f64 b b) (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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))))) (*.f64 (*.f64 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (sqrt.f64 #s(literal 8 binary64)))) x-scale) (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 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))) (*.f64 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) (pow y-scale 2)) |
(/.f64 (+.f64 (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.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 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.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) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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))) #s(literal 3 binary64))) (/.f64 (*.f64 #s(literal 1/16 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) #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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (+.f64 (+.f64 (*.f64 (*.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 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))))) (*.f64 x-scale (pow.f64 y-scale #s(literal 4 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (*.f64 b b) (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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))))) (*.f64 (*.f64 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (sqrt.f64 #s(literal 8 binary64)))) x-scale) (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 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))) (*.f64 #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) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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))) #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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) #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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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 #s(literal 1/4 binary64) (*.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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))) #s(literal 3 binary64))) (/.f64 (*.f64 #s(literal 1/16 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) #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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (+.f64 (+.f64 (*.f64 (*.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 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))) (/.f64 (+.f64 (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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) (*.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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 (*.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 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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))))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.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 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))) (*.f64 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 (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow 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 #s(literal -1/32400 binary64) (+.f64 (*.f64 (*.f64 a a) (/.f64 (*.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 (*.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 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 (*.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 (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 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale 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 (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow 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 (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow 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 a x-scale) (+.f64 (/.f64 (*.f64 (*.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 (*.f64 a a) (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 a a) (/.f64 (*.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/4 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (pow.f64 (+.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (+.f64 (*.f64 (*.f64 a a) (/.f64 (*.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 (*.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 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 (*.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 (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 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale 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 #s(literal -1/2 binary64) (/.f64 (+.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.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 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 y-scale y-scale)) (*.f64 (*.f64 a a) (/.f64 (*.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 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal -1/787320000 binary64))) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.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 (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 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)))) (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.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 (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 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.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 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 (*.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 (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 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale 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 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 (*.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 (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 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale 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 (*.f64 b b) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (+.f64 (*.f64 (*.f64 a a) (/.f64 (*.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 (*.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 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 (*.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 (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 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale 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 (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow 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 (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow 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 (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow 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 (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- b a) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow (+ a b) 2) (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow 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 (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow 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 (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 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 #s(literal -1/32400 binary64) (+.f64 (*.f64 (*.f64 a a) (/.f64 (*.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 (*.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 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 (*.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 (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 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale 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 (*.f64 b b) (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 #s(literal 2 binary64) (+.f64 (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.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 (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 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)))) (-.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.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 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 y-scale y-scale)) (*.f64 (*.f64 a a) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 y-scale y-scale)))))) (*.f64 (-.f64 (+.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 b b) (/.f64 (*.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 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (*.f64 #s(literal 4 binary64) (+.f64 (/.f64 (*.f64 #s(literal 1/102036672000000 binary64) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 (*.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 (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 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale 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 (*.f64 #s(literal -1/3149280000 binary64) (*.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 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 y-scale y-scale)) (*.f64 (*.f64 a a) (/.f64 (*.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 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal -1/787320000 binary64))) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.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 (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 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)))) (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.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 (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 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.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 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 (*.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 (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 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale 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 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 (*.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 (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 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale 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 (*.f64 (*.f64 (*.f64 y-scale y-scale) (+.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (+.f64 (*.f64 (*.f64 a a) (/.f64 (*.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 (*.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 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 (*.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 (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 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale 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 (*.f64 a a) (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 a a) (/.f64 (*.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/4 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (pow.f64 (+.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (+.f64 (*.f64 (*.f64 a a) (/.f64 (*.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 (*.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 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 (*.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 (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 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale 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 #s(literal -1/2 binary64) (/.f64 (+.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.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 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 y-scale y-scale)) (*.f64 (*.f64 a a) (/.f64 (*.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 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal -1/787320000 binary64))) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.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 (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 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)))) (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.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 (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 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.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 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 (*.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 (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 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale 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 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 (*.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 (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 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale 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)))))))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 (*.f64 b b) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (+.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (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 a a) (/.f64 (*.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/4 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (pow.f64 (+.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (+.f64 (*.f64 (*.f64 a a) (/.f64 (*.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 (*.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 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 (*.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 (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 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale 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 #s(literal -1/2 binary64) (/.f64 (+.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.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 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 y-scale y-scale)) (*.f64 (*.f64 a a) (/.f64 (*.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 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal -1/787320000 binary64))) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.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 (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 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)))) (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.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 (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 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.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 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 (*.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 (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 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale 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 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 (*.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 (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 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale 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)))))))))) |
(* (/ (* (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 (+ a b) 2) (pow (- b a) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 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 (*.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 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 b b) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (sqrt.f64 (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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 b b) (pow.f64 (sin.f64 (*.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)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* 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 (+ a b) 2) (pow (- b a) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 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 (*.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 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 b b) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (sqrt.f64 (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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 b b) (pow.f64 (sin.f64 (*.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)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* 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 (+ a b) 2) (pow (- b a) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 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 (*.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 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 b b) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (sqrt.f64 (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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 b b) (pow.f64 (sin.f64 (*.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)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* 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 (+ a b) 2) (pow (- b a) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 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 (*.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 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 b b) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (sqrt.f64 (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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 b b) (pow.f64 (sin.f64 (*.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)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* 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 (+ a b) 2) (pow (- b a) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 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 (*.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 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 b b) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (sqrt.f64 (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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 b b) (pow.f64 (sin.f64 (*.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)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* 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 (+ a b) 2) (pow (- b a) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 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 (*.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 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 b b) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (sqrt.f64 (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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 b b) (pow.f64 (sin.f64 (*.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)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* 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 (+ a b) 2) (pow (- b a) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 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 (*.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 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 b b) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (sqrt.f64 (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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 b b) (pow.f64 (sin.f64 (*.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)) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* 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 (+ a b) 2) (pow (- b a) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 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 (*.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 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 b b) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (sqrt.f64 (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))))) |
(* 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 x-scale x-scale) (*.f64 y-scale y-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 x-scale) (*.f64 y-scale y-scale))) |
(* (pow b 4) (+ (* -16 (* (/ (* (pow a 4) (* b (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))))) (* (pow x-scale 4) (pow y-scale 4))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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 a 2) (pow (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 (*.f64 (*.f64 #s(literal -16 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) 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)) #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 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 x-scale x-scale) (*.f64 y-scale y-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 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 x-scale x-scale) (*.f64 y-scale y-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 x-scale) (*.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)))) (* b (+ (* -16 (* (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))))) (* (pow x-scale 4) (pow y-scale 4))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 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) (* b (- (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 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)))) (- (+ (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2))) (* (pow x-scale 4) (* (pow y-scale 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)))))))))))) (* (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 x-scale x-scale) (*.f64 y-scale y-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 x-scale) (*.f64 y-scale y-scale))) (*.f64 b (+.f64 (*.f64 (*.f64 #s(literal -16 binary64) (/.f64 (*.f64 (pow.f64 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)) #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 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 x-scale x-scale) (*.f64 y-scale y-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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) 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 #s(literal 1/2 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 x-scale x-scale) (*.f64 y-scale y-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 2 binary64) (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 0 binary64))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 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 x-scale x-scale) (*.f64 y-scale y-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 x-scale) (*.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)))) (* b (+ (* -16 (* (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))))) (* (pow x-scale 4) (pow y-scale 4))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* b (+ (* -4 (* (/ (* (pow a 4) (* b (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -2 (pow a 3)) (* 2 (pow a 3))) (- (+ (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2))) (* (pow x-scale 4) (* (pow y-scale 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)))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/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 (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))))) (* (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 x-scale x-scale) (*.f64 y-scale y-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 x-scale) (*.f64 y-scale y-scale))) (*.f64 b (+.f64 (*.f64 (*.f64 #s(literal -16 binary64) (/.f64 (*.f64 (pow.f64 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)) #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 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 x-scale x-scale) (*.f64 y-scale y-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 b (+.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) 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)) #s(literal 0 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 binary64)) (+.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 0 binary64))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 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 x-scale x-scale) (*.f64 y-scale y-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 x-scale x-scale) (*.f64 y-scale y-scale)) (+.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 x-scale x-scale) (*.f64 y-scale y-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)))))))) (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 x-scale x-scale) (*.f64 y-scale y-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 x-scale) (*.f64 y-scale y-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 #s(literal 1/2 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 x-scale x-scale) (*.f64 y-scale y-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 2 binary64) (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 0 binary64))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 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 x-scale x-scale) (*.f64 y-scale y-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 x-scale) (*.f64 y-scale y-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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) |
(* (pow b 6) (+ (* -16 (* (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))))) (* b (* (pow x-scale 4) (pow y-scale 4)))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 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 -16 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 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)) #s(literal 0 binary64)))) (*.f64 (*.f64 b (pow.f64 x-scale #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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 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))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) |
(* (pow b 6) (+ (* -16 (* (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))))) (* b (* (pow x-scale 4) (pow y-scale 4)))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (* 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 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (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 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))))) (* (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 -16 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 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)) #s(literal 0 binary64)))) (*.f64 (*.f64 b (pow.f64 x-scale #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal 8 binary64) (*.f64 (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) (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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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 2 binary64) (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 0 binary64))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))) |
(* (pow b 6) (+ (* -16 (* (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))))) (* b (* (pow x-scale 4) (pow y-scale 4)))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (* -4 (* (/ (* (pow a 4) (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -2 a) (* 2 a)) (- (+ (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 4) (* (pow y-scale 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)))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (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) (* (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 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (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 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))))) (* (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 (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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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 -16 binary64) (/.f64 (*.f64 (pow.f64 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)) #s(literal 0 binary64)))) (*.f64 (*.f64 b (pow.f64 x-scale #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))) (*.f64 #s(literal -4 binary64) (/.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)) #s(literal 0 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 binary64)) (+.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 0 binary64))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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 x-scale x-scale) (*.f64 y-scale y-scale)) (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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 (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (*.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) (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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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 2 binary64) (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 0 binary64))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) |
(* (pow b 6) (+ (* 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)))) (* 16 (* (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))))) (* b (* (pow x-scale 4) (pow y-scale 4)))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) |
(*.f64 (pow.f64 b #s(literal 6 binary64)) (+.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))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 16 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 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)) #s(literal 0 binary64)))) (*.f64 (*.f64 b (pow.f64 x-scale #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))))) |
(* (pow b 6) (+ (* -1 (/ (+ (* -16 (* (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))))) (* (pow x-scale 4) (pow y-scale 4))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -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 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (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 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))))) (* b (* (pow x-scale 2) (pow y-scale 2)))))) b)) (* 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 (*.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))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (+.f64 (*.f64 #s(literal -16 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 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)) #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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 -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)))) (*.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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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 2 binary64) (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 0 binary64))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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 (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)))) b))) |
(* (pow b 6) (+ (* -1 (/ (+ (* -16 (* (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))))) (* (pow x-scale 4) (pow y-scale 4))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (/ (+ (* 4 (* (/ (* (pow a 4) (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -2 a) (* 2 a)) (- (+ (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 4) (* (pow y-scale 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)))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* b (* (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 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (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 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow a 2)) (* 2 (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))))) (* (pow x-scale 2) (pow y-scale 2))))) b))) b)) (* 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 (*.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))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (-.f64 (*.f64 #s(literal -16 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 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)) #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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 (*.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)) #s(literal 0 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 binary64)) (+.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 0 binary64))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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 x-scale x-scale) (*.f64 y-scale y-scale)) (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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 (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)))) (/.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)))) (*.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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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 2 binary64) (*.f64 (*.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 0 binary64))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) b)) b))) |
(* 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 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-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 x-scale) (*.f64 y-scale y-scale))) |
(* (pow a 4) (+ (* -16 (* (/ (* a (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))))) (* (pow x-scale 4) (pow y-scale 4))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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 b 2) (pow (cos (* 1/180 (* 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 (*.f64 (*.f64 #s(literal -16 binary64) (/.f64 (*.f64 (*.f64 a (pow.f64 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)) #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-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 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 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-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 x-scale) (*.f64 y-scale y-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)))) (* a (+ (* -16 (* (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))))) (* (pow x-scale 4) (pow y-scale 4))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 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 (/ (* a (* (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 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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))) (- (/ (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) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2))) (* (pow x-scale 4) (* (pow y-scale 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)))))))))))) (* (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 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-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 x-scale) (*.f64 y-scale y-scale))) (*.f64 a (+.f64 (*.f64 (*.f64 #s(literal -16 binary64) (/.f64 (*.f64 (pow.f64 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)) #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-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 8 binary64) (*.f64 (*.f64 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) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-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 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)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 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 (*.f64 b b) #s(literal -2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 0 binary64))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-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 x-scale) (*.f64 y-scale y-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)))) (* a (+ (* -16 (* (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))))) (* (pow x-scale 4) (pow y-scale 4))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* a (+ (* -4 (* (/ (* a (* (pow b 4) (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -2 (pow b 3)) (* 2 (pow b 3))) (- (+ (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2))) (* (pow x-scale 4) (* (pow y-scale 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)))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/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))) (- (/ (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) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))))) (* (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 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-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 x-scale) (*.f64 y-scale y-scale))) (*.f64 a (+.f64 (*.f64 (*.f64 #s(literal -16 binary64) (/.f64 (*.f64 (pow.f64 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)) #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-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 a (+.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 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)) #s(literal 0 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 binary64)) (+.f64 (*.f64 #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)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 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 (*.f64 b b) #s(literal -2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 0 binary64))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-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 x-scale x-scale) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-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 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-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 x-scale) (*.f64 y-scale y-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) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-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 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)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 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 (*.f64 b b) #s(literal -2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 0 binary64))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-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 x-scale) (*.f64 y-scale y-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 (pow.f64 a #s(literal 6 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))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) |
(* (pow a 6) (+ (* -16 (* (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))))) (* a (* (pow x-scale 4) (pow y-scale 4)))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 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 -16 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 binary64)))) (*.f64 (*.f64 a (pow.f64 x-scale #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #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 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))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) |
(* (pow a 6) (+ (* -16 (* (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))))) (* a (* (pow x-scale 4) (pow y-scale 4)))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (* 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 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (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 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))))) (* (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 -16 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 binary64)))) (*.f64 (*.f64 a (pow.f64 x-scale #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal 8 binary64) (*.f64 (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) (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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #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 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)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 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 (*.f64 b b) #s(literal -2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 0 binary64))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #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 x-scale x-scale) (*.f64 y-scale y-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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))) |
(* (pow a 6) (+ (* -16 (* (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))))) (* a (* (pow x-scale 4) (pow y-scale 4)))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (* -4 (* (/ (* (pow b 4) (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -2 b) (* 2 b)) (- (+ (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 4) (* (pow y-scale 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)))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (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) (* (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 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (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 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))))) (* (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 (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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #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 -16 binary64) (/.f64 (*.f64 (pow.f64 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)) #s(literal 0 binary64)))) (*.f64 (*.f64 a (pow.f64 x-scale #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))) (*.f64 #s(literal -4 binary64) (/.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)) #s(literal 0 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 binary64)) (+.f64 (*.f64 #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)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 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 (*.f64 b b) #s(literal -2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 0 binary64))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #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 x-scale x-scale) (*.f64 y-scale y-scale)) (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #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 (*.f64 a a)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (*.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) (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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #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 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)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 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 (*.f64 b b) #s(literal -2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 0 binary64))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #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 x-scale x-scale) (*.f64 y-scale y-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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-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 (pow.f64 a #s(literal 6 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))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) |
(* (pow a 6) (+ (* 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)))) (* 16 (* (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))))) (* a (* (pow x-scale 4) (pow y-scale 4)))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) |
(*.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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 16 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 binary64)))) (*.f64 (*.f64 a (pow.f64 x-scale #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.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 6) (+ (* -1 (/ (+ (* -16 (* (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))))) (* (pow x-scale 4) (pow y-scale 4))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -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 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (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 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))))) (* a (* (pow x-scale 2) (pow y-scale 2)))))) a)) (* 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (+.f64 (*.f64 #s(literal -16 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #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 -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)))) (*.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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #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 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)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 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 (*.f64 b b) #s(literal -2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 0 binary64))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #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 (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)))) a))) |
(* (pow a 6) (+ (* -1 (/ (+ (* -16 (* (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))))) (* (pow x-scale 4) (pow y-scale 4))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (/ (+ (* 4 (* (/ (* (pow b 4) (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -2 b) (* 2 b)) (- (+ (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 4) (* (pow y-scale 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)))))))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* a (* (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 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (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 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-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) (+ (* -4 (pow b 2)) (* 2 (pow b 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 4) (* (pow y-scale 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))))))))))) (* (pow x-scale 2) (pow y-scale 2))))) a))) a)) (* 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (-.f64 (*.f64 #s(literal -16 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #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 (*.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)) #s(literal 0 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 binary64)) (+.f64 (*.f64 #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)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 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 (*.f64 b b) #s(literal -2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 0 binary64))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #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 x-scale x-scale) (*.f64 y-scale y-scale)) (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #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 (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)))) (/.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)))) (*.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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #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 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)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 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 (*.f64 b b) #s(literal -2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) #s(literal 0 binary64))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) a)) a))) |
(* 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 (+ a b) 2) (pow (- b a) 2)))) (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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) |
(/ (+ (* -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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 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 (+ a b) 2) (pow (- b a) 2)))) (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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 -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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 y-scale y-scale) (+.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 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (*.f64 y-scale y-scale))) (*.f64 x-scale x-scale)) |
(/ (+ (* 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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 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 (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (*.f64 y-scale y-scale)) (*.f64 (*.f64 x-scale x-scale) (+.f64 (/.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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 -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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (*.f64 y-scale y-scale) (+.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 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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 -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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 y-scale y-scale) (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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 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 (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (*.f64 y-scale y-scale)) (*.f64 (*.f64 x-scale x-scale) (+.f64 (/.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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 -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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (*.f64 y-scale y-scale) (+.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 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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 -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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 y-scale y-scale) (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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 -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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (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 -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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (+.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)))) #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 (*.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)) |
(* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (+.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) |
(/ (+ (* -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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #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 x-scale x-scale) (*.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 (*.f64 b b) (pow.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 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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (+.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))) (*.f64 y-scale y-scale))) (pow.f64 x-scale #s(literal 4 binary64))) |
(/ (+ (* -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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #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 x-scale x-scale) (*.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 (*.f64 b b) (pow.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 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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (+.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 3 binary64)))))) (pow.f64 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #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 x-scale x-scale) (*.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 (*.f64 b b) (pow.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 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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (+.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 3 binary64)))))) (/.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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) (/.f64 (*.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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (pow.f64 x-scale #s(literal 4 binary64))) |
(* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (+.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) |
(/ (+ (* -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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #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 x-scale x-scale) (*.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 (*.f64 b b) (pow.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 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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (+.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))) (*.f64 y-scale y-scale))) (pow.f64 x-scale #s(literal 4 binary64))) |
(/ (+ (* -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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #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 x-scale x-scale) (*.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 (*.f64 b b) (pow.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 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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (+.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 3 binary64)))))) (pow.f64 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #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 x-scale x-scale) (*.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 (*.f64 b b) (pow.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 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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (+.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 3 binary64)))))) (/.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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 4 binary64))) (/.f64 (*.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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))))) (pow.f64 x-scale #s(literal 4 binary64))) |
(* 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 (+ a b) 2) (pow (- b a) 2)))) (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 (*.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 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 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 (+ a b) 2) (pow (- b a) 2)))) (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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 x-scale x-scale) (+.f64 (*.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 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 (*.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 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (*.f64 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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 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 (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 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 (*.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 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (*.f64 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (*.f64 x-scale x-scale) (+.f64 (*.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 2 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (*.f64 (*.f64 y-scale y-scale) (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #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 (+ a b) 2) (pow (- b a) 2)))) (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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 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 (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 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 (*.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 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (*.f64 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (*.f64 x-scale x-scale) (+.f64 (*.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 y-scale y-scale) (+.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 3 binary64)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) #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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (*.f64 (*.f64 x-scale x-scale) (+.f64 (*.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 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* (pow x-scale 2) (pow y-scale 4)))) |
(/.f64 (*.f64 #s(literal 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (+.f64 (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.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 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) (*.f64 (*.f64 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))))) (*.f64 (*.f64 (*.f64 x-scale 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 #s(literal 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (+.f64 (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.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 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) (*.f64 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow x-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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))))) (*.f64 (*.f64 (*.f64 x-scale 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 (*.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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (+.f64 (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.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 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 (*.f64 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow x-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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))))) (*.f64 (*.f64 (*.f64 x-scale 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 (*.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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (+.f64 (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.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 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 (*.f64 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 3 binary64)))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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))) #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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) #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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)))))) (*.f64 (*.f64 (*.f64 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 (*.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)))))) (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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))) (* (pow x-scale 2) (pow y-scale 4)))) |
(/.f64 (*.f64 #s(literal 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (+.f64 (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.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 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) (*.f64 (*.f64 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))))) (*.f64 (*.f64 (*.f64 x-scale 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 #s(literal 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (+.f64 (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.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 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) (*.f64 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow x-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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))))) (*.f64 (*.f64 (*.f64 x-scale 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 (*.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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (+.f64 (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.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 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 (*.f64 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow x-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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* 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 (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))))) (*.f64 (*.f64 (*.f64 x-scale 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 (*.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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (+.f64 (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.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 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 (*.f64 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 3 binary64)))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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))) #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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))))) #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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)))))) (*.f64 (*.f64 (*.f64 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 (*.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)))))) (pow.f64 y-scale #s(literal 4 binary64))) |
(* 16 (/ (* (pow a 6) (pow b 4)) (* (pow x-scale 2) (pow y-scale 4)))) |
(/.f64 (*.f64 #s(literal 16 binary64) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 b #s(literal 4 binary64)))) (*.f64 (*.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 (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow 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 (*.f64 #s(literal 16 binary64) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 b #s(literal 4 binary64)))) (*.f64 (*.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 a a) (/.f64 (*.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 (*.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 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 (*.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 (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 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale 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 x-scale x-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 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 (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow 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 (*.f64 #s(literal 16 binary64) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 b #s(literal 4 binary64)))) (*.f64 (*.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 (*.f64 a a) (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 a a) (/.f64 (*.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 (*.f64 #s(literal -1/3149280000 binary64) (*.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 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 y-scale y-scale)) (*.f64 (*.f64 a a) (/.f64 (*.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 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal -1/787320000 binary64))) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.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 (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 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)))) (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.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 (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 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.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 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 (*.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 (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 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale 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 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 (*.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 (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 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale 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 a a) (/.f64 (*.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 (*.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 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 (*.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 (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 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale 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 (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow 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 (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- b a) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow (+ a b) 2) (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow 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 (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 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 (*.f64 #s(literal 16 binary64) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 b #s(literal 4 binary64)))) (*.f64 (*.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 a a) (/.f64 (*.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 (*.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 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 (*.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 (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 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale 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 x-scale x-scale) (*.f64 y-scale y-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 (*.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 (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 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)))) (-.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.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 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 y-scale y-scale)) (*.f64 (*.f64 a a) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 y-scale y-scale)))))) (*.f64 (-.f64 (+.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 b b) (/.f64 (*.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 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))) (*.f64 #s(literal 4 binary64) (+.f64 (/.f64 (*.f64 #s(literal 1/102036672000000 binary64) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (+.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 (*.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 (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 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale 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 (*.f64 #s(literal -1/3149280000 binary64) (*.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 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 y-scale y-scale)) (*.f64 (*.f64 a a) (/.f64 (*.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 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal -1/787320000 binary64))) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.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 (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 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)))) (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.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 (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 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.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 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 (*.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 (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 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale 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 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 (*.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 (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 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale 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 (*.f64 a a) (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 a a) (/.f64 (*.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 (*.f64 #s(literal -1/3149280000 binary64) (*.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 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 y-scale y-scale)) (*.f64 (*.f64 a a) (/.f64 (*.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 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal -1/787320000 binary64))) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.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 (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 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale)))) (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (/.f64 (*.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 (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 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.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 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 (*.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 (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 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale 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 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 (*.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 (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 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale 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 (+ a b) 2) (pow (- b a) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)))))) (* (pow x-scale 2) (pow y-scale 2)))) |
(/.f64 (*.f64 #s(literal 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (-.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 b b) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (sqrt.f64 (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 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 (+ a b) 2) (pow (- b a) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)))))) (* (pow x-scale 2) (pow y-scale 2)))) |
(/.f64 (*.f64 #s(literal 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (-.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 b b) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (sqrt.f64 (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 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 (+ a b) 2) (pow (- b a) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)))))) (* (pow x-scale 2) (pow y-scale 2)))) |
(/.f64 (*.f64 #s(literal 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (-.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 b b) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (sqrt.f64 (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 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 (+ a b) 2) (pow (- b a) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)))))) (* (pow x-scale 2) (pow y-scale 2)))) |
(/.f64 (*.f64 #s(literal 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (-.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 b b) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (sqrt.f64 (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 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 (+ a b) 2) (pow (- b a) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)))))) (* (pow x-scale 2) (pow y-scale 2)))) |
(/.f64 (*.f64 #s(literal 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (-.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 b b) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (sqrt.f64 (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 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 (+ a b) 2) (pow (- b a) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)))))) (* (pow x-scale 2) (pow y-scale 2)))) |
(/.f64 (*.f64 #s(literal 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (-.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 b b) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (sqrt.f64 (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 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 (+ a b) 2) (pow (- b a) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)))))) (* (pow x-scale 2) (pow y-scale 2)))) |
(/.f64 (*.f64 #s(literal 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (-.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 b b) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (sqrt.f64 (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 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 (+ a b) 2) (pow (- b a) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)))))) (* (pow x-scale 2) (pow y-scale 2)))) |
(/.f64 (*.f64 #s(literal 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (-.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 b b) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))) (sqrt.f64 (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-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 x-scale x-scale) (*.f64 y-scale y-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 x-scale x-scale) (*.f64 y-scale y-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 x-scale x-scale) (*.f64 y-scale y-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 x-scale x-scale) (*.f64 y-scale y-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 x-scale x-scale) (*.f64 y-scale y-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 x-scale x-scale) (*.f64 y-scale y-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 x-scale x-scale) (*.f64 y-scale y-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 x-scale x-scale) (*.f64 y-scale y-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 x-scale x-scale) (*.f64 y-scale y-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 x-scale x-scale) (*.f64 y-scale y-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 x-scale x-scale) (*.f64 y-scale y-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 x-scale x-scale) (*.f64 y-scale y-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 x-scale x-scale) (*.f64 y-scale y-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 x-scale x-scale) (*.f64 y-scale y-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 x-scale x-scale) (*.f64 y-scale y-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 x-scale x-scale) (*.f64 y-scale y-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 x-scale x-scale) (*.f64 y-scale y-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 x-scale x-scale) (*.f64 y-scale y-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 x-scale x-scale) (*.f64 y-scale y-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 x-scale x-scale) (*.f64 y-scale y-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 x-scale x-scale) (*.f64 y-scale y-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 x-scale x-scale) (*.f64 y-scale y-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 x-scale x-scale) (*.f64 y-scale y-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 x-scale x-scale) (*.f64 y-scale y-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 x-scale x-scale) (*.f64 y-scale y-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 x-scale x-scale) (*.f64 y-scale y-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 x-scale x-scale) (*.f64 y-scale y-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 x-scale x-scale) (*.f64 y-scale y-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 x-scale x-scale) (*.f64 y-scale y-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 x-scale x-scale) (*.f64 y-scale y-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 x-scale x-scale) (*.f64 y-scale y-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 x-scale x-scale) (*.f64 y-scale y-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 x-scale x-scale) (*.f64 y-scale y-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 x-scale x-scale) (*.f64 y-scale y-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 x-scale x-scale) (*.f64 y-scale y-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 x-scale x-scale) (*.f64 y-scale y-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 x-scale x-scale) (*.f64 y-scale y-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 x-scale x-scale) (*.f64 y-scale y-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 x-scale x-scale) (*.f64 y-scale y-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 x-scale x-scale) (*.f64 y-scale y-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 x-scale x-scale) (*.f64 y-scale y-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 x-scale x-scale) (*.f64 y-scale y-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 x-scale x-scale) (*.f64 y-scale y-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 x-scale x-scale) (*.f64 y-scale y-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 x-scale x-scale) (*.f64 y-scale y-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 x-scale x-scale) (*.f64 y-scale y-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 x-scale x-scale) (*.f64 y-scale y-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 x-scale x-scale) (*.f64 y-scale y-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 #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)))) |
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) |
(/.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) |
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) |
(/.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) |
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) |
(/.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) |
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) |
(/.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) |
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) |
(/.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) |
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) |
(/.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) |
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) |
(/.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) |
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) |
(/.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) |
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) |
(/.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) |
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) |
(/.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) |
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) |
(/.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) |
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) |
(/.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) |
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) |
(/.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) |
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) |
(/.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) |
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) |
(/.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) |
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) |
(/.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) |
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) |
(/.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) |
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) |
(/.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) |
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) |
(/.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) |
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) |
(/.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) |
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) |
(/.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) |
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) |
(/.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) |
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) |
(/.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) |
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) |
(/.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) |
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) |
(/.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) |
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) |
(/.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) |
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) |
(/.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) |
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) |
(/.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) |
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) |
(/.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) |
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) |
(/.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) |
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) |
(/.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) |
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) |
(/.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) |
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) |
(/.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) |
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) |
(/.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) |
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) |
(/.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) |
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) |
(/.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) |
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) |
(/.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) |
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) |
(/.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) |
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) |
(/.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) |
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) |
(/.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) |
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) |
(/.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) |
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) |
(/.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) |
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) |
(/.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) |
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) |
(/.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) |
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) |
(/.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) |
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) |
(/.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) |
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) |
(/.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) |
(/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))) |
(/.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) |
(* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 a a) (*.f64 b b))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) |
(* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 a a) (*.f64 b b))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) |
(* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 a a) (*.f64 b b))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) |
(* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 a a) (*.f64 b b))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) |
(* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 a a) (*.f64 b b))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) |
(* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 a a) (*.f64 b b))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) |
(* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 a a) (*.f64 b b))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) |
(* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 a a) (*.f64 b b))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) |
(* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 a a) (*.f64 b b))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) |
(* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 a a) (*.f64 b b))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) |
(* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 a a) (*.f64 b b))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) |
(* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 a a) (*.f64 b b))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) |
(* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 a a) (*.f64 b b))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) |
(* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 a a) (*.f64 b b))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) |
(* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 a a) (*.f64 b b))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) |
(* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 a a) (*.f64 b b))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) |
(* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 a a) (*.f64 b b))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) |
(* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 a a) (*.f64 b b))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) |
(* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 a a) (*.f64 b b))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) |
(* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 a a) (*.f64 b b))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) |
(* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 a a) (*.f64 b b))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) |
(* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 a a) (*.f64 b b))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) |
(* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 a a) (*.f64 b b))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) |
(* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 a a) (*.f64 b b))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) |
(* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 a a) (*.f64 b b))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) |
(* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 a a) (*.f64 b b))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) |
(* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 a a) (*.f64 b b))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) |
(* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 a a) (*.f64 b b))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) |
(* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 a a) (*.f64 b b))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) |
(* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 a a) (*.f64 b b))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) |
(* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 a a) (*.f64 b b))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) |
(* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 a a) (*.f64 b b))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) |
(* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 a a) (*.f64 b b))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) |
(* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 a a) (*.f64 b b))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) |
(* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 a a) (*.f64 b b))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) |
(* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 a a) (*.f64 b b))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) |
(* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 a a) (*.f64 b b))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) |
(* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 a a) (*.f64 b b))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) |
(* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 a a) (*.f64 b b))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) |
(* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 a a) (*.f64 b b))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) |
(* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 a a) (*.f64 b b))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) |
(* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 a a) (*.f64 b b))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) |
(* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 a a) (*.f64 b b))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) |
(* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 a a) (*.f64 b b))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) |
(* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 a a) (*.f64 b b))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) |
(* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 a a) (*.f64 b b))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) |
(* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 a a) (*.f64 b b))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) |
(* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) |
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 a a) (*.f64 b b))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) |
Compiled 280265 to 5592 computations (98% saved)
16 alts after pruning (16 fresh and 0 done)
| Pruned | Kept | Total | |
|---|---|---|---|
| New | 930 | 16 | 946 |
| Fresh | 0 | 0 | 0 |
| Picked | 1 | 0 | 1 |
| Done | 0 | 0 | 0 |
| Total | 931 | 16 | 947 |
| Status | Accuracy | Program |
|---|---|---|
| 1.7% | (/.f64 (/.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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (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 (*.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 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))))) (*.f64 x-scale (+.f64 (*.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) (*.f64 (*.f64 b b) (sqrt.f64 #s(literal 8 binary64)))) x-scale) (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 (*.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 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))))) y-scale) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 b a)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) | |
| ▶ | 2.6% | (/.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 4 binary64) (*.f64 a (*.f64 b (*.f64 b a)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) |
| 0.2% | (/.f64 (/.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 (*.f64 b 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 a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 0 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 x-scale y-scale) (*.f64 (+.f64 b a) (*.f64 #s(literal 2 binary64) (-.f64 b a))))))))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (*.f64 b (*.f64 a (*.f64 b a))) (*.f64 x-scale (*.f64 y-scale y-scale)))) | |
| 0.2% | (/.f64 (/.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 (*.f64 b 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 a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 0 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 x-scale y-scale) (*.f64 (+.f64 b a) (*.f64 #s(literal 2 binary64) (-.f64 b a))))))))) #s(literal 4 binary64)) (*.f64 (/.f64 (*.f64 a (*.f64 b b)) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale))))) | |
| 1.8% | (/.f64 (*.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) (pow.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.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) (*.f64 a (*.f64 b (*.f64 b a)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) | |
| 0.2% | (/.f64 (sqrt.f64 (/.f64 (*.f64 #s(literal 16 binary64) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 b #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale x-scale) (pow.f64 y-scale #s(literal 4 binary64))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 b a)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) | |
| ▶ | 0.2% | (/.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 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b (*.f64 a (*.f64 (*.f64 b 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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 0 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 x-scale y-scale) (*.f64 (+.f64 b a) (*.f64 #s(literal 2 binary64) (-.f64 b a))))))) (/.f64 (*.f64 b (*.f64 a (*.f64 (*.f64 b 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 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 b a)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) |
| 3.0% | (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.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 b b) (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 #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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))) | |
| ▶ | 3.1% | (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (-.f64 (*.f64 (*.f64 b b) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 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 x-scale x-scale) (*.f64 y-scale y-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))))))) | |
| ▶ | 6.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 (*.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 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) |
| 7.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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) | |
| 3.4% | (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.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 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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.5% | (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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.1% | (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 a (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) | |
| ▶ | 32.3% | (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
Compiled 5334 to 1502 computations (71.8% saved)
| 1× | egg-herbie |
Found 20 expressions of interest:
| New | Metric | Score | Program |
|---|---|---|---|
| ✓ | cost-diff | 0 | (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) |
| ✓ | cost-diff | 0 | (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) |
| ✓ | cost-diff | 0 | (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) |
| ✓ | cost-diff | 0 | (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.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 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) |
| ✓ | cost-diff | 0 | (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) |
| ✓ | cost-diff | 0 | (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) |
| ✓ | cost-diff | 0 | (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) |
| ✓ | cost-diff | 0 | (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (-.f64 (*.f64 (*.f64 b b) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))))) |
| ✓ | cost-diff | 0 | (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 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b (*.f64 a (*.f64 (*.f64 b 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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 0 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 x-scale y-scale) (*.f64 (+.f64 b a) (*.f64 #s(literal 2 binary64) (-.f64 b a))))))) (/.f64 (*.f64 b (*.f64 a (*.f64 (*.f64 b a) #s(literal 8 binary64)))) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 b (*.f64 a (*.f64 b a)))))))) |
| ✓ | cost-diff | 0 | (/.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 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b (*.f64 a (*.f64 (*.f64 b 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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 0 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 x-scale y-scale) (*.f64 (+.f64 b a) (*.f64 #s(literal 2 binary64) (-.f64 b a))))))) (/.f64 (*.f64 b (*.f64 a (*.f64 (*.f64 b 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 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 b a)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) |
| ✓ | cost-diff | 128 | (+.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 0 binary64)) |
| ✓ | cost-diff | 1664 | (+.f64 (*.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b (*.f64 a (*.f64 (*.f64 b 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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 0 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 x-scale y-scale) (*.f64 (+.f64 b a) (*.f64 #s(literal 2 binary64) (-.f64 b a))))))) (/.f64 (*.f64 b (*.f64 a (*.f64 (*.f64 b a) #s(literal 8 binary64)))) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 b (*.f64 a (*.f64 b a))))))) |
| ✓ | cost-diff | 0 | (*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) |
| ✓ | cost-diff | 0 | (*.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) |
| ✓ | cost-diff | 0 | (/.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))) |
| ✓ | cost-diff | 0 | (/.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 4 binary64) (*.f64 a (*.f64 b (*.f64 b a)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) |
| ✓ | cost-diff | 0 | (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) |
| ✓ | cost-diff | 0 | (*.f64 a x-scale) |
| ✓ | cost-diff | 0 | (*.f64 (*.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) |
| ✓ | cost-diff | 0 | (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
| 6770× | *-lowering-*.f32 |
| 6770× | *-lowering-*.f64 |
| 3892× | /-lowering-/.f32 |
| 3892× | /-lowering-/.f64 |
| 1756× | +-lowering-+.f64 |
Useful iterations: 3 (0.0ms)
| Iter | Nodes | Cost |
|---|---|---|
| 0 | 130 | 3374 |
| 1 | 441 | 3112 |
| 2 | 2344 | 2983 |
| 3 | 7407 | 2961 |
| 0 | 8133 | 2961 |
| 1× | iter limit |
| 1× | node limit |
| Inputs |
|---|
(* 1/4 (* (* a x-scale) (* (sqrt 2) (sqrt 8)))) |
1/4 |
(* (* a x-scale) (* (sqrt 2) (sqrt 8))) |
(* a x-scale) |
a |
x-scale |
(* (sqrt 2) (sqrt 8)) |
(sqrt 2) |
2 |
(sqrt 8) |
8 |
(/ (/ (* (* (* a (* a a)) (* b b)) (* (sqrt 2) (sqrt 8))) (* x-scale (* y-scale y-scale))) (/ (* 4 (* a (* b (* b a)))) (* x-scale (* x-scale (* y-scale y-scale))))) |
(/ (* (* (* a (* a a)) (* b b)) (* (sqrt 2) (sqrt 8))) (* x-scale (* y-scale y-scale))) |
(* (* (* a (* a a)) (* b b)) (* (sqrt 2) (sqrt 8))) |
(* (* a (* a a)) (* b b)) |
(* a (* a a)) |
a |
(* a a) |
(* b b) |
b |
(* (sqrt 2) (sqrt 8)) |
(sqrt 2) |
2 |
(sqrt 8) |
8 |
(* x-scale (* y-scale y-scale)) |
x-scale |
(* y-scale y-scale) |
y-scale |
(/ (* 4 (* a (* b (* b a)))) (* x-scale (* x-scale (* y-scale y-scale)))) |
(* 4 (* a (* b (* b a)))) |
4 |
(* a (* b (* b a))) |
(* b (* b a)) |
(* b a) |
(* x-scale (* x-scale (* y-scale y-scale))) |
(/ (sqrt (+ (* (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))))) (* x-scale x-scale)) (/ (* b (* a (* (* b a) 8))) (/ (* x-scale (* x-scale (* y-scale y-scale))) (* b (* a (* b a)))))) (* (- (/ (+ (* (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))) (* a a)) (* (* b b) (- 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))))) (* x-scale x-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))) (* a a)) (* (* b b) (- 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))))) (* y-scale y-scale))) (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))))) (* x-scale x-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))) (* a a)) (* (* b b) (- 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))))) (* y-scale y-scale)))) (* (/ (/ (+ (sin (* (* angle (PI)) 1/90)) 0) 2) (/ (* x-scale y-scale) (* (+ b a) (* 2 (- b a))))) (/ (/ (+ (sin (* (* angle (PI)) 1/90)) 0) 2) (/ (* x-scale y-scale) (* (+ b a) (* 2 (- b a))))))))) (/ (* b (* a (* (* b a) 8))) (/ (* x-scale (* x-scale (* y-scale y-scale))) (* b (* a (* b a)))))))) (/ (* 4 (* a (* b (* b a)))) (* x-scale (* x-scale (* y-scale y-scale))))) |
(sqrt (+ (* (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))))) (* x-scale x-scale)) (/ (* b (* a (* (* b a) 8))) (/ (* x-scale (* x-scale (* y-scale y-scale))) (* b (* a (* b a)))))) (* (- (/ (+ (* (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))) (* a a)) (* (* b b) (- 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))))) (* x-scale x-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))) (* a a)) (* (* b b) (- 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))))) (* y-scale y-scale))) (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))))) (* x-scale x-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))) (* a a)) (* (* b b) (- 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))))) (* y-scale y-scale)))) (* (/ (/ (+ (sin (* (* angle (PI)) 1/90)) 0) 2) (/ (* x-scale y-scale) (* (+ b a) (* 2 (- b a))))) (/ (/ (+ (sin (* (* angle (PI)) 1/90)) 0) 2) (/ (* x-scale y-scale) (* (+ b a) (* 2 (- b a))))))))) (/ (* b (* a (* (* b a) 8))) (/ (* x-scale (* x-scale (* y-scale y-scale))) (* b (* a (* b a)))))))) |
(+ (* (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))))) (* x-scale x-scale)) (/ (* b (* a (* (* b a) 8))) (/ (* x-scale (* x-scale (* y-scale y-scale))) (* b (* a (* b a)))))) (* (- (/ (+ (* (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))) (* a a)) (* (* b b) (- 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))))) (* x-scale x-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))) (* a a)) (* (* b b) (- 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))))) (* y-scale y-scale))) (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))))) (* x-scale x-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))) (* a a)) (* (* b b) (- 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))))) (* y-scale y-scale)))) (* (/ (/ (+ (sin (* (* angle (PI)) 1/90)) 0) 2) (/ (* x-scale y-scale) (* (+ b a) (* 2 (- b a))))) (/ (/ (+ (sin (* (* angle (PI)) 1/90)) 0) 2) (/ (* x-scale y-scale) (* (+ b a) (* 2 (- b a))))))))) (/ (* b (* a (* (* b a) 8))) (/ (* x-scale (* x-scale (* y-scale y-scale))) (* b (* a (* b a))))))) |
(* (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))))) (* x-scale x-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 (* (* angle (PI)) 1/90))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))))) (* x-scale x-scale)) |
(+ (* (* a a) (- 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))))) |
(* (* a a) (- 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90))))) |
(* a a) |
a |
(- 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 |
(* (* b b) (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90))))) |
(* b b) |
b |
(+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))) |
(* x-scale x-scale) |
x-scale |
(/ (* b (* a (* (* b a) 8))) (/ (* x-scale (* x-scale (* y-scale y-scale))) (* b (* a (* b a))))) |
(* b (* a (* (* b a) 8))) |
(* a (* (* b a) 8)) |
(* (* b a) 8) |
(* b a) |
8 |
(/ (* x-scale (* x-scale (* y-scale y-scale))) (* b (* a (* b a)))) |
(* x-scale (* x-scale (* y-scale y-scale))) |
(* x-scale (* y-scale y-scale)) |
(* y-scale y-scale) |
y-scale |
(* b (* a (* b a))) |
(* a (* b a)) |
(* (- (/ (+ (* (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))) (* a a)) (* (* b b) (- 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))))) (* x-scale x-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))) (* a a)) (* (* b b) (- 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))))) (* y-scale y-scale))) (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))))) (* x-scale x-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))) (* a a)) (* (* b b) (- 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))))) (* y-scale y-scale)))) (* (/ (/ (+ (sin (* (* angle (PI)) 1/90)) 0) 2) (/ (* x-scale y-scale) (* (+ b a) (* 2 (- b a))))) (/ (/ (+ (sin (* (* angle (PI)) 1/90)) 0) 2) (/ (* x-scale y-scale) (* (+ b a) (* 2 (- b a))))))))) (/ (* b (* a (* (* b a) 8))) (/ (* x-scale (* x-scale (* y-scale y-scale))) (* b (* a (* b a)))))) |
(- (/ (+ (* (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))) (* a a)) (* (* b b) (- 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))))) (* x-scale x-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))) (* a a)) (* (* b b) (- 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))))) (* y-scale y-scale))) (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))))) (* x-scale x-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))) (* a a)) (* (* b b) (- 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))))) (* y-scale y-scale)))) (* (/ (/ (+ (sin (* (* angle (PI)) 1/90)) 0) 2) (/ (* x-scale y-scale) (* (+ b a) (* 2 (- b a))))) (/ (/ (+ (sin (* (* angle (PI)) 1/90)) 0) 2) (/ (* x-scale y-scale) (* (+ b a) (* 2 (- b a))))))))) |
(/ (+ (* (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))) (* a a)) (* (* b b) (- 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))))) (* y-scale y-scale)) |
(+ (* (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))) (* a a)) (* (* b b) (- 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))))) |
(* (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))) (* a a)) |
(* (* b b) (- 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90))))) |
(sqrt (+ (* (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))))) (* x-scale x-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))) (* a a)) (* (* b b) (- 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))))) (* y-scale y-scale))) (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))))) (* x-scale x-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))) (* a a)) (* (* b b) (- 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))))) (* y-scale y-scale)))) (* (/ (/ (+ (sin (* (* angle (PI)) 1/90)) 0) 2) (/ (* x-scale y-scale) (* (+ b a) (* 2 (- b a))))) (/ (/ (+ (sin (* (* angle (PI)) 1/90)) 0) 2) (/ (* x-scale y-scale) (* (+ b a) (* 2 (- b a)))))))) |
(- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))))) (* x-scale x-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))) (* a a)) (* (* b b) (- 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))))) (* y-scale y-scale))) |
(/ (/ (+ (sin (* (* angle (PI)) 1/90)) 0) 2) (/ (* x-scale y-scale) (* (+ b a) (* 2 (- b a))))) |
(/ (+ (sin (* (* angle (PI)) 1/90)) 0) 2) |
(+ (sin (* (* angle (PI)) 1/90)) 0) |
(sin (* (* angle (PI)) 1/90)) |
0 |
2 |
(/ (* x-scale y-scale) (* (+ b a) (* 2 (- b a)))) |
(* x-scale y-scale) |
(* (+ b a) (* 2 (- b a))) |
(+ b a) |
(* 2 (- b a)) |
(- b a) |
(/ (* 4 (* a (* b (* b a)))) (* x-scale (* x-scale (* y-scale y-scale)))) |
(* 4 (* a (* b (* b a)))) |
4 |
(* a (* b (* b a))) |
(* b (* b a)) |
(* (* 1/4 (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (* (* b b) (+ (/ (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 b 4) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (* x-scale x-scale) (* y-scale y-scale))) (pow (* (* b b) (- (/ (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 (* x-scale (* y-scale (sqrt 8)))) |
1/4 |
(* x-scale (* y-scale (sqrt 8))) |
x-scale |
(* y-scale (sqrt 8)) |
y-scale |
(sqrt 8) |
8 |
(sqrt (- (* (* b b) (+ (/ (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 b 4) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (* x-scale x-scale) (* y-scale y-scale))) (pow (* (* b b) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)))) 2))))) |
(- (* (* b b) (+ (/ (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 b 4) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (* x-scale x-scale) (* y-scale y-scale))) (pow (* (* b b) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)))) 2)))) |
(* (* b b) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)))) |
(* b b) |
b |
(+ (/ (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 b 4) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (* x-scale x-scale) (* y-scale y-scale))) (pow (* (* b b) (- (/ (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 b 4) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (* x-scale x-scale) (* y-scale y-scale))) (pow (* (* b b) (- (/ (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 b 4) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (* x-scale x-scale) (* y-scale y-scale))) |
(* 4 (* (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))) |
4 |
(* (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)) |
(* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 2)) |
(pow b 4) |
(* (* x-scale x-scale) (* y-scale y-scale)) |
(pow (* (* b b) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)))) 2) |
(* (* b b) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)))) |
(- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) |
(* (* 1/4 (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (+ (/ (* (* a a) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) (/ (* (* b b) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale))) (* -1/2 (/ (+ (* (* -2 (+ (* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (* b b) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (/ (* (* a a) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) (/ (* (* b b) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)))) (/ (* 4 (* (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (* (+ a b) (+ a b)) (* (- b a) (- b a))))) (* x-scale x-scale))) (+ (* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (* b b) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
1/4 |
(* x-scale (* y-scale (sqrt 8))) |
x-scale |
(* y-scale (sqrt 8)) |
y-scale |
(sqrt 8) |
8 |
(sqrt (+ (+ (/ (* (* a a) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) (/ (* (* b b) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale))) (* -1/2 (/ (+ (* (* -2 (+ (* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (* b b) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (/ (* (* a a) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) (/ (* (* b b) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)))) (/ (* 4 (* (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (* (+ a b) (+ a b)) (* (- b a) (- b a))))) (* x-scale x-scale))) (+ (* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (* b b) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) |
(+ (+ (/ (* (* a a) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) (/ (* (* b b) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale))) (* -1/2 (/ (+ (* (* -2 (+ (* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (* b b) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (/ (* (* a a) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) (/ (* (* b b) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)))) (/ (* 4 (* (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (* (+ a b) (+ a b)) (* (- b a) (- b a))))) (* x-scale x-scale))) (+ (* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (* b b) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) |
(+ (/ (* (* a a) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) (/ (* (* b b) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale))) |
(/ (* (* a a) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) |
(* (* a a) (pow (sin (* 1/180 (* angle (PI)))) 2)) |
(* a a) |
a |
(pow (sin (* 1/180 (* angle (PI)))) 2) |
(sin (* 1/180 (* angle (PI)))) |
(* 1/180 (* angle (PI))) |
1/180 |
(* angle (PI)) |
angle |
(PI) |
2 |
(* x-scale x-scale) |
(/ (* (* b b) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) |
(* (* b b) (pow (cos (* 1/180 (* angle (PI)))) 2)) |
(* b b) |
b |
(pow (cos (* 1/180 (* angle (PI)))) 2) |
(cos (* 1/180 (* angle (PI)))) |
(* -1/2 (/ (+ (* (* -2 (+ (* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (* b b) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (/ (* (* a a) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) (/ (* (* b b) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)))) (/ (* 4 (* (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (* (+ a b) (+ a b)) (* (- b a) (- b a))))) (* x-scale x-scale))) (+ (* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (* b b) (pow (sin (* 1/180 (* angle (PI)))) 2))))) |
-1/2 |
(/ (+ (* (* -2 (+ (* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (* b b) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (/ (* (* a a) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) (/ (* (* b b) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)))) (/ (* 4 (* (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (* (+ a b) (+ a b)) (* (- b a) (- b a))))) (* x-scale x-scale))) (+ (* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (* b b) (pow (sin (* 1/180 (* angle (PI)))) 2)))) |
(+ (* (* -2 (+ (* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (* b b) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (/ (* (* a a) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) (/ (* (* b b) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)))) (/ (* 4 (* (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (* (+ a b) (+ a b)) (* (- b a) (- b a))))) (* x-scale x-scale))) |
(* (* -2 (+ (* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (* b b) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (/ (* (* a a) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) (/ (* (* b b) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)))) |
(* -2 (+ (* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (* b b) (pow (sin (* 1/180 (* angle (PI)))) 2)))) |
-2 |
(+ (* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (* b b) (pow (sin (* 1/180 (* angle (PI)))) 2))) |
(* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2)) |
(* (* b b) (pow (sin (* 1/180 (* angle (PI)))) 2)) |
(/ (* 4 (* (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (* (+ a b) (+ a b)) (* (- b a) (- b a))))) (* x-scale x-scale)) |
(* 4 (* (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (* (+ a b) (+ a b)) (* (- b a) (- b a))))) |
4 |
(* (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (* (+ a b) (+ a b)) (* (- b a) (- b a)))) |
(* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) |
(* (* (+ a b) (+ a b)) (* (- b a) (- b a))) |
(* (+ a b) (+ a b)) |
(+ a b) |
(* (- b a) (- b a)) |
(- b a) |
| Outputs |
|---|
(* 1/4 (* (* a x-scale) (* (sqrt 2) (sqrt 8)))) |
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 #s(literal 1/4 binary64) (*.f64 a x-scale))) |
1/4 |
#s(literal 1/4 binary64) |
(* (* a x-scale) (* (sqrt 2) (sqrt 8))) |
(*.f64 (*.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) |
(* a x-scale) |
(*.f64 a x-scale) |
a |
x-scale |
(* (sqrt 2) (sqrt 8)) |
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) |
(sqrt 2) |
(sqrt.f64 #s(literal 2 binary64)) |
2 |
#s(literal 2 binary64) |
(sqrt 8) |
(sqrt.f64 #s(literal 8 binary64)) |
8 |
#s(literal 8 binary64) |
(/ (/ (* (* (* a (* a a)) (* b b)) (* (sqrt 2) (sqrt 8))) (* x-scale (* y-scale y-scale))) (/ (* 4 (* a (* b (* b a)))) (* x-scale (* x-scale (* y-scale y-scale))))) |
(/.f64 (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a (*.f64 a (*.f64 b (*.f64 a b)))))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 a (*.f64 b (*.f64 a b))) x-scale)) (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 x-scale (*.f64 y-scale y-scale)))) |
(/ (* (* (* a (* a a)) (* b b)) (* (sqrt 2) (sqrt 8))) (* x-scale (* y-scale y-scale))) |
(*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) (*.f64 x-scale y-scale)) (/.f64 (*.f64 a (*.f64 a (*.f64 b (*.f64 a b)))) y-scale)) |
(* (* (* a (* a a)) (* b b)) (* (sqrt 2) (sqrt 8))) |
(*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a (*.f64 a (*.f64 b (*.f64 a b)))))) |
(* (* a (* a a)) (* b b)) |
(*.f64 a (*.f64 a (*.f64 b (*.f64 a b)))) |
(* a (* a a)) |
(*.f64 a (*.f64 a a)) |
a |
(* a a) |
(*.f64 a a) |
(* b b) |
(*.f64 b b) |
b |
(* (sqrt 2) (sqrt 8)) |
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))) |
(sqrt 2) |
(sqrt.f64 #s(literal 2 binary64)) |
2 |
#s(literal 2 binary64) |
(sqrt 8) |
(sqrt.f64 #s(literal 8 binary64)) |
8 |
#s(literal 8 binary64) |
(* 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 (* x-scale (* y-scale y-scale)))) |
(/.f64 (*.f64 a (*.f64 (*.f64 b (*.f64 a b)) #s(literal 4 binary64))) (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale)))) |
(* 4 (* a (* b (* b a)))) |
(*.f64 a (*.f64 (*.f64 b (*.f64 a b)) #s(literal 4 binary64))) |
4 |
#s(literal 4 binary64) |
(* 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 (* x-scale (* y-scale y-scale))) |
(*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale))) |
(/ (sqrt (+ (* (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))))) (* x-scale x-scale)) (/ (* b (* a (* (* b a) 8))) (/ (* x-scale (* x-scale (* y-scale y-scale))) (* b (* a (* b a)))))) (* (- (/ (+ (* (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))) (* a a)) (* (* b b) (- 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))))) (* x-scale x-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))) (* a a)) (* (* b b) (- 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))))) (* y-scale y-scale))) (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))))) (* x-scale x-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))) (* a a)) (* (* b b) (- 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))))) (* y-scale y-scale)))) (* (/ (/ (+ (sin (* (* angle (PI)) 1/90)) 0) 2) (/ (* x-scale y-scale) (* (+ b a) (* 2 (- b a))))) (/ (/ (+ (sin (* (* angle (PI)) 1/90)) 0) 2) (/ (* x-scale y-scale) (* (+ b a) (* 2 (- b a))))))))) (/ (* b (* a (* (* b a) 8))) (/ (* x-scale (* x-scale (* y-scale y-scale))) (* b (* a (* b a)))))))) (/ (* 4 (* a (* b (* b a)))) (* x-scale (* x-scale (* y-scale y-scale))))) |
(/.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 b (*.f64 a b))) #s(literal 8 binary64)) (/.f64 (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale))) (*.f64 a (*.f64 b (*.f64 a b))))) (+.f64 (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal -1/2 binary64))))) (*.f64 (+.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1 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 #s(literal 1/90 binary64) angle) (PI.f64)))))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal -1/2 binary64)))))) (*.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal -1/2 binary64))))) (*.f64 (+.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1 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 #s(literal 1/90 binary64) angle) (PI.f64)))))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal -1/2 binary64)))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) (*.f64 y-scale #s(literal 2 binary64))) (*.f64 (-.f64 b a) (*.f64 #s(literal 2 binary64) (+.f64 a b)))) x-scale)))))) (/.f64 (*.f64 a (*.f64 (*.f64 b (*.f64 a b)) #s(literal 4 binary64))) (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale))))) |
(sqrt (+ (* (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))))) (* x-scale x-scale)) (/ (* b (* a (* (* b a) 8))) (/ (* x-scale (* x-scale (* y-scale y-scale))) (* b (* a (* b a)))))) (* (- (/ (+ (* (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))) (* a a)) (* (* b b) (- 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))))) (* x-scale x-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))) (* a a)) (* (* b b) (- 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))))) (* y-scale y-scale))) (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))))) (* x-scale x-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))) (* a a)) (* (* b b) (- 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))))) (* y-scale y-scale)))) (* (/ (/ (+ (sin (* (* angle (PI)) 1/90)) 0) 2) (/ (* x-scale y-scale) (* (+ b a) (* 2 (- b a))))) (/ (/ (+ (sin (* (* angle (PI)) 1/90)) 0) 2) (/ (* x-scale y-scale) (* (+ b a) (* 2 (- b a))))))))) (/ (* b (* a (* (* b a) 8))) (/ (* x-scale (* x-scale (* y-scale y-scale))) (* b (* a (* b a)))))))) |
(sqrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 b (*.f64 a b))) #s(literal 8 binary64)) (/.f64 (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale))) (*.f64 a (*.f64 b (*.f64 a b))))) (+.f64 (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal -1/2 binary64))))) (*.f64 (+.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1 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 #s(literal 1/90 binary64) angle) (PI.f64)))))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal -1/2 binary64)))))) (*.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal -1/2 binary64))))) (*.f64 (+.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1 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 #s(literal 1/90 binary64) angle) (PI.f64)))))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal -1/2 binary64)))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) (*.f64 y-scale #s(literal 2 binary64))) (*.f64 (-.f64 b a) (*.f64 #s(literal 2 binary64) (+.f64 a b)))) x-scale)))))) |
(+ (* (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))))) (* x-scale x-scale)) (/ (* b (* a (* (* b a) 8))) (/ (* x-scale (* x-scale (* y-scale y-scale))) (* b (* a (* b a)))))) (* (- (/ (+ (* (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))) (* a a)) (* (* b b) (- 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))))) (* x-scale x-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))) (* a a)) (* (* b b) (- 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))))) (* y-scale y-scale))) (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))))) (* x-scale x-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))) (* a a)) (* (* b b) (- 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))))) (* y-scale y-scale)))) (* (/ (/ (+ (sin (* (* angle (PI)) 1/90)) 0) 2) (/ (* x-scale y-scale) (* (+ b a) (* 2 (- b a))))) (/ (/ (+ (sin (* (* angle (PI)) 1/90)) 0) 2) (/ (* x-scale y-scale) (* (+ b a) (* 2 (- b a))))))))) (/ (* b (* a (* (* b a) 8))) (/ (* x-scale (* x-scale (* y-scale y-scale))) (* b (* a (* b a))))))) |
(*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 b (*.f64 a b))) #s(literal 8 binary64)) (/.f64 (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale))) (*.f64 a (*.f64 b (*.f64 a b))))) (+.f64 (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal -1/2 binary64))))) (*.f64 (+.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1 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 #s(literal 1/90 binary64) angle) (PI.f64)))))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal -1/2 binary64)))))) (*.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal -1/2 binary64))))) (*.f64 (+.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1 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 #s(literal 1/90 binary64) angle) (PI.f64)))))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal -1/2 binary64)))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) (*.f64 y-scale #s(literal 2 binary64))) (*.f64 (-.f64 b a) (*.f64 #s(literal 2 binary64) (+.f64 a b)))) x-scale))))) |
(* (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))))) (* x-scale x-scale)) (/ (* b (* a (* (* b a) 8))) (/ (* x-scale (* x-scale (* y-scale y-scale))) (* b (* a (* b a)))))) |
(/.f64 (/.f64 (*.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal -1/2 binary64))))) (*.f64 (+.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1 binary64)) (*.f64 (*.f64 b b) #s(literal 1/2 binary64)))) (*.f64 (*.f64 a (*.f64 b (*.f64 a b))) #s(literal 8 binary64))) (/.f64 (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale))) (*.f64 a (*.f64 b (*.f64 a b))))) (*.f64 x-scale x-scale)) |
(/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))))) (* x-scale x-scale)) |
(/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal -1/2 binary64))))) (*.f64 (+.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1 binary64)) (*.f64 (*.f64 b b) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale)) |
(+ (* (* a a) (- 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))))) |
(+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal -1/2 binary64))))) (*.f64 (+.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1 binary64)) (*.f64 (*.f64 b b) #s(literal 1/2 binary64)))) |
(* (* a a) (- 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90))))) |
(*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal -1/2 binary64))))) |
(* a a) |
(*.f64 a a) |
a |
(- 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))) |
(+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal -1/2 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 #s(literal 1/90 binary64) angle) (PI.f64)))) |
(cos (* (* angle (PI)) 1/90)) |
(cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) |
(* (* angle (PI)) 1/90) |
(*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64)) |
(* angle (PI)) |
(*.f64 angle (PI.f64)) |
angle |
(PI) |
(PI.f64) |
1/90 |
#s(literal 1/90 binary64) |
(* (* b b) (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90))))) |
(*.f64 (+.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1 binary64)) (*.f64 (*.f64 b b) #s(literal 1/2 binary64))) |
(* b b) |
(*.f64 b b) |
b |
(+ 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 #s(literal 1/90 binary64) angle) (PI.f64))))) |
(* x-scale x-scale) |
(*.f64 x-scale x-scale) |
x-scale |
(/ (* 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))) #s(literal 8 binary64)) (/.f64 (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale))) (*.f64 a (*.f64 b (*.f64 a b))))) |
(* b (* a (* (* b a) 8))) |
(*.f64 (*.f64 a (*.f64 b (*.f64 a b))) #s(literal 8 binary64)) |
(* a (* (* b a) 8)) |
(*.f64 a (*.f64 #s(literal 8 binary64) (*.f64 a b))) |
(* (* b a) 8) |
(*.f64 #s(literal 8 binary64) (*.f64 a b)) |
(* b a) |
(*.f64 a b) |
8 |
#s(literal 8 binary64) |
(/ (* 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 b (*.f64 a b)))) |
(* x-scale (* x-scale (* y-scale y-scale))) |
(*.f64 y-scale (*.f64 y-scale (*.f64 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 b (*.f64 a b))) |
(* a (* b a)) |
(*.f64 a (*.f64 a b)) |
(* (- (/ (+ (* (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))) (* a a)) (* (* b b) (- 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))))) (* x-scale x-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))) (* a a)) (* (* b b) (- 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))))) (* y-scale y-scale))) (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))))) (* x-scale x-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))) (* a a)) (* (* b b) (- 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))))) (* y-scale y-scale)))) (* (/ (/ (+ (sin (* (* angle (PI)) 1/90)) 0) 2) (/ (* x-scale y-scale) (* (+ b a) (* 2 (- b a))))) (/ (/ (+ (sin (* (* angle (PI)) 1/90)) 0) 2) (/ (* x-scale y-scale) (* (+ b a) (* 2 (- b a))))))))) (/ (* b (* a (* (* b a) 8))) (/ (* x-scale (* x-scale (* y-scale y-scale))) (* b (* a (* b a)))))) |
(*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 b (*.f64 a b))) #s(literal 8 binary64)) (/.f64 (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale))) (*.f64 a (*.f64 b (*.f64 a b))))) (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64)))))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal -1/2 binary64)))))) (*.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal -1/2 binary64))))) (*.f64 (+.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1 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 #s(literal 1/90 binary64) angle) (PI.f64)))))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal -1/2 binary64)))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) (*.f64 y-scale #s(literal 2 binary64))) (*.f64 (-.f64 b a) (*.f64 #s(literal 2 binary64) (+.f64 a b)))) x-scale)))) |
(- (/ (+ (* (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))) (* a a)) (* (* b b) (- 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))))) (* x-scale x-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))) (* a a)) (* (* b b) (- 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))))) (* y-scale y-scale))) (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))))) (* x-scale x-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))) (* a a)) (* (* b b) (- 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))))) (* y-scale y-scale)))) (* (/ (/ (+ (sin (* (* angle (PI)) 1/90)) 0) 2) (/ (* x-scale y-scale) (* (+ b a) (* 2 (- b a))))) (/ (/ (+ (sin (* (* angle (PI)) 1/90)) 0) 2) (/ (* x-scale y-scale) (* (+ b a) (* 2 (- b a))))))))) |
(-.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64)))))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal -1/2 binary64)))))) (*.f64 y-scale y-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal -1/2 binary64))))) (*.f64 (+.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1 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 #s(literal 1/90 binary64) angle) (PI.f64)))))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal -1/2 binary64)))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) (*.f64 y-scale #s(literal 2 binary64))) (*.f64 (-.f64 b a) (*.f64 #s(literal 2 binary64) (+.f64 a b)))) x-scale))) |
(/ (+ (* (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))) (* a a)) (* (* b b) (- 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))))) (* y-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 #s(literal 1/90 binary64) angle) (PI.f64)))))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal -1/2 binary64)))))) (*.f64 y-scale y-scale)) |
(+ (* (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))) (* a a)) (* (* b b) (- 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))))) |
(+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64)))))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal -1/2 binary64)))))) |
(* (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))) (* a a)) |
(*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64)))))) |
(* (* b b) (- 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90))))) |
(*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal -1/2 binary64))))) |
(sqrt (+ (* (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))))) (* x-scale x-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))) (* a a)) (* (* b b) (- 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))))) (* y-scale y-scale))) (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))))) (* x-scale x-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))) (* a a)) (* (* b b) (- 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))))) (* y-scale y-scale)))) (* (/ (/ (+ (sin (* (* angle (PI)) 1/90)) 0) 2) (/ (* x-scale y-scale) (* (+ b a) (* 2 (- b a))))) (/ (/ (+ (sin (* (* angle (PI)) 1/90)) 0) 2) (/ (* x-scale y-scale) (* (+ b a) (* 2 (- b a)))))))) |
(hypot.f64 (-.f64 (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal -1/2 binary64))))) (*.f64 (+.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1 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 #s(literal 1/90 binary64) angle) (PI.f64)))))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal -1/2 binary64)))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) (*.f64 y-scale #s(literal 2 binary64))) (*.f64 (-.f64 b a) (*.f64 #s(literal 2 binary64) (+.f64 a b)))) x-scale)) |
(- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))))) (* x-scale x-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))) (* a a)) (* (* b b) (- 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))))) (* y-scale y-scale))) |
(-.f64 (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal -1/2 binary64))))) (*.f64 (+.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 1 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 #s(literal 1/90 binary64) angle) (PI.f64)))))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal -1/2 binary64)))))) (*.f64 y-scale y-scale))) |
(/ (/ (+ (sin (* (* angle (PI)) 1/90)) 0) 2) (/ (* x-scale y-scale) (* (+ b a) (* 2 (- b a))))) |
(/.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) (*.f64 y-scale #s(literal 2 binary64))) (*.f64 (-.f64 b a) (*.f64 #s(literal 2 binary64) (+.f64 a b)))) x-scale) |
(/ (+ (sin (* (* angle (PI)) 1/90)) 0) 2) |
(/.f64 (sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) #s(literal 2 binary64)) |
(+ (sin (* (* angle (PI)) 1/90)) 0) |
(sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) |
(sin (* (* angle (PI)) 1/90)) |
(sin.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))) |
0 |
#s(literal 0 binary64) |
2 |
#s(literal 2 binary64) |
(/ (* x-scale y-scale) (* (+ b a) (* 2 (- b a)))) |
(/.f64 (/.f64 (*.f64 x-scale y-scale) (+.f64 a b)) (*.f64 #s(literal 2 binary64) (-.f64 b a))) |
(* x-scale y-scale) |
(*.f64 x-scale y-scale) |
(* (+ b a) (* 2 (- b a))) |
(*.f64 (-.f64 b a) (*.f64 #s(literal 2 binary64) (+.f64 a b))) |
(+ b a) |
(+.f64 a b) |
(* 2 (- b a)) |
(*.f64 #s(literal 2 binary64) (-.f64 b a)) |
(- b a) |
(-.f64 b a) |
(/ (* 4 (* a (* b (* b a)))) (* x-scale (* x-scale (* y-scale y-scale)))) |
(/.f64 (*.f64 a (*.f64 (*.f64 b (*.f64 a b)) #s(literal 4 binary64))) (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale)))) |
(* 4 (* a (* b (* b a)))) |
(*.f64 a (*.f64 (*.f64 b (*.f64 a b)) #s(literal 4 binary64))) |
4 |
#s(literal 4 binary64) |
(* a (* b (* b a))) |
(*.f64 a (*.f64 b (*.f64 a b))) |
(* b (* b a)) |
(*.f64 b (*.f64 a b)) |
(* (* 1/4 (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (* (* b b) (+ (/ (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 b 4) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (* x-scale x-scale) (* y-scale y-scale))) (pow (* (* b b) (- (/ (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 x-scale (*.f64 (*.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale) #s(literal 1/4 binary64))) (sqrt.f64 (-.f64 (*.f64 (*.f64 b b) (+.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)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 #s(literal 4 binary64) (pow.f64 b #s(literal 4 binary64))) (pow.f64 (cos.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 b b) (-.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 (* x-scale (* y-scale (sqrt 8)))) |
(*.f64 x-scale (*.f64 (*.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale) #s(literal 1/4 binary64))) |
1/4 |
#s(literal 1/4 binary64) |
(* x-scale (* y-scale (sqrt 8))) |
(*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale)) |
x-scale |
(* y-scale (sqrt 8)) |
(*.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale) |
y-scale |
(sqrt 8) |
(sqrt.f64 #s(literal 8 binary64)) |
8 |
#s(literal 8 binary64) |
(sqrt (- (* (* b b) (+ (/ (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 b 4) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (* x-scale x-scale) (* y-scale y-scale))) (pow (* (* b b) (- (/ (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 b b) (+.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)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 #s(literal 4 binary64) (pow.f64 b #s(literal 4 binary64))) (pow.f64 (cos.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 b b) (-.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)))))) |
(- (* (* b b) (+ (/ (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 b 4) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (* x-scale x-scale) (* y-scale y-scale))) (pow (* (* b b) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)))) 2)))) |
(-.f64 (*.f64 (*.f64 b b) (+.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)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 #s(literal 4 binary64) (pow.f64 b #s(literal 4 binary64))) (pow.f64 (cos.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 b b) (-.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))))) |
(* (* b b) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)))) |
(*.f64 (*.f64 b b) (+.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)))) |
(* b b) |
(*.f64 b b) |
b |
(+ (/ (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 b 4) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (* x-scale x-scale) (* y-scale y-scale))) (pow (* (* b b) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)))) 2))) |
(sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 #s(literal 4 binary64) (pow.f64 b #s(literal 4 binary64))) (pow.f64 (cos.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 b b) (-.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 b 4) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (* x-scale x-scale) (* y-scale y-scale))) (pow (* (* b b) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)))) 2)) |
(+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 #s(literal 4 binary64) (pow.f64 b #s(literal 4 binary64))) (pow.f64 (cos.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 b b) (-.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 b 4) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (* x-scale x-scale) (* y-scale y-scale))) |
(/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 #s(literal 4 binary64) (pow.f64 b #s(literal 4 binary64))) (pow.f64 (cos.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 (* (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))) |
(*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 #s(literal 4 binary64) (pow.f64 b #s(literal 4 binary64))) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) |
4 |
#s(literal 4 binary64) |
(* (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)) |
(*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) |
(* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 2)) |
(*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (pow.f64 b #s(literal 4 binary64))) |
(pow b 4) |
(pow.f64 b #s(literal 4 binary64)) |
(* (* x-scale x-scale) (* y-scale y-scale)) |
(*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale))) |
(pow (* (* b b) (- (/ (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 b b) (-.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)) |
(* (* b b) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)))) |
(*.f64 (*.f64 b b) (-.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)) (/ (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 (* y-scale (sqrt 8)))) (sqrt (+ (+ (/ (* (* a a) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) (/ (* (* b b) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale))) (* -1/2 (/ (+ (* (* -2 (+ (* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (* b b) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (/ (* (* a a) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) (/ (* (* b b) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)))) (/ (* 4 (* (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (* (+ a b) (+ a b)) (* (- b a) (- b a))))) (* x-scale x-scale))) (+ (* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (* b b) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) |
(*.f64 (*.f64 x-scale (*.f64 (*.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale) #s(literal 1/4 binary64))) (sqrt.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 b b) (*.f64 x-scale x-scale)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (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 b b) (*.f64 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))) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (*.f64 (*.f64 (-.f64 b a) (+.f64 a b)) (-.f64 b a))))) (*.f64 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))))))))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(*.f64 x-scale (*.f64 (*.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale) #s(literal 1/4 binary64))) |
1/4 |
#s(literal 1/4 binary64) |
(* x-scale (* y-scale (sqrt 8))) |
(*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale)) |
x-scale |
(* y-scale (sqrt 8)) |
(*.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale) |
y-scale |
(sqrt 8) |
(sqrt.f64 #s(literal 8 binary64)) |
8 |
#s(literal 8 binary64) |
(sqrt (+ (+ (/ (* (* a a) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) (/ (* (* b b) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale))) (* -1/2 (/ (+ (* (* -2 (+ (* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (* b b) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (/ (* (* a a) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) (/ (* (* b b) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)))) (/ (* 4 (* (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (* (+ a b) (+ a b)) (* (- b a) (- b a))))) (* x-scale x-scale))) (+ (* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (* b b) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) |
(sqrt.f64 (+.f64 (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (/.f64 (*.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 b b) (*.f64 x-scale x-scale)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (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 b b) (*.f64 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))) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (*.f64 (*.f64 (-.f64 b a) (+.f64 a b)) (-.f64 b a))))) (*.f64 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)) (/ (* (* b b) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale))) (* -1/2 (/ (+ (* (* -2 (+ (* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (* b b) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (/ (* (* a a) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) (/ (* (* b b) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)))) (/ (* 4 (* (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (* (+ a b) (+ a b)) (* (- b a) (- b a))))) (* x-scale x-scale))) (+ (* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (* b b) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) |
(+.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 b b) (*.f64 x-scale x-scale)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (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 b b) (*.f64 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))) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (*.f64 (*.f64 (-.f64 b a) (+.f64 a b)) (-.f64 b a))))) (*.f64 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)) (/ (* (* b b) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale))) |
(+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (/.f64 (*.f64 a a) (*.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 b b) (*.f64 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))) |
(* a a) |
(*.f64 a a) |
a |
(pow (sin (* 1/180 (* angle (PI)))) 2) |
(pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) |
(sin (* 1/180 (* angle (PI)))) |
(sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) |
(* 1/180 (* angle (PI))) |
(*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))) |
1/180 |
#s(literal 1/180 binary64) |
(* angle (PI)) |
(*.f64 angle (PI.f64)) |
angle |
(PI) |
(PI.f64) |
2 |
#s(literal 2 binary64) |
(* x-scale x-scale) |
(*.f64 x-scale x-scale) |
(/ (* (* b b) (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 (*.f64 b b) (*.f64 x-scale x-scale))) |
(* (* b b) (pow (cos (* 1/180 (* angle (PI)))) 2)) |
(*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) |
(* b b) |
(*.f64 b b) |
b |
(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/2 (/ (+ (* (* -2 (+ (* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (* b b) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (/ (* (* a a) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) (/ (* (* b b) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)))) (/ (* 4 (* (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (* (+ a b) (+ a b)) (* (- b a) (- b a))))) (* x-scale x-scale))) (+ (* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (* b b) (pow (sin (* 1/180 (* angle (PI)))) 2))))) |
(*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (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 b b) (*.f64 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))) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (*.f64 (*.f64 (-.f64 b a) (+.f64 a b)) (-.f64 b a))))) (*.f64 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)))))) |
-1/2 |
#s(literal -1/2 binary64) |
(/ (+ (* (* -2 (+ (* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (* b b) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (/ (* (* a a) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) (/ (* (* b b) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)))) (/ (* 4 (* (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (* (+ a b) (+ a b)) (* (- b a) (- b a))))) (* x-scale x-scale))) (+ (* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (* b b) (pow (sin (* 1/180 (* angle (PI)))) 2)))) |
(/.f64 (+.f64 (*.f64 (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (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 b b) (*.f64 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))) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (*.f64 (*.f64 (-.f64 b a) (+.f64 a b)) (-.f64 b a))))) (*.f64 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))))) |
(+ (* (* -2 (+ (* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (* b b) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (/ (* (* a a) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) (/ (* (* b b) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)))) (/ (* 4 (* (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (* (+ a b) (+ a b)) (* (- b a) (- b a))))) (* x-scale x-scale))) |
(+.f64 (*.f64 (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (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 b b) (*.f64 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))) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (*.f64 (*.f64 (-.f64 b a) (+.f64 a b)) (-.f64 b a))))) (*.f64 x-scale x-scale))) |
(* (* -2 (+ (* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (* b b) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (/ (* (* a a) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) (/ (* (* b b) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)))) |
(*.f64 (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (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 b b) (*.f64 x-scale x-scale)))))) |
(* -2 (+ (* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (* b b) (pow (sin (* 1/180 (* angle (PI)))) 2)))) |
(*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) |
-2 |
#s(literal -2 binary64) |
(+ (* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (* b b) (pow (sin (* 1/180 (* angle (PI)))) 2))) |
(+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) |
(* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2)) |
(*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) |
(* (* b b) (pow (sin (* 1/180 (* angle (PI)))) 2)) |
(*.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)) (* (* (+ a b) (+ a b)) (* (- b a) (- b a))))) (* 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))) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (*.f64 (*.f64 (-.f64 b a) (+.f64 a b)) (-.f64 b a))))) (*.f64 x-scale x-scale)) |
(* 4 (* (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (* (+ a b) (+ a b)) (* (- b a) (- b a))))) |
(*.f64 (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (*.f64 (*.f64 (-.f64 b a) (+.f64 a b)) (-.f64 b a))))) |
4 |
#s(literal 4 binary64) |
(* (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (* (+ a b) (+ a b)) (* (- b a) (- b a)))) |
(*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (*.f64 (*.f64 (-.f64 b a) (+.f64 a b)) (-.f64 b a))))) |
(* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) |
(*.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))) |
(* (* (+ a b) (+ a b)) (* (- b a) (- b a))) |
(*.f64 (+.f64 a b) (*.f64 (*.f64 (-.f64 b a) (+.f64 a b)) (-.f64 b a))) |
(* (+ a b) (+ a b)) |
(*.f64 (+.f64 a b) (+.f64 a b)) |
(+ a b) |
(+.f64 a b) |
(* (- b a) (- b a)) |
(*.f64 (-.f64 b a) (-.f64 b a)) |
(- b a) |
(-.f64 b a) |
Found 20 expressions of interest:
| New | Metric | Score | Program |
|---|---|---|---|
| ✓ | accuracy | 100.0% | (sqrt.f64 #s(literal 8 binary64)) |
| ✓ | accuracy | 100.0% | (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
| ✓ | accuracy | 100.0% | (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
| ✓ | accuracy | 3.1% | (PI.f64) |
| ✓ | accuracy | 100.0% | (sqrt.f64 #s(literal 8 binary64)) |
| ✓ | accuracy | 100.0% | (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
| ✓ | accuracy | 100.0% | (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
| ✓ | accuracy | 3.1% | (PI.f64) |
| ✓ | accuracy | 100.0% | (sqrt.f64 (+.f64 (*.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b (*.f64 a (*.f64 (*.f64 b 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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 0 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 x-scale y-scale) (*.f64 (+.f64 b a) (*.f64 #s(literal 2 binary64) (-.f64 b a))))))) (/.f64 (*.f64 b (*.f64 a (*.f64 (*.f64 b a) #s(literal 8 binary64)))) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 b (*.f64 a (*.f64 b a)))))))) |
| ✓ | accuracy | 100.0% | (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) |
| ✓ | accuracy | 100.0% | (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) |
| ✓ | accuracy | 3.1% | (PI.f64) |
| ✓ | accuracy | 100.0% | (*.f64 a a) |
| ✓ | accuracy | 100.0% | (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 b a)))) |
| ✓ | accuracy | 100.0% | (sqrt.f64 #s(literal 8 binary64)) |
| ✓ | accuracy | 100.0% | (sqrt.f64 #s(literal 2 binary64)) |
| ✓ | accuracy | 100.0% | (*.f64 a x-scale) |
| ✓ | accuracy | 100.0% | (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
| ✓ | accuracy | 100.0% | (sqrt.f64 #s(literal 8 binary64)) |
| ✓ | accuracy | 100.0% | (sqrt.f64 #s(literal 2 binary64)) |
| 5.8s | 256× | 5 | exit |
Compiled 3893 to 128 computations (96.7% saved)
ival-sin: 977.0ms (24.6% of total)ival-cos: 919.0ms (23.2% of total)ival-mult: 607.0ms (15.3% of total)backward-pass: 504.0ms (12.7% of total)ival-div: 395.0ms (10% of total)...c/correct-round.rkt:119:19: 149.0ms (3.8% of total)ival-sqrt: 111.0ms (2.8% of total)ival-add: 108.0ms (2.7% of total)ival-pow: 93.0ms (2.3% of total)ival-sub: 53.0ms (1.3% of total)compiled-spec: 40.0ms (1% of total)ival-pi: 7.0ms (0.2% of total)const: 7.0ms (0.2% of total)| Inputs |
|---|
#<alt (* 1/4 (* (* a x-scale) (* (sqrt 2) (sqrt 8))))> |
#<alt (* (* a x-scale) (* (sqrt 2) (sqrt 8)))> |
#<alt (* a x-scale)> |
#<alt (* (sqrt 2) (sqrt 8))> |
#<alt (/ (/ (* (* (* a (* a a)) (* b b)) (* (sqrt 2) (sqrt 8))) (* x-scale (* y-scale y-scale))) (/ (* 4 (* a (* b (* b a)))) (* x-scale (* x-scale (* y-scale y-scale)))))> |
#<alt (/ (* (* (* a (* a a)) (* b b)) (* (sqrt 2) (sqrt 8))) (* x-scale (* y-scale y-scale)))> |
#<alt (* (* (* a (* a a)) (* b b)) (* (sqrt 2) (sqrt 8)))> |
#<alt (* (* a (* a a)) (* b b))> |
#<alt (+ (* (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))))) (* x-scale x-scale)) (/ (* b (* a (* (* b a) 8))) (/ (* x-scale (* x-scale (* y-scale y-scale))) (* b (* a (* b a)))))) (* (- (/ (+ (* (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))) (* a a)) (* (* b b) (- 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))))) (* x-scale x-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))) (* a a)) (* (* b b) (- 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))))) (* y-scale y-scale))) (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))))) (* x-scale x-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))) (* a a)) (* (* b b) (- 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))))) (* y-scale y-scale)))) (* (/ (/ (+ (sin (* (* angle (PI)) 1/90)) 0) 2) (/ (* x-scale y-scale) (* (+ b a) (* 2 (- b a))))) (/ (/ (+ (sin (* (* angle (PI)) 1/90)) 0) 2) (/ (* x-scale y-scale) (* (+ b a) (* 2 (- b a))))))))) (/ (* b (* a (* (* b a) 8))) (/ (* x-scale (* x-scale (* y-scale y-scale))) (* b (* a (* b a)))))))> |
#<alt (+ (sin (* (* angle (PI)) 1/90)) 0)> |
#<alt (/ (sqrt (+ (* (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))))) (* x-scale x-scale)) (/ (* b (* a (* (* b a) 8))) (/ (* x-scale (* x-scale (* y-scale y-scale))) (* b (* a (* b a)))))) (* (- (/ (+ (* (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))) (* a a)) (* (* b b) (- 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))))) (* x-scale x-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))) (* a a)) (* (* b b) (- 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))))) (* y-scale y-scale))) (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))))) (* x-scale x-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))) (* a a)) (* (* b b) (- 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))))) (* y-scale y-scale)))) (* (/ (/ (+ (sin (* (* angle (PI)) 1/90)) 0) 2) (/ (* x-scale y-scale) (* (+ b a) (* 2 (- b a))))) (/ (/ (+ (sin (* (* angle (PI)) 1/90)) 0) 2) (/ (* x-scale y-scale) (* (+ b a) (* 2 (- b a))))))))) (/ (* b (* a (* (* b a) 8))) (/ (* x-scale (* x-scale (* y-scale y-scale))) (* b (* a (* b a)))))))) (/ (* 4 (* a (* b (* b a)))) (* x-scale (* x-scale (* y-scale y-scale)))))> |
#<alt (sqrt (+ (* (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))))) (* x-scale x-scale)) (/ (* b (* a (* (* b a) 8))) (/ (* x-scale (* x-scale (* y-scale y-scale))) (* b (* a (* b a)))))) (* (- (/ (+ (* (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))) (* a a)) (* (* b b) (- 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))))) (* x-scale x-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))) (* a a)) (* (* b b) (- 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))))) (* y-scale y-scale))) (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))))) (* x-scale x-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))) (* a a)) (* (* b b) (- 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))))) (* y-scale y-scale)))) (* (/ (/ (+ (sin (* (* angle (PI)) 1/90)) 0) 2) (/ (* x-scale y-scale) (* (+ b a) (* 2 (- b a))))) (/ (/ (+ (sin (* (* angle (PI)) 1/90)) 0) 2) (/ (* x-scale y-scale) (* (+ b a) (* 2 (- b a))))))))) (/ (* b (* a (* (* b a) 8))) (/ (* x-scale (* x-scale (* y-scale y-scale))) (* b (* a (* b a))))))))> |
#<alt (* (* 1/4 (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (* (* b b) (+ (/ (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 b 4) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (* x-scale x-scale) (* y-scale y-scale))) (pow (* (* b b) (- (/ (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 (* x-scale (* y-scale (sqrt 8))))> |
#<alt (* x-scale (* y-scale (sqrt 8)))> |
#<alt (* y-scale (sqrt 8))> |
#<alt (* (* 1/4 (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (+ (/ (* (* a a) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) (/ (* (* b b) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale))) (* -1/2 (/ (+ (* (* -2 (+ (* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (* b b) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (/ (* (* a a) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) (/ (* (* b b) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)))) (/ (* 4 (* (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (* (+ a b) (+ a b)) (* (- b a) (- b a))))) (* x-scale x-scale))) (+ (* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (* b b) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))> |
#<alt (sqrt 2)> |
#<alt (sqrt 8)> |
#<alt (* 4 (* a (* b (* b a))))> |
#<alt (* a a)> |
#<alt (PI)> |
#<alt (cos (* (* angle (PI)) 1/90))> |
#<alt (sin (* (* angle (PI)) 1/90))> |
#<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) (pow b 2))> |
#<alt (* (pow a 3) (pow b 2))> |
#<alt (* (pow a 3) (pow b 2))> |
#<alt (* (pow a 3) (pow b 2))> |
#<alt (* (pow a 3) (pow b 2))> |
#<alt (* (pow a 3) (pow b 2))> |
#<alt (* (pow a 3) (pow b 2))> |
#<alt (* (pow a 3) (pow b 2))> |
#<alt (* (pow a 3) (pow b 2))> |
#<alt (* (pow a 3) (pow b 2))> |
#<alt (* (pow a 3) (pow b 2))> |
#<alt (* (pow a 3) (pow b 2))> |
#<alt (* (pow a 3) (pow b 2))> |
#<alt (* (pow a 3) (pow b 2))> |
#<alt (* (pow a 3) (pow b 2))> |
#<alt (* (pow a 3) (pow b 2))> |
#<alt (* (pow a 3) (pow b 2))> |
#<alt (* (pow a 3) (pow b 2))> |
#<alt (* (pow a 3) (pow b 2))> |
#<alt (* (pow a 3) (pow b 2))> |
#<alt (* (pow a 3) (pow b 2))> |
#<alt (* (pow a 3) (pow b 2))> |
#<alt (* (pow a 3) (pow b 2))> |
#<alt (* (pow a 3) (pow b 2))> |
#<alt (* (pow a 4) (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))))))> |
#<alt (* (pow a 4) (+ (* -4 (* (/ (* a (* (pow b 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))))) (* (pow x-scale 4) (pow y-scale 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)))))) (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))))))> |
#<alt (* (pow a 4) (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (+ (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* a (+ (* -4 (* (/ (* (pow b 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* (pow x-scale 4) (pow y-scale 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)))))) (* a (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 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)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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)))))))))))> |
#<alt (* (pow a 4) (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (+ (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* a (+ (* -4 (* (/ (* (pow b 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* (pow x-scale 4) (pow y-scale 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)))))) (* a (+ (* -4 (* (/ (* a (* (pow b 4) (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 (pow b 3)) (* 2 (pow b 3))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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))) (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)))))) (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 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)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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))))))))))))> |
#<alt (* (pow a 6) (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))> |
#<alt (* (pow a 6) (+ (* -4 (* (/ (* (pow b 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (* a (* (pow x-scale 4) (pow y-scale 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)))))) (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))))> |
#<alt (* (pow a 6) (+ (* -4 (* (/ (* (pow b 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (* a (* (pow x-scale 4) (pow y-scale 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)))))) (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (+ (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/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 (/ 1 (pow y-scale 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 x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 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) (* (pow x-scale 2) (pow y-scale 2))))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) (* (pow x-scale 4) (pow y-scale 2))))))))))> |
#<alt (* (pow a 6) (+ (* -4 (* (/ (* (pow b 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (* a (* (pow x-scale 4) (pow y-scale 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)))))) (+ (* -4 (* (/ (* (pow b 4) (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 b) (* 2 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 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (* (pow x-scale 2) (* (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)))))))) (* (pow a 3) (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))) (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (+ (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/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 (/ 1 (pow y-scale 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 x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 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) (* (pow x-scale 2) (pow y-scale 2))))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) (* (pow x-scale 4) (pow y-scale 2)))))))))))> |
#<alt (* (pow a 6) (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))> |
#<alt (* (pow a 6) (+ (* 4 (* (/ (* (pow b 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (* a (* (pow x-scale 4) (pow y-scale 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)))))) (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))))> |
#<alt (* (pow a 6) (+ (* -1 (/ (+ (* -4 (* (/ (* (pow b 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (* (pow x-scale 4) (pow y-scale 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)))))) (* -1 (/ (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/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 (/ 1 (pow y-scale 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 x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))))) a))) a)) (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))))> |
#<alt (* (pow a 6) (+ (* -1 (/ (+ (* -4 (* (/ (* (pow b 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (* (pow x-scale 4) (pow y-scale 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)))))) (* -1 (/ (+ (* 4 (* (/ (* (pow b 4) (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 b) (* 2 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 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (* (pow x-scale 2) (* (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)))))))) (* a (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))) (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/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 (/ 1 (pow y-scale 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 x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))))) a))) a)) (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))))> |
#<alt (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (/ (pow b 2) (pow x-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (pow b 6)) (* (pow x-scale 4) (pow y-scale 2)))))> |
#<alt (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (/ (pow b 2) (pow x-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 8 (/ (* (pow a 4) (pow b 6)) (* (pow x-scale 4) (pow y-scale 2)))) (* (pow angle 2) (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow 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 (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (/ (pow b 2) (pow x-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 8 (/ (* (pow a 4) (pow b 6)) (* (pow x-scale 4) (pow y-scale 2)))) (* (pow angle 2) (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))))) (* (pow x-scale 4) (pow y-scale 2)))) (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow 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 b 4) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4)))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* -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/2 (/ (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 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) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (/ (pow b 2) (pow x-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 8 (/ (* (pow a 4) (pow b 6)) (* (pow x-scale 4) (pow y-scale 2)))) (* (pow angle 2) (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))))) (* (pow x-scale 4) (pow y-scale 2)))) (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow 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 b 4) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4)))))) (* (pow x-scale 4) (pow y-scale 2)))) (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* -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/2 (/ (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 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)))) (* (pow angle 2) (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* -1/765275040000000 (* (pow b 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow a 2) (pow (PI) 6)))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* -1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow y-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))))) (/ (* (pow (+ a b) 2) (* (+ (* 1/31886460000000 (pow (PI) 6)) (* 1/19131876000000 (pow (PI) 6))) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (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 (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 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))))))))))))))> |
#<alt (+ (* 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)))))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 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))) (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-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 (+ (* 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)))))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 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))) (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-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 (+ (* 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)))))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 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))) (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-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 (+ (* 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)))))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 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))) (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-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 (+ (* 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)))))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 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))) (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-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 (+ (* 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)))))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 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))) (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-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 (+ (* 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)))))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 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))) (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-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 (+ (* 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)))))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 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))) (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-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 (* (pow b 4) (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))))))> |
#<alt (* (pow b 4) (+ (* -4 (* (/ (* (pow a 4) (* b (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))))) (* (pow x-scale 4) (pow y-scale 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)))))) (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))))))> |
#<alt (* (pow b 4) (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (+ (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* b (+ (* -4 (* (/ (* (pow a 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* (pow x-scale 4) (pow y-scale 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)))))) (* b (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 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)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (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 x-scale 2) (pow y-scale 2)))))))))))> |
#<alt (* (pow b 4) (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (+ (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* b (+ (* -4 (* (/ (* (pow a 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* (pow x-scale 4) (pow y-scale 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)))))) (* b (+ (* -4 (* (/ (* (pow a 4) (* b (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 (pow a 3)) (* 2 (pow a 3))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* 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) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* 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))) (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)))))) (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 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)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (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 x-scale 2) (pow y-scale 2))))))))))))> |
#<alt (* (pow b 6) (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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))))))> |
#<alt (* (pow b 6) (+ (* -4 (* (/ (* (pow a 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (* b (* (pow x-scale 4) (pow y-scale 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)))))) (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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)))))))> |
#<alt (* (pow b 6) (+ (* -4 (* (/ (* (pow a 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (* b (* (pow x-scale 4) (pow y-scale 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)))))) (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (+ (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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)))) (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/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)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (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) (* (pow x-scale 2) (pow y-scale 2))))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (* (pow x-scale 4) (pow y-scale 2))))))))))> |
#<alt (* (pow b 6) (+ (* -4 (* (/ (* (pow a 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (* b (* (pow x-scale 4) (pow y-scale 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)))))) (+ (* -4 (* (/ (* (pow a 4) (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 a) (* 2 a)) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (* (pow x-scale 2) (* (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)))))))) (* (pow b 3) (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (+ (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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)))) (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/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)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (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) (* (pow x-scale 2) (pow y-scale 2))))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (* (pow x-scale 4) (pow y-scale 2)))))))))))> |
#<alt (* (pow b 6) (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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))))))> |
#<alt (* (pow b 6) (+ (* 4 (* (/ (* (pow a 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (* b (* (pow x-scale 4) (pow y-scale 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)))))) (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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)))))))> |
#<alt (* (pow b 6) (+ (* -1 (/ (+ (* -4 (* (/ (* (pow a 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (* (pow x-scale 4) (pow y-scale 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)))))) (* -1 (/ (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/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)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))))) b))) b)) (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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)))))))> |
#<alt (* (pow b 6) (+ (* -1 (/ (+ (* -4 (* (/ (* (pow a 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (* (pow x-scale 4) (pow y-scale 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)))))) (* -1 (/ (+ (* 4 (* (/ (* (pow a 4) (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 a) (* 2 a)) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (* (pow x-scale 2) (* (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)))))))) (* b (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/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)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))))) b))) b)) (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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)))))))> |
#<alt (/ (+ (* -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)))))))))) (pow y-scale 2))) (* 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)))))))))) (pow y-scale 2)))) (pow x-scale 4))> |
#<alt (/ (+ (* -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)))))))))) (pow y-scale 2))) (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (* (pow x-scale 2) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (pow 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))) (* 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)))))))))) (pow y-scale 2))))) (pow x-scale 4))> |
#<alt (/ (+ (* -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)))))))))) (pow y-scale 2))) (+ (* 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)))))))))) (pow y-scale 2))) (* (pow x-scale 2) (+ (* -4 (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))))) (* (pow y-scale 2) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (pow y-scale 2))))))) (pow x-scale 4))> |
#<alt (/ (+ (* -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)))))))))) (pow y-scale 2))) (+ (* 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)))))))))) (pow y-scale 2))) (* (pow x-scale 2) (+ (* 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (pow y-scale 2))) (* (pow x-scale 2) (+ (* -4 (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))))) (* (pow y-scale 2) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 2 (/ (* (pow a 4) (* (pow b 4) (* (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)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 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)))))))) 3)))))))))) (pow x-scale 4))> |
#<alt (/ (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (pow y-scale 2)))) (pow x-scale 4))> |
#<alt (/ (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (+ (* -4 (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))) (* 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)))))))))) (pow y-scale 2))))) (pow x-scale 4))> |
#<alt (/ (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (+ (* -4 (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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 4) (* (pow b 4) (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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 4) (* (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))) 3))))) (* 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)))))))))) (pow y-scale 2)))))) (pow x-scale 4))> |
#<alt (/ (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (+ (* -4 (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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 4) (* (pow b 4) (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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 4) (* (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))) 3))))) (+ (* 4 (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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 x-scale 6) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))) (* 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)))))))))) (pow y-scale 2))))))) (pow x-scale 4))> |
#<alt (/ (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (pow y-scale 2)))) (pow x-scale 4))> |
#<alt (/ (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (+ (* -4 (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))) (* 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)))))))))) (pow y-scale 2))))) (pow x-scale 4))> |
#<alt (/ (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (+ (* -4 (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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 4) (* (pow b 4) (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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 4) (* (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))) 3))))) (* 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)))))))))) (pow y-scale 2)))))) (pow x-scale 4))> |
#<alt (/ (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (+ (* -4 (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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 4) (* (pow b 4) (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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 4) (* (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))) 3))))) (+ (* 4 (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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 x-scale 6) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))) (* 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)))))))))) (pow y-scale 2))))))) (pow x-scale 4))> |
#<alt (/ (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))))) (* (pow x-scale 2) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 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)))))))))) (pow x-scale 4)))) (pow y-scale 2))> |
#<alt (/ (+ (* -4 (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))))) (* (pow x-scale 2) (+ (* (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 a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))))) (* (pow x-scale 2) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 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)))))))))) (pow x-scale 4))))) (pow y-scale 2))> |
#<alt (/ (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))))) (* (pow x-scale 2) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (+ (* 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)))))))))) (pow x-scale 4))) (* (pow y-scale 2) (+ (* -4 (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))))) (* (pow x-scale 2) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 2 (/ (* (pow a 4) (* (pow b 4) (* (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)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 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)))))))) 3)))))))) (pow y-scale 2))> |
#<alt (/ (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))))) (* (pow x-scale 2) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (+ (* 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)))))))))) (pow x-scale 4))) (* (pow y-scale 2) (+ (* -4 (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))))) (* (pow x-scale 2) (+ (* (pow 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 4) (* (pow b 4) (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 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)))))))) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow 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 x-scale 2) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))))) (pow y-scale 2))> |
#<alt (/ (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4)))) (pow y-scale 2))> |
#<alt (/ (+ (* -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))))) (pow x-scale 2))) (+ (* 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)))))))))) (pow x-scale 4))) (* 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (pow y-scale 2)))))) (pow y-scale 2))> |
#<alt (/ (+ (* -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))))) (pow x-scale 2))) (+ (* -4 (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 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))))))) (+ (* 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)))))))))) (pow x-scale 4))) (* 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (pow y-scale 2))))))) (pow y-scale 2))> |
#<alt (/ (+ (* -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))))) (pow x-scale 2))) (+ (* -4 (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 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))))))) (+ (* 2 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))))) (* (pow x-scale 2) (* (pow y-scale 6) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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))))) (+ (* 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)))))))))) (pow x-scale 4))) (* 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (pow y-scale 2)))))))) (pow y-scale 2))> |
#<alt (/ (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4)))) (pow y-scale 2))> |
#<alt (/ (+ (* -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))))) (pow x-scale 2))) (+ (* 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)))))))))) (pow x-scale 4))) (* 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (pow y-scale 2)))))) (pow y-scale 2))> |
#<alt (/ (+ (* -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))))) (pow x-scale 2))) (+ (* -4 (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 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))))))) (+ (* 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)))))))))) (pow x-scale 4))) (* 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (pow y-scale 2))))))) (pow y-scale 2))> |
#<alt (/ (+ (* -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))))) (pow x-scale 2))) (+ (* -4 (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 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))))))) (+ (* 2 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))))) (* (pow x-scale 2) (* (pow y-scale 6) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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))))) (+ (* 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)))))))))) (pow x-scale 4))) (* 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (pow y-scale 2)))))))) (pow y-scale 2))> |
#<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/4 (* (/ (* (pow x-scale 2) (pow y-scale 2)) (pow b 2)) (sqrt (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))))))))> |
#<alt (+ (* -1/2 (* (/ (* a (* (pow b 2) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (* (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (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 x-scale 2) (pow y-scale 2)) (pow b 2)) (sqrt (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))))))))> |
#<alt (+ (* 1/4 (* (/ (* (pow x-scale 2) (pow y-scale 2)) (pow b 2)) (sqrt (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))))))) (* a (+ (* -1/2 (* (/ (* (pow b 2) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (* (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (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/8 (* (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (- (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 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)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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 (/ (* (pow b 8) (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2))) (* (pow x-scale 8) (* (pow y-scale 8) (* (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (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))))))))))) (pow b 2)) (sqrt (/ 1 (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))))))))))))> |
#<alt (+ (* 1/4 (* (/ (* (pow x-scale 2) (pow y-scale 2)) (pow b 2)) (sqrt (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))))))) (* a (+ (* -1/2 (* (/ (* (pow b 2) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (* (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (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))))))) (* a (+ (* 1/8 (* (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (- (* -4 (* (/ (* (pow b 4) (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 (pow b 3)) (* 2 (pow b 3))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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))) (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)))))) (* -2 (* (/ (* (pow b 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 (pow b 3)) (* 2 (pow b 3))) (- (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 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)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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 (/ (* (pow b 8) (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2))) (* (pow x-scale 8) (* (pow y-scale 8) (* (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (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))))))))))) (* (pow x-scale 4) (* (pow y-scale 4) (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (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)))))))))) (pow b 2)) (sqrt (/ 1 (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))))))))) (* 1/8 (* (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 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)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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 (/ (* (pow b 8) (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2))) (* (pow x-scale 8) (* (pow y-scale 8) (* (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (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)))))))))) (pow b 2)) (sqrt (/ 1 (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))))))))))))))> |
#<alt (* 1/4 (* (/ (* a (* (pow x-scale 2) (pow y-scale 2))) (pow b 2)) (sqrt (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))))> |
#<alt (* a (+ (* -1/2 (* (/ (* (pow b 2) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (* a (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (* (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (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 x-scale 2) (pow y-scale 2)) (pow b 2)) (sqrt (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))))))> |
#<alt (* a (+ (* -1/2 (* (/ (* (pow b 2) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (* a (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (* (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (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/8 (* (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/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 (/ 1 (pow y-scale 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 x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))))) (* 4 (/ (* (pow b 8) (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 8) (* (pow y-scale 8) (* (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (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)))))))))) (* (pow a 2) (pow b 2))) (sqrt (/ 1 (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 1/4 (* (/ (* (pow x-scale 2) (pow y-scale 2)) (pow b 2)) (sqrt (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))))))))> |
#<alt (* a (+ (* -1/2 (* (/ (* (pow b 2) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (* a (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (* (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (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/8 (* (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* -4 (* (/ (* (pow b 4) (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 b) (* 2 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 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (* (pow x-scale 2) (* (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)))))))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 b 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 b) (* 2 b)) (- (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/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 (/ 1 (pow y-scale 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 x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))))) (* 4 (/ (* (pow b 8) (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 8) (* (pow y-scale 8) (* (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (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))))))))))) (* (pow x-scale 4) (* (pow y-scale 4) (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 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 3) (pow b 2))) (sqrt (/ 1 (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 1/8 (* (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/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 (/ 1 (pow y-scale 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 x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))))) (* 4 (/ (* (pow b 8) (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 8) (* (pow y-scale 8) (* (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (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)))))))))) (* (pow a 2) (pow b 2))) (sqrt (/ 1 (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 1/4 (* (/ (* (pow x-scale 2) (pow y-scale 2)) (pow b 2)) (sqrt (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))))))))> |
#<alt (* -1/4 (* (/ (* a (* (pow x-scale 2) (pow y-scale 2))) (pow b 2)) (sqrt (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))))> |
#<alt (* -1 (* a (+ (* 1/4 (* (/ (* (pow x-scale 2) (pow y-scale 2)) (pow b 2)) (sqrt (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (* (/ (* (pow b 2) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (* a (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (* (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (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))))))))))> |
#<alt (* -1 (* a (+ (* -1 (/ (+ (* -1/2 (* (/ (* (pow b 2) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (* (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (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/8 (* (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/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 (/ 1 (pow y-scale 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 x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))))) (* 4 (/ (* (pow b 8) (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 8) (* (pow y-scale 8) (* (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (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)))))))))) (* a (pow b 2))) (sqrt (/ 1 (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))))))) a)) (* 1/4 (* (/ (* (pow x-scale 2) (pow y-scale 2)) (pow b 2)) (sqrt (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))))))))> |
#<alt (* -1 (* a (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (* (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* -4 (* (/ (* (pow b 4) (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 b) (* 2 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 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (* (pow x-scale 2) (* (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)))))))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 b 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 b) (* 2 b)) (- (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/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 (/ 1 (pow y-scale 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 x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))))) (* 4 (/ (* (pow b 8) (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 8) (* (pow y-scale 8) (* (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (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))))))))))) (* (pow x-scale 4) (* (pow y-scale 4) (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (* a (pow b 2))) (sqrt (/ 1 (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 1/8 (* (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/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 (/ 1 (pow y-scale 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 x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))))) (* 4 (/ (* (pow b 8) (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 8) (* (pow y-scale 8) (* (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (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)))))))))) (pow b 2)) (sqrt (/ 1 (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))))))) a)) (* -1/2 (* (/ (* (pow b 2) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (* (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (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)))))))) a)) (* 1/4 (* (/ (* (pow x-scale 2) (pow y-scale 2)) (pow b 2)) (sqrt (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))))))))> |
#<alt (* 1/4 (* (/ (* (pow x-scale 2) (pow y-scale 2)) (* (pow a 2) (pow b 2))) (sqrt (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (/ (pow b 2) (pow x-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (pow b 6)) (* (pow x-scale 4) (pow y-scale 2))))))))> |
#<alt (+ (* 1/8 (* (/ (* (pow angle 2) (* (pow x-scale 2) (* (pow y-scale 2) (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow 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 a 2) (pow b 2))) (sqrt (/ 1 (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (/ (pow b 2) (pow x-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (pow b 6)) (* (pow x-scale 4) (pow y-scale 2))))))))) (* 1/4 (* (/ (* (pow x-scale 2) (pow y-scale 2)) (* (pow a 2) (pow b 2))) (sqrt (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (/ (pow b 2) (pow x-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (pow b 6)) (* (pow x-scale 4) (pow y-scale 2)))))))))> |
#<alt (+ (* 1/4 (* (/ (* (pow x-scale 2) (pow y-scale 2)) (* (pow a 2) (pow b 2))) (sqrt (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (/ (pow b 2) (pow x-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (pow b 6)) (* (pow x-scale 4) (pow y-scale 2)))))))) (* (pow angle 2) (+ (* 1/8 (* (/ (* (pow angle 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4)))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* -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/2 (/ (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 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))))) (* 1/4 (/ (pow (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow 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))))) 2) (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (/ (pow b 2) (pow x-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (pow b 6)) (* (pow x-scale 4) (pow y-scale 2))))))))))) (* (pow a 2) (pow b 2))) (sqrt (/ 1 (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (/ (pow b 2) (pow x-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (pow b 6)) (* (pow x-scale 4) (pow y-scale 2))))))))) (* 1/8 (* (/ (* (pow x-scale 2) (* (pow y-scale 2) (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow 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 a 2) (pow b 2))) (sqrt (/ 1 (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (/ (pow b 2) (pow x-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (pow b 6)) (* (pow x-scale 4) (pow y-scale 2))))))))))))> |
#<alt (+ (* 1/4 (* (/ (* (pow x-scale 2) (pow y-scale 2)) (* (pow a 2) (pow b 2))) (sqrt (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (/ (pow b 2) (pow x-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (pow b 6)) (* (pow x-scale 4) (pow y-scale 2)))))))) (* (pow angle 2) (+ (* 1/8 (* (/ (* (pow x-scale 2) (* (pow y-scale 2) (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow 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 a 2) (pow b 2))) (sqrt (/ 1 (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (/ (pow b 2) (pow x-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (pow b 6)) (* (pow x-scale 4) (pow y-scale 2))))))))) (* (pow angle 2) (+ (* 1/8 (* (/ (* (pow angle 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* -1/765275040000000 (* (pow b 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow a 2) (pow (PI) 6)))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* -1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow y-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))))) (/ (* (pow (+ a b) 2) (* (+ (* 1/31886460000000 (pow (PI) 6)) (* 1/19131876000000 (pow (PI) 6))) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (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 (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 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))))) (* 1/2 (/ (* (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow 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))))) (- (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4)))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* -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/2 (/ (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 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))))) (* 1/4 (/ (pow (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow 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))))) 2) (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (/ (pow b 2) (pow x-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (pow b 6)) (* (pow x-scale 4) (pow y-scale 2))))))))) (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (/ (pow b 2) (pow x-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (pow b 6)) (* (pow x-scale 4) (pow y-scale 2))))))))))) (* (pow a 2) (pow b 2))) (sqrt (/ 1 (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (/ (pow b 2) (pow x-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (pow b 6)) (* (pow x-scale 4) (pow y-scale 2))))))))) (* 1/8 (* (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4)))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* -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/2 (/ (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 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))))) (* 1/4 (/ (pow (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow 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))))) 2) (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (/ (pow b 2) (pow x-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (pow b 6)) (* (pow x-scale 4) (pow y-scale 2)))))))))) (* (pow a 2) (pow b 2))) (sqrt (/ 1 (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (/ (pow b 2) (pow x-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (pow b 6)) (* (pow x-scale 4) (pow y-scale 2))))))))))))))> |
#<alt (* 1/4 (* (/ (* (pow x-scale 2) (pow y-scale 2)) (* (pow a 2) (pow b 2))) (sqrt (+ (* 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)))))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 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))) (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-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/4 (* (/ (* (pow x-scale 2) (pow y-scale 2)) (* (pow a 2) (pow b 2))) (sqrt (+ (* 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)))))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 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))) (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-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/4 (* (/ (* (pow x-scale 2) (pow y-scale 2)) (* (pow a 2) (pow b 2))) (sqrt (+ (* 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)))))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 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))) (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-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/4 (* (/ (* (pow x-scale 2) (pow y-scale 2)) (* (pow a 2) (pow b 2))) (sqrt (+ (* 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)))))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 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))) (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-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/4 (* (/ (* (pow x-scale 2) (pow y-scale 2)) (* (pow a 2) (pow b 2))) (sqrt (+ (* 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)))))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 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))) (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-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/4 (* (/ (* (pow x-scale 2) (pow y-scale 2)) (* (pow a 2) (pow b 2))) (sqrt (+ (* 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)))))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 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))) (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-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/4 (* (/ (* (pow x-scale 2) (pow y-scale 2)) (* (pow a 2) (pow b 2))) (sqrt (+ (* 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)))))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 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))) (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-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/4 (* (/ (* (pow x-scale 2) (pow y-scale 2)) (* (pow a 2) (pow b 2))) (sqrt (+ (* 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)))))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 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))) (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-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/4 (* (/ (* (pow x-scale 2) (pow y-scale 2)) (pow a 2)) (sqrt (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))))))))> |
#<alt (+ (* -1/2 (* (/ (* (pow a 2) (* b (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (* (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (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 x-scale 2) (pow y-scale 2)) (pow a 2)) (sqrt (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))))))))> |
#<alt (+ (* 1/4 (* (/ (* (pow x-scale 2) (pow y-scale 2)) (pow a 2)) (sqrt (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))))))) (* b (+ (* -1/2 (* (/ (* (pow a 2) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (* (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (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/8 (* (/ (* b (* (pow x-scale 2) (* (pow y-scale 2) (- (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 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)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (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 x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow a 8) (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2))) (* (pow x-scale 8) (* (pow y-scale 8) (* (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (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))))))))))) (pow a 2)) (sqrt (/ 1 (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))))))))))))> |
#<alt (+ (* 1/4 (* (/ (* (pow x-scale 2) (pow y-scale 2)) (pow a 2)) (sqrt (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))))))) (* b (+ (* -1/2 (* (/ (* (pow a 2) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (* (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (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))))))) (* b (+ (* 1/8 (* (/ (* b (* (pow x-scale 2) (* (pow y-scale 2) (- (* -4 (* (/ (* (pow a 4) (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 (pow a 3)) (* 2 (pow a 3))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* 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) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* 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))) (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)))))) (* -2 (* (/ (* (pow a 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 (pow a 3)) (* 2 (pow a 3))) (- (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 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)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (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 x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow a 8) (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2))) (* (pow x-scale 8) (* (pow y-scale 8) (* (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (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))))))))))) (* (pow x-scale 4) (* (pow y-scale 4) (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (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)))))))))) (pow a 2)) (sqrt (/ 1 (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))))))))) (* 1/8 (* (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 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)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (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 x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow a 8) (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2))) (* (pow x-scale 8) (* (pow y-scale 8) (* (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (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)))))))))) (pow a 2)) (sqrt (/ 1 (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))))))))))))))> |
#<alt (* 1/4 (* (/ (* b (* (pow x-scale 2) (pow y-scale 2))) (pow a 2)) (sqrt (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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))))))))> |
#<alt (* b (+ (* -1/2 (* (/ (* (pow a 2) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (* b (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (* (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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))))) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (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 x-scale 2) (pow y-scale 2)) (pow a 2)) (sqrt (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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))))))))))> |
#<alt (* b (+ (* -1/2 (* (/ (* (pow a 2) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (* b (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (* (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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))))) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) (+ (* 1/8 (* (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/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)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))))) (* 4 (/ (* (pow a 8) (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 8) (* (pow y-scale 8) (* (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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))))) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (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) (pow b 2))) (sqrt (/ 1 (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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))))))))) (* 1/4 (* (/ (* (pow x-scale 2) (pow y-scale 2)) (pow a 2)) (sqrt (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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)))))))))))> |
#<alt (* b (+ (* -1/2 (* (/ (* (pow a 2) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (* b (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (* (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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))))) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) (+ (* 1/8 (* (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* -4 (* (/ (* (pow a 4) (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 a) (* 2 a)) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (* (pow x-scale 2) (* (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)))))))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 a 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 a) (* 2 a)) (- (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/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)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))))) (* 4 (/ (* (pow a 8) (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 8) (* (pow y-scale 8) (* (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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))))) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))))) (* (pow x-scale 4) (* (pow y-scale 4) (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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)))))))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (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) (pow b 3))) (sqrt (/ 1 (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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))))))))) (+ (* 1/8 (* (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/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)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))))) (* 4 (/ (* (pow a 8) (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 8) (* (pow y-scale 8) (* (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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))))) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (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) (pow b 2))) (sqrt (/ 1 (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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))))))))) (* 1/4 (* (/ (* (pow x-scale 2) (pow y-scale 2)) (pow a 2)) (sqrt (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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))))))))))))> |
#<alt (* -1/4 (* (/ (* b (* (pow x-scale 2) (pow y-scale 2))) (pow a 2)) (sqrt (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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))))))))> |
#<alt (* -1 (* b (+ (* 1/4 (* (/ (* (pow x-scale 2) (pow y-scale 2)) (pow a 2)) (sqrt (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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)))))))) (* 1/2 (* (/ (* (pow a 2) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (* b (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (* (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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))))) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (* -1 (* b (+ (* -1 (/ (+ (* -1/2 (* (/ (* (pow a 2) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (* (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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))))) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) (* -1/8 (* (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/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)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))))) (* 4 (/ (* (pow a 8) (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 8) (* (pow y-scale 8) (* (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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))))) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (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) b)) (sqrt (/ 1 (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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)))))))))) b)) (* 1/4 (* (/ (* (pow x-scale 2) (pow y-scale 2)) (pow a 2)) (sqrt (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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)))))))))))> |
#<alt (* -1 (* b (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (* (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* -4 (* (/ (* (pow a 4) (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 a) (* 2 a)) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (* (pow x-scale 2) (* (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)))))))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 a 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 a) (* 2 a)) (- (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/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)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))))) (* 4 (/ (* (pow a 8) (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 8) (* (pow y-scale 8) (* (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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))))) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))))) (* (pow x-scale 4) (* (pow y-scale 4) (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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)))))))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (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) b)) (sqrt (/ 1 (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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))))))))) (* 1/8 (* (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/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)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))))) (* 4 (/ (* (pow a 8) (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 8) (* (pow y-scale 8) (* (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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))))) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (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)) (sqrt (/ 1 (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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)))))))))) b)) (* -1/2 (* (/ (* (pow a 2) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (* (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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))))) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))))) b)) (* 1/4 (* (/ (* (pow x-scale 2) (pow y-scale 2)) (pow a 2)) (sqrt (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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)))))))))))> |
#<alt (* 1/4 (* (/ (pow y-scale 2) (* (pow a 2) (pow b 2))) (sqrt (+ (* -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)))))))))) (pow y-scale 2))) (* 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)))))))))) (pow y-scale 2)))))))> |
#<alt (+ (* 1/4 (* (/ (pow y-scale 2) (* (pow a 2) (pow b 2))) (sqrt (+ (* -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)))))))))) (pow y-scale 2))) (* 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)))))))))) (pow y-scale 2))))))) (* (* (pow a 2) (* (pow b 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (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 (+ (* -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)))))))))) (pow y-scale 2))) (* 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)))))))))) (pow y-scale 2))))))))> |
#<alt (+ (* 1/4 (* (/ (pow y-scale 2) (* (pow a 2) (pow b 2))) (sqrt (+ (* -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)))))))))) (pow y-scale 2))) (* 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)))))))))) (pow y-scale 2))))))) (* (pow x-scale 2) (+ (* 1/8 (* (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* -4 (/ (* (pow a 4) (* (pow b 4) (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))))) (* (pow y-scale 2) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 16 (/ (* (pow a 8) (* (pow b 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) 2))) (* (pow y-scale 4) (+ (* -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)))))))))) (pow y-scale 2))) (* 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)))))))))) (pow y-scale 2)))))))))) (* (pow a 2) (pow b 2))) (sqrt (/ 1 (+ (* -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)))))))))) (pow y-scale 2))) (* 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)))))))))) (pow y-scale 2)))))))) (* (* (pow a 2) (* (pow b 2) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (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 (+ (* -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)))))))))) (pow y-scale 2))) (* 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)))))))))) (pow y-scale 2))))))))))> |
#<alt (+ (* 1/4 (* (/ (pow y-scale 2) (* (pow a 2) (pow b 2))) (sqrt (+ (* -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)))))))))) (pow y-scale 2))) (* 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)))))))))) (pow y-scale 2))))))) (* (pow x-scale 2) (+ (* (* (pow a 2) (* (pow b 2) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (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 (+ (* -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)))))))))) (pow y-scale 2))) (* 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)))))))))) (pow y-scale 2))))))) (* (pow x-scale 2) (+ (* 1/8 (* (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 2 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 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)))))))) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (- (* -4 (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))))) (* (pow y-scale 2) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 16 (/ (* (pow a 8) (* (pow b 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) 2))) (* (pow y-scale 4) (+ (* -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)))))))))) (pow y-scale 2))) (* 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)))))))))) (pow y-scale 2)))))))) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (pow 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) (+ (* -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)))))))))) (pow y-scale 2))) (* 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)))))))))) (pow y-scale 2)))))))))) (* (pow a 2) (pow b 2))) (sqrt (/ 1 (+ (* -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)))))))))) (pow y-scale 2))) (* 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)))))))))) (pow y-scale 2)))))))) (* 1/8 (* (/ (* (pow y-scale 2) (- (* -4 (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))))) (* (pow y-scale 2) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 16 (/ (* (pow a 8) (* (pow b 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) 2))) (* (pow y-scale 4) (+ (* -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)))))))))) (pow y-scale 2))) (* 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)))))))))) (pow y-scale 2))))))))) (* (pow a 2) (pow b 2))) (sqrt (/ 1 (+ (* -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)))))))))) (pow y-scale 2))) (* 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)))))))))) (pow y-scale 2)))))))))))))> |
#<alt (* 1/4 (* (/ (pow y-scale 2) (* (pow a 2) (pow b 2))) (sqrt (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (pow y-scale 2)))))))> |
#<alt (+ (* -1/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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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 (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (pow y-scale 2)))))))) (* 1/4 (* (/ (pow y-scale 2) (* (pow a 2) (pow b 2))) (sqrt (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (pow y-scale 2))))))))> |
#<alt (+ (* -1/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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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 (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* (pow y-scale 2) (- (* 2 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 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))) 3)))) (* 4 (/ (* (pow a 8) (* (pow b 8) (pow (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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 y-scale 4) (* (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (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))))))) (* (pow a 2) (* (pow b 2) (pow x-scale 4)))) (sqrt (/ 1 (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (pow y-scale 2)))))))) (* 1/4 (* (/ (pow y-scale 2) (* (pow a 2) (pow b 2))) (sqrt (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (pow y-scale 2)))))))))> |
#<alt (+ (* -1/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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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 (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* (pow y-scale 2) (- (* 2 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 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))) 3)))) (* 4 (/ (* (pow a 8) (* (pow b 8) (pow (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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 y-scale 4) (* (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (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))))))) (* (pow a 2) (* (pow b 2) (pow x-scale 4)))) (sqrt (/ 1 (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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 y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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 4) (* (pow b 4) (* (- (* 2 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 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))) 3)))) (* 4 (/ (* (pow a 8) (* (pow b 8) (pow (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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 y-scale 4) (* (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (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)))))) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* (pow y-scale 2) (* (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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) (pow x-scale 6)))) (sqrt (/ 1 (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (pow y-scale 2)))))))) (* 1/4 (* (/ (pow y-scale 2) (* (pow a 2) (pow b 2))) (sqrt (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (pow y-scale 2))))))))))> |
#<alt (* 1/4 (* (/ (pow y-scale 2) (* (pow a 2) (pow b 2))) (sqrt (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (pow y-scale 2)))))))> |
#<alt (+ (* -1/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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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 (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (pow y-scale 2)))))))) (* 1/4 (* (/ (pow y-scale 2) (* (pow a 2) (pow b 2))) (sqrt (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (pow y-scale 2))))))))> |
#<alt (+ (* -1/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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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 (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* (pow y-scale 2) (- (* 2 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 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))) 3)))) (* 4 (/ (* (pow a 8) (* (pow b 8) (pow (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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 y-scale 4) (* (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (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))))))) (* (pow a 2) (* (pow b 2) (pow x-scale 4)))) (sqrt (/ 1 (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (pow y-scale 2)))))))) (* 1/4 (* (/ (pow y-scale 2) (* (pow a 2) (pow b 2))) (sqrt (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (pow y-scale 2)))))))))> |
#<alt (+ (* -1/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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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 (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* (pow y-scale 2) (- (* 2 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 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))) 3)))) (* 4 (/ (* (pow a 8) (* (pow b 8) (pow (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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 y-scale 4) (* (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (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))))))) (* (pow a 2) (* (pow b 2) (pow x-scale 4)))) (sqrt (/ 1 (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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 y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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 4) (* (pow b 4) (* (- (* 2 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 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))) 3)))) (* 4 (/ (* (pow a 8) (* (pow b 8) (pow (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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 y-scale 4) (* (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (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)))))) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* (pow y-scale 2) (* (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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) (pow x-scale 6)))) (sqrt (/ 1 (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (pow y-scale 2)))))))) (* 1/4 (* (/ (pow y-scale 2) (* (pow a 2) (pow b 2))) (sqrt (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (pow y-scale 2))))))))))> |
#<alt (* 1/4 (* (/ (* (pow x-scale 2) y-scale) (* (pow a 2) (pow b 2))) (sqrt (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))))) (* (pow x-scale 2) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 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)))))))))) (pow x-scale 4)))))))> |
#<alt (* y-scale (+ (* -1/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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 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 (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))))) (* (pow x-scale 2) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 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)))))))))) (pow x-scale 4)))))))) (* 1/4 (* (/ (pow x-scale 2) (* (pow a 2) (pow b 2))) (sqrt (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))))) (* (pow x-scale 2) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 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)))))))))) (pow x-scale 4)))))))))> |
#<alt (* y-scale (+ (* 1/4 (* (/ (pow x-scale 2) (* (pow a 2) (pow b 2))) (sqrt (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))))) (* (pow x-scale 2) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 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)))))))))) (pow x-scale 4))))))) (* (pow y-scale 2) (+ (* -1/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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 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 (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))))) (* (pow x-scale 2) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 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)))))))))) (pow x-scale 4)))))))) (* 1/8 (* (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 2 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 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)))))))) 3)))) (* 4 (/ (* (pow a 8) (* (pow b 8) (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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow 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 x-scale 4) (* (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))))) (* (pow x-scale 2) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 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)))))))))) (pow x-scale 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)))))))) (* (pow a 2) (pow b 2))) (sqrt (/ 1 (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))))) (* (pow x-scale 2) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 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)))))))))) (pow x-scale 4))))))))))))> |
#<alt (* y-scale (+ (* 1/4 (* (/ (pow x-scale 2) (* (pow a 2) (pow b 2))) (sqrt (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))))) (* (pow x-scale 2) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 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)))))))))) (pow x-scale 4))))))) (* (pow y-scale 2) (+ (* -1/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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 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 (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))))) (* (pow x-scale 2) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 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)))))))))) (pow x-scale 4)))))))) (* (pow y-scale 2) (+ (* 1/8 (* (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow 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 x-scale 2) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* -2 (/ (* (pow a 4) (* (pow b 4) (* (- (* 2 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 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)))))))) 3)))) (* 4 (/ (* (pow a 8) (* (pow b 8) (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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow 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 x-scale 4) (* (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))))) (* (pow x-scale 2) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 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)))))))))) (pow x-scale 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)))))) (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))))) (* (pow x-scale 2) (* (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))))) (* (pow x-scale 2) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 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)))))))))) (pow x-scale 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))))))))))))))) (* (pow a 2) (pow b 2))) (sqrt (/ 1 (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))))) (* (pow x-scale 2) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 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)))))))))) (pow x-scale 4)))))))) (* 1/8 (* (/ (* (pow x-scale 2) (- (* 2 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 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)))))))) 3)))) (* 4 (/ (* (pow a 8) (* (pow b 8) (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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow 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 x-scale 4) (* (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))))) (* (pow x-scale 2) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 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)))))))))) (pow x-scale 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))))))) (* (pow a 2) (pow b 2))) (sqrt (/ 1 (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))))) (* (pow x-scale 2) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 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)))))))))) (pow x-scale 4))))))))))))))> |
#<alt (* 1/4 (* (/ (* (pow x-scale 2) y-scale) (* (pow a 2) (pow b 2))) (sqrt (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4)))))))> |
#<alt (* y-scale (+ (* 1/4 (* (/ (pow x-scale 2) (* (pow a 2) (pow b 2))) (sqrt (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4))))))) (* (/ (* (pow a 2) (* (pow b 2) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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)) (sqrt (/ 1 (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4)))))))))> |
#<alt (* y-scale (+ (* 1/8 (* (/ (* (pow x-scale 2) (- (* -4 (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) (* 16 (/ (* (pow a 8) (* (pow b 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)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) 2))) (* (pow x-scale 4) (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4))))))))) (* (pow a 2) (* (pow b 2) (pow y-scale 4)))) (sqrt (/ 1 (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4)))))))) (+ (* 1/4 (* (/ (pow x-scale 2) (* (pow a 2) (pow b 2))) (sqrt (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4))))))) (* (/ (* (pow a 2) (* (pow b 2) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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)) (sqrt (/ 1 (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4))))))))))> |
#<alt (* y-scale (+ (* 1/8 (* (/ (* (pow x-scale 2) (- (* -4 (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) (* 16 (/ (* (pow a 8) (* (pow b 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)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) 2))) (* (pow x-scale 4) (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4))))))))) (* (pow a 2) (* (pow b 2) (pow y-scale 4)))) (sqrt (/ 1 (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4)))))))) (+ (* 1/8 (* (/ (* (pow x-scale 2) (- (* 2 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 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))) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (- (* -4 (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) (* 16 (/ (* (pow a 8) (* (pow b 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)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) 2))) (* (pow x-scale 4) (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4))))))))) (* (pow a 2) (* (pow b 2) (pow y-scale 6)))) (sqrt (/ 1 (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4)))))))) (+ (* 1/4 (* (/ (pow x-scale 2) (* (pow a 2) (pow b 2))) (sqrt (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4))))))) (* (/ (* (pow a 2) (* (pow b 2) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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)) (sqrt (/ 1 (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4)))))))))))> |
#<alt (* -1/4 (* (/ (* (pow x-scale 2) y-scale) (* (pow a 2) (pow b 2))) (sqrt (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4)))))))> |
#<alt (* -1 (* y-scale (+ (* 1/4 (* (/ (pow x-scale 2) (* (pow a 2) (pow b 2))) (sqrt (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4))))))) (* (/ (* (pow a 2) (* (pow b 2) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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)) (sqrt (/ 1 (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4))))))))))> |
#<alt (* -1 (* y-scale (+ (* 1/8 (* (/ (* (pow x-scale 2) (- (* -4 (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) (* 16 (/ (* (pow a 8) (* (pow b 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)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) 2))) (* (pow x-scale 4) (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4))))))))) (* (pow a 2) (* (pow b 2) (pow y-scale 4)))) (sqrt (/ 1 (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4)))))))) (+ (* 1/4 (* (/ (pow x-scale 2) (* (pow a 2) (pow b 2))) (sqrt (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4))))))) (* (/ (* (pow a 2) (* (pow b 2) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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)) (sqrt (/ 1 (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4)))))))))))> |
#<alt (* -1 (* y-scale (+ (* 1/8 (* (/ (* (pow x-scale 2) (- (* -4 (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) (* 16 (/ (* (pow a 8) (* (pow b 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)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) 2))) (* (pow x-scale 4) (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4))))))))) (* (pow a 2) (* (pow b 2) (pow y-scale 4)))) (sqrt (/ 1 (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4)))))))) (+ (* 1/8 (* (/ (* (pow x-scale 2) (- (* 2 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 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))) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (- (* -4 (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) (* 16 (/ (* (pow a 8) (* (pow b 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)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) 2))) (* (pow x-scale 4) (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4))))))))) (* (pow a 2) (* (pow b 2) (pow y-scale 6)))) (sqrt (/ 1 (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4)))))))) (+ (* 1/4 (* (/ (pow x-scale 2) (* (pow a 2) (pow b 2))) (sqrt (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4))))))) (* (/ (* (pow a 2) (* (pow b 2) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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)) (sqrt (/ 1 (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4))))))))))))> |
#<alt (* (pow a 2) (sqrt (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))))))> |
#<alt (* (pow a 2) (+ (sqrt (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))))) (* -2 (* (/ (* a (* (pow b 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))))) (* (pow x-scale 4) (pow y-scale 4))) (sqrt (/ 1 (* (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (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)))))))))> |
#<alt (* (pow a 2) (+ (sqrt (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))))) (* a (+ (* -2 (* (/ (* (pow b 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* (pow x-scale 4) (pow y-scale 4))) (sqrt (/ 1 (* (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (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/2 (* (* a (- (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 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)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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 (/ (* (pow b 8) (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2))) (* (pow x-scale 8) (* (pow y-scale 8) (* (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (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))))))))) (sqrt (/ 1 (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))))))))))))> |
#<alt (* (pow a 2) (+ (sqrt (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))))) (* a (+ (* -2 (* (/ (* (pow b 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* (pow x-scale 4) (pow y-scale 4))) (sqrt (/ 1 (* (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (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))))))) (* a (+ (* 1/2 (* (sqrt (/ 1 (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))))))) (- (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 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)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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 (/ (* (pow b 8) (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2))) (* (pow x-scale 8) (* (pow y-scale 8) (* (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (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/2 (* (* a (- (* -4 (* (/ (* (pow b 4) (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 (pow b 3)) (* 2 (pow b 3))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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))) (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)))))) (* -2 (* (/ (* (pow b 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 (pow b 3)) (* 2 (pow b 3))) (- (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 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)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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 (/ (* (pow b 8) (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2))) (* (pow x-scale 8) (* (pow y-scale 8) (* (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (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))))))))))) (* (pow x-scale 4) (* (pow y-scale 4) (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (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)))))))) (sqrt (/ 1 (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))))))))))))))> |
#<alt (* (pow a 3) (sqrt (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))))> |
#<alt (* (pow a 3) (+ (sqrt (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (* -2 (* (/ (* (pow b 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (* a (* (pow x-scale 4) (pow y-scale 4)))) (sqrt (/ 1 (* (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (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)))))))))> |
#<alt (* (pow a 3) (+ (sqrt (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (+ (* -2 (* (/ (* (pow b 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (* a (* (pow x-scale 4) (pow y-scale 4)))) (sqrt (/ 1 (* (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (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/2 (* (/ (- (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/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 (/ 1 (pow y-scale 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 x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))))) (* 4 (/ (* (pow b 8) (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 8) (* (pow y-scale 8) (* (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (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)))))))) (pow a 2)) (sqrt (/ 1 (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))))))))> |
#<alt (* (pow a 3) (+ (sqrt (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (+ (* -2 (* (/ (* (pow b 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (* a (* (pow x-scale 4) (pow y-scale 4)))) (sqrt (/ 1 (* (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (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/2 (* (/ (- (* -4 (* (/ (* (pow b 4) (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 b) (* 2 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 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (* (pow x-scale 2) (* (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)))))))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 b 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 b) (* 2 b)) (- (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/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 (/ 1 (pow y-scale 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 x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))))) (* 4 (/ (* (pow b 8) (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 8) (* (pow y-scale 8) (* (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (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))))))))))) (* (pow x-scale 4) (* (pow y-scale 4) (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 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 3)) (sqrt (/ 1 (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 1/2 (* (/ (- (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/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 (/ 1 (pow y-scale 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 x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))))) (* 4 (/ (* (pow b 8) (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 8) (* (pow y-scale 8) (* (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (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)))))))) (pow a 2)) (sqrt (/ 1 (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))))))))))> |
#<alt (* -1 (* (pow a 3) (sqrt (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))))> |
#<alt (* -1 (* (pow a 3) (+ (sqrt (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (* 2 (* (/ (* (pow b 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (* a (* (pow x-scale 4) (pow y-scale 4)))) (sqrt (/ 1 (* (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (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))))))))))> |
#<alt (* -1 (* (pow a 3) (+ (sqrt (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (* -1 (/ (+ (* -2 (* (/ (* (pow b 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (* (pow x-scale 4) (pow y-scale 4))) (sqrt (/ 1 (* (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (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/2 (* (/ (- (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/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 (/ 1 (pow y-scale 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 x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))))) (* 4 (/ (* (pow b 8) (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 8) (* (pow y-scale 8) (* (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (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)))))))) a) (sqrt (/ 1 (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))))))) a)))))> |
#<alt (* -1 (* (pow a 3) (+ (sqrt (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (* -1 (/ (+ (* -2 (* (/ (* (pow b 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (* (pow x-scale 4) (pow y-scale 4))) (sqrt (/ 1 (* (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (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 (/ (+ (* -1/2 (* (/ (- (* -4 (* (/ (* (pow b 4) (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 b) (* 2 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 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (* (pow x-scale 2) (* (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)))))))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 b 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 b) (* 2 b)) (- (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/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 (/ 1 (pow y-scale 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 x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))))) (* 4 (/ (* (pow b 8) (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 8) (* (pow y-scale 8) (* (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (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))))))))))) (* (pow x-scale 4) (* (pow y-scale 4) (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))) a) (sqrt (/ 1 (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 1/2 (* (sqrt (/ 1 (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (- (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/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 (/ 1 (pow y-scale 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 x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))))) (* 4 (/ (* (pow b 8) (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 8) (* (pow y-scale 8) (* (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (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))))))))))) a))) a)))))> |
#<alt (sqrt (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (/ (pow b 2) (pow x-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (pow b 6)) (* (pow x-scale 4) (pow y-scale 2))))))> |
#<alt (+ (sqrt (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (/ (pow b 2) (pow x-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (pow b 6)) (* (pow x-scale 4) (pow y-scale 2)))))) (* 1/2 (* (* (pow angle 2) (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow 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)))))) (sqrt (/ 1 (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (/ (pow b 2) (pow x-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (pow b 6)) (* (pow x-scale 4) (pow y-scale 2))))))))))> |
#<alt (+ (sqrt (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (/ (pow b 2) (pow x-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (pow b 6)) (* (pow x-scale 4) (pow y-scale 2)))))) (* (pow angle 2) (+ (* 1/2 (* (* (pow angle 2) (- (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4)))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* -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/2 (/ (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 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))))) (* 1/4 (/ (pow (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow 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))))) 2) (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (/ (pow b 2) (pow x-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (pow b 6)) (* (pow x-scale 4) (pow y-scale 2))))))))) (sqrt (/ 1 (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (/ (pow b 2) (pow x-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (pow b 6)) (* (pow x-scale 4) (pow y-scale 2))))))))) (* 1/2 (* (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow 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))))) (sqrt (/ 1 (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (/ (pow b 2) (pow x-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (pow b 6)) (* (pow x-scale 4) (pow y-scale 2))))))))))))> |
#<alt (+ (sqrt (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (/ (pow b 2) (pow x-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (pow b 6)) (* (pow x-scale 4) (pow y-scale 2)))))) (* (pow angle 2) (+ (* 1/2 (* (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow 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))))) (sqrt (/ 1 (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (/ (pow b 2) (pow x-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (pow b 6)) (* (pow x-scale 4) (pow y-scale 2))))))))) (* (pow angle 2) (+ (* 1/2 (* (sqrt (/ 1 (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (/ (pow b 2) (pow x-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (pow b 6)) (* (pow x-scale 4) (pow y-scale 2))))))) (- (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4)))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* -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/2 (/ (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 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))))) (* 1/4 (/ (pow (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow 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))))) 2) (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (/ (pow b 2) (pow x-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (pow b 6)) (* (pow x-scale 4) (pow y-scale 2)))))))))) (* 1/2 (* (* (pow angle 2) (- (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* -1/765275040000000 (* (pow b 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow a 2) (pow (PI) 6)))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* -1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow y-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))))) (/ (* (pow (+ a b) 2) (* (+ (* 1/31886460000000 (pow (PI) 6)) (* 1/19131876000000 (pow (PI) 6))) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (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 (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 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))))) (* 1/2 (/ (* (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow 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))))) (- (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4)))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* -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/2 (/ (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 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))))) (* 1/4 (/ (pow (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow 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))))) 2) (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (/ (pow b 2) (pow x-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (pow b 6)) (* (pow x-scale 4) (pow y-scale 2))))))))) (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (/ (pow b 2) (pow x-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (pow b 6)) (* (pow x-scale 4) (pow y-scale 2))))))))) (sqrt (/ 1 (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (/ (pow b 2) (pow x-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (pow b 6)) (* (pow x-scale 4) (pow y-scale 2))))))))))))))> |
#<alt (sqrt (+ (* 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)))))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 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))) (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-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 (sqrt (+ (* 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)))))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 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))) (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-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 (sqrt (+ (* 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)))))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 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))) (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-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 (sqrt (+ (* 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)))))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 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))) (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-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 (sqrt (+ (* 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)))))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 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))) (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-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 (sqrt (+ (* 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)))))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 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))) (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-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 (sqrt (+ (* 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)))))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 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))) (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-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 (sqrt (+ (* 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)))))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 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))) (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-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 (* (pow b 2) (sqrt (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))))))> |
#<alt (* (pow b 2) (+ (sqrt (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))))) (* -2 (* (/ (* (pow a 4) (* b (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))))) (* (pow x-scale 4) (pow y-scale 4))) (sqrt (/ 1 (* (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (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)))))))))> |
#<alt (* (pow b 2) (+ (sqrt (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))))) (* b (+ (* -2 (* (/ (* (pow a 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* (pow x-scale 4) (pow y-scale 4))) (sqrt (/ 1 (* (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (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/2 (* (* b (- (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 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)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (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 x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow a 8) (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2))) (* (pow x-scale 8) (* (pow y-scale 8) (* (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (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))))))))) (sqrt (/ 1 (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))))))))))))> |
#<alt (* (pow b 2) (+ (sqrt (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))))) (* b (+ (* -2 (* (/ (* (pow a 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* (pow x-scale 4) (pow y-scale 4))) (sqrt (/ 1 (* (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (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))))))) (* b (+ (* 1/2 (* (sqrt (/ 1 (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))))))) (- (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 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)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (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 x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow a 8) (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2))) (* (pow x-scale 8) (* (pow y-scale 8) (* (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (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/2 (* (* b (- (* -4 (* (/ (* (pow a 4) (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 (pow a 3)) (* 2 (pow a 3))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* 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) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* 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))) (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)))))) (* -2 (* (/ (* (pow a 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 (pow a 3)) (* 2 (pow a 3))) (- (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 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)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (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 x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow a 8) (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2))) (* (pow x-scale 8) (* (pow y-scale 8) (* (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (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))))))))))) (* (pow x-scale 4) (* (pow y-scale 4) (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (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)))))))) (sqrt (/ 1 (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))))))))))))))> |
#<alt (* (pow b 3) (sqrt (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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)))))))> |
#<alt (* (pow b 3) (+ (sqrt (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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)))))) (* -2 (* (/ (* (pow a 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (* b (* (pow x-scale 4) (pow y-scale 4)))) (sqrt (/ 1 (* (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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))))) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (* (pow b 3) (+ (sqrt (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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)))))) (+ (* -2 (* (/ (* (pow a 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (* b (* (pow x-scale 4) (pow y-scale 4)))) (sqrt (/ 1 (* (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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))))) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) (* 1/2 (* (/ (- (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/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)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))))) (* 4 (/ (* (pow a 8) (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 8) (* (pow y-scale 8) (* (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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))))) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (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 (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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))))))))))))> |
#<alt (* (pow b 3) (+ (sqrt (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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)))))) (+ (* -2 (* (/ (* (pow a 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (* b (* (pow x-scale 4) (pow y-scale 4)))) (sqrt (/ 1 (* (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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))))) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) (+ (* 1/2 (* (/ (- (* -4 (* (/ (* (pow a 4) (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 a) (* 2 a)) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (* (pow x-scale 2) (* (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)))))))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 a 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 a) (* 2 a)) (- (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/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)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))))) (* 4 (/ (* (pow a 8) (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 8) (* (pow y-scale 8) (* (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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))))) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))))) (* (pow x-scale 4) (* (pow y-scale 4) (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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)))))))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (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 3)) (sqrt (/ 1 (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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))))))))) (* 1/2 (* (/ (- (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/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)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))))) (* 4 (/ (* (pow a 8) (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 8) (* (pow y-scale 8) (* (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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))))) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (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 (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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)))))))))))))> |
#<alt (* -1 (* (pow b 3) (sqrt (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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))))))))> |
#<alt (* -1 (* (pow b 3) (+ (sqrt (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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)))))) (* 2 (* (/ (* (pow a 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (* b (* (pow x-scale 4) (pow y-scale 4)))) (sqrt (/ 1 (* (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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))))) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (* -1 (* (pow b 3) (+ (sqrt (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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)))))) (* -1 (/ (+ (* -2 (* (/ (* (pow a 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (* (pow x-scale 4) (pow y-scale 4))) (sqrt (/ 1 (* (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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))))) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) (* -1/2 (* (/ (- (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/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)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))))) (* 4 (/ (* (pow a 8) (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 8) (* (pow y-scale 8) (* (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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))))) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))))) b) (sqrt (/ 1 (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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)))))))))) b)))))> |
#<alt (* -1 (* (pow b 3) (+ (sqrt (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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)))))) (* -1 (/ (+ (* -2 (* (/ (* (pow a 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (* (pow x-scale 4) (pow y-scale 4))) (sqrt (/ 1 (* (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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))))) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) (* -1 (/ (+ (* -1/2 (* (/ (- (* -4 (* (/ (* (pow a 4) (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 a) (* 2 a)) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (* (pow x-scale 2) (* (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)))))))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 a 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 a) (* 2 a)) (- (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/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)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))))) (* 4 (/ (* (pow a 8) (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 8) (* (pow y-scale 8) (* (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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))))) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))))) (* (pow x-scale 4) (* (pow y-scale 4) (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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)))))))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) b) (sqrt (/ 1 (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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))))))))) (* 1/2 (* (sqrt (/ 1 (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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))))))) (- (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/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)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))))) (* 4 (/ (* (pow a 8) (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 8) (* (pow y-scale 8) (* (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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))))) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))))) b))) b)))))> |
#<alt (* (/ 1 (pow x-scale 2)) (sqrt (+ (* -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)))))))))) (pow y-scale 2))) (* 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)))))))))) (pow y-scale 2))))))> |
#<alt (/ (+ (sqrt (+ (* -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)))))))))) (pow y-scale 2))) (* 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)))))))))) (pow y-scale 2))))) (* 4 (* (/ (* (pow a 4) (* (pow b 4) (* (pow x-scale 2) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (pow 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)) (sqrt (/ 1 (+ (* -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)))))))))) (pow y-scale 2))) (* 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)))))))))) (pow y-scale 2))))))))) (pow x-scale 2))> |
#<alt (/ (+ (sqrt (+ (* -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)))))))))) (pow y-scale 2))) (* 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)))))))))) (pow y-scale 2))))) (* (pow x-scale 2) (+ (* 1/2 (* (* (pow x-scale 2) (- (* -4 (/ (* (pow a 4) (* (pow b 4) (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))))) (* (pow y-scale 2) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 16 (/ (* (pow a 8) (* (pow b 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) 2))) (* (pow y-scale 4) (+ (* -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)))))))))) (pow y-scale 2))) (* 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)))))))))) (pow y-scale 2))))))))) (sqrt (/ 1 (+ (* -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)))))))))) (pow y-scale 2))) (* 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)))))))))) (pow y-scale 2)))))))) (* 4 (* (/ (* (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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (pow 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)) (sqrt (/ 1 (+ (* -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)))))))))) (pow y-scale 2))) (* 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)))))))))) (pow y-scale 2))))))))))) (pow x-scale 2))> |
#<alt (/ (+ (sqrt (+ (* -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)))))))))) (pow y-scale 2))) (* 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)))))))))) (pow y-scale 2))))) (* (pow x-scale 2) (+ (* 4 (* (/ (* (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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (pow 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)) (sqrt (/ 1 (+ (* -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)))))))))) (pow y-scale 2))) (* 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)))))))))) (pow y-scale 2)))))))) (* (pow x-scale 2) (+ (* 1/2 (* (sqrt (/ 1 (+ (* -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)))))))))) (pow y-scale 2))) (* 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)))))))))) (pow y-scale 2)))))) (- (* -4 (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))))) (* (pow y-scale 2) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 16 (/ (* (pow a 8) (* (pow b 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) 2))) (* (pow y-scale 4) (+ (* -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)))))))))) (pow y-scale 2))) (* 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)))))))))) (pow y-scale 2)))))))))) (* 1/2 (* (* (pow x-scale 2) (- (* 2 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 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)))))))) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (- (* -4 (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))))) (* (pow y-scale 2) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 16 (/ (* (pow a 8) (* (pow b 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) 2))) (* (pow y-scale 4) (+ (* -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)))))))))) (pow y-scale 2))) (* 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)))))))))) (pow y-scale 2)))))))) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (pow 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) (+ (* -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)))))))))) (pow y-scale 2))) (* 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)))))))))) (pow y-scale 2))))))))) (sqrt (/ 1 (+ (* -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)))))))))) (pow y-scale 2))) (* 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)))))))))) (pow y-scale 2))))))))))))) (pow x-scale 2))> |
#<alt (* (/ 1 (pow x-scale 2)) (sqrt (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (pow y-scale 2))))))> |
#<alt (/ (+ (sqrt (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (pow y-scale 2))))) (* -2 (* (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (pow y-scale 2))))))))) (pow x-scale 2))> |
#<alt (/ (+ (sqrt (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (pow y-scale 2))))) (+ (* -2 (* (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (pow y-scale 2)))))))) (* 1/2 (* (/ (- (* 2 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 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))) 3)))) (* 4 (/ (* (pow a 8) (* (pow b 8) (pow (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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 y-scale 4) (* (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (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)))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (pow y-scale 2)))))))))) (pow x-scale 2))> |
#<alt (/ (+ (sqrt (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (pow y-scale 2))))) (+ (* -2 (* (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (pow y-scale 2)))))))) (+ (* 1/2 (* (/ (- (* 2 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 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))) 3)))) (* 4 (/ (* (pow a 8) (* (pow b 8) (pow (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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 y-scale 4) (* (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (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)))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (pow y-scale 2)))))))) (* 1/2 (* (/ (- (* 4 (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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 y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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 4) (* (pow b 4) (* (- (* 2 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 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))) 3)))) (* 4 (/ (* (pow a 8) (* (pow b 8) (pow (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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 y-scale 4) (* (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (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)))))) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* (pow y-scale 2) (* (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (pow y-scale 2))))))))))) (pow x-scale 2))> |
#<alt (* (/ 1 (pow x-scale 2)) (sqrt (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (pow y-scale 2))))))> |
#<alt (/ (+ (sqrt (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (pow y-scale 2))))) (* -2 (* (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (pow y-scale 2))))))))) (pow x-scale 2))> |
#<alt (/ (+ (sqrt (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (pow y-scale 2))))) (+ (* -2 (* (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (pow y-scale 2)))))))) (* 1/2 (* (/ (- (* 2 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 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))) 3)))) (* 4 (/ (* (pow a 8) (* (pow b 8) (pow (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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 y-scale 4) (* (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (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)))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (pow y-scale 2)))))))))) (pow x-scale 2))> |
#<alt (/ (+ (sqrt (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (pow y-scale 2))))) (+ (* -2 (* (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (pow y-scale 2)))))))) (+ (* 1/2 (* (/ (- (* 2 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 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))) 3)))) (* 4 (/ (* (pow a 8) (* (pow b 8) (pow (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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 y-scale 4) (* (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (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)))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (pow y-scale 2)))))))) (* 1/2 (* (/ (- (* 4 (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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 y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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 4) (* (pow b 4) (* (- (* 2 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 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))) 3)))) (* 4 (/ (* (pow a 8) (* (pow b 8) (pow (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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 y-scale 4) (* (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (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)))))) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* (pow y-scale 2) (* (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (pow y-scale 2))))))))))) (pow x-scale 2))> |
#<alt (* (/ 1 y-scale) (sqrt (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))))) (* (pow x-scale 2) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 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)))))))))) (pow x-scale 4))))))> |
#<alt (/ (+ (sqrt (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))))) (* (pow x-scale 2) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 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)))))))))) (pow x-scale 4))))) (* -2 (* (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))))) (* (pow x-scale 2) (+ (* (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 (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))))) (* (pow x-scale 2) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 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)))))))))) (pow x-scale 4))))))))) y-scale)> |
#<alt (/ (+ (sqrt (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))))) (* (pow x-scale 2) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 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)))))))))) (pow x-scale 4))))) (* (pow y-scale 2) (+ (* -2 (* (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))))) (* (pow x-scale 2) (+ (* (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 (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))))) (* (pow x-scale 2) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 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)))))))))) (pow x-scale 4)))))))) (* 1/2 (* (* (pow y-scale 2) (- (* 2 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 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)))))))) 3)))) (* 4 (/ (* (pow a 8) (* (pow b 8) (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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow 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 x-scale 4) (* (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))))) (* (pow x-scale 2) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 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)))))))))) (pow x-scale 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))))))) (sqrt (/ 1 (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))))) (* (pow x-scale 2) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 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)))))))))) (pow x-scale 4))))))))))) y-scale)> |
#<alt (/ (+ (sqrt (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))))) (* (pow x-scale 2) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 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)))))))))) (pow x-scale 4))))) (* (pow y-scale 2) (+ (* -2 (* (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))))) (* (pow x-scale 2) (+ (* (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 (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))))) (* (pow x-scale 2) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 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)))))))))) (pow x-scale 4)))))))) (* (pow y-scale 2) (+ (* 1/2 (* (sqrt (/ 1 (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))))) (* (pow x-scale 2) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 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)))))))))) (pow x-scale 4)))))) (- (* 2 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 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)))))))) 3)))) (* 4 (/ (* (pow a 8) (* (pow b 8) (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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow 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 x-scale 4) (* (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))))) (* (pow x-scale 2) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 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)))))))))) (pow x-scale 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/2 (* (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow 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 x-scale 2) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* -2 (/ (* (pow a 4) (* (pow b 4) (* (- (* 2 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 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)))))))) 3)))) (* 4 (/ (* (pow a 8) (* (pow b 8) (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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow 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 x-scale 4) (* (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))))) (* (pow x-scale 2) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 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)))))))))) (pow x-scale 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)))))) (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))))) (* (pow x-scale 2) (* (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))))) (* (pow x-scale 2) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 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)))))))))) (pow x-scale 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)))))))))))))) (sqrt (/ 1 (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))))) (* (pow x-scale 2) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 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)))))))))) (pow x-scale 4))))))))))))) y-scale)> |
#<alt (* (/ 1 y-scale) (sqrt (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4))))))> |
#<alt (/ (+ (sqrt (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4))))) (* 4 (* (/ (* (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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (pow y-scale 2))) (sqrt (/ 1 (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4))))))))) y-scale)> |
#<alt (/ (+ (sqrt (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4))))) (+ (* 1/2 (* (/ (- (* -4 (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) (* 16 (/ (* (pow a 8) (* (pow b 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)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) 2))) (* (pow x-scale 4) (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4)))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4)))))))) (* 4 (* (/ (* (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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (pow y-scale 2))) (sqrt (/ 1 (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4)))))))))) y-scale)> |
#<alt (/ (+ (sqrt (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4))))) (+ (* 1/2 (* (/ (- (* -4 (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) (* 16 (/ (* (pow a 8) (* (pow b 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)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) 2))) (* (pow x-scale 4) (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4)))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4)))))))) (+ (* 1/2 (* (/ (- (* 2 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 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))) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (- (* -4 (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) (* 16 (/ (* (pow a 8) (* (pow b 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)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) 2))) (* (pow x-scale 4) (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4)))))))) (pow y-scale 6)) (sqrt (/ 1 (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4)))))))) (* 4 (* (/ (* (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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (pow y-scale 2))) (sqrt (/ 1 (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4))))))))))) y-scale)> |
#<alt (* -1 (* (/ 1 y-scale) (sqrt (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4)))))))> |
#<alt (* -1 (/ (+ (sqrt (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4))))) (* 4 (* (/ (* (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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (pow y-scale 2))) (sqrt (/ 1 (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4))))))))) y-scale))> |
#<alt (* -1 (/ (+ (sqrt (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4))))) (+ (* 1/2 (* (/ (- (* -4 (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) (* 16 (/ (* (pow a 8) (* (pow b 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)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) 2))) (* (pow x-scale 4) (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4)))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4)))))))) (* 4 (* (/ (* (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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (pow y-scale 2))) (sqrt (/ 1 (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4)))))))))) y-scale))> |
#<alt (* -1 (/ (+ (sqrt (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4))))) (+ (* 1/2 (* (/ (- (* -4 (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) (* 16 (/ (* (pow a 8) (* (pow b 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)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) 2))) (* (pow x-scale 4) (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4)))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4)))))))) (+ (* 1/2 (* (/ (- (* 2 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 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))) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (- (* -4 (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) (* 16 (/ (* (pow a 8) (* (pow b 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)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) 2))) (* (pow x-scale 4) (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4)))))))) (pow y-scale 6)) (sqrt (/ 1 (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4)))))))) (* 4 (* (/ (* (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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (pow y-scale 2))) (sqrt (/ 1 (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4))))))))))) y-scale))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))> |
#<alt (* x-scale (+ (* -1/16 (* (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (sqrt (/ 1 (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))> |
#<alt (* x-scale (+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (* (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 b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 6) (pow (cos (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (pow (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) 2) (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))))) (sqrt (/ 1 (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))) (* -1/16 (* (/ (* y-scale (* (sqrt 8) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (sqrt (/ 1 (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))))))> |
#<alt (* x-scale (+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* (pow x-scale 2) (+ (* -1/16 (* (/ (* y-scale (* (sqrt 8) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (sqrt (/ 1 (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))) (* (pow x-scale 2) (+ (* -1/8 (* (* y-scale (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 6) (pow (cos (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (pow (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) 2) (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))))) (sqrt (/ 1 (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (* (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 b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 8) (pow (cos (* 1/180 (* angle (PI)))) 8)))) (* 1/4 (/ (pow (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) 2) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* 1/4 (/ (* (+ (* -1/4 (/ (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 6) (pow (cos (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (pow (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) 2) (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))))) (sqrt (/ 1 (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))))))))> |
#<alt (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))> |
#<alt (+ (* -1/16 (* (/ (* (pow y-scale 3) (* (sqrt 8) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 2) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (sqrt (/ 1 (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))> |
#<alt (+ (* -1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* -1/4 (/ (* (pow y-scale 6) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (* (pow y-scale 4) (pow (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) 2)) (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))))) (pow x-scale 4)) (sqrt (/ 1 (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (+ (* -1/16 (* (/ (* (pow y-scale 3) (* (sqrt 8) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 2) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (sqrt (/ 1 (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))> |
#<alt (+ (* -1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* -1/2 (/ (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow y-scale 8) (* (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 8) (pow (sin (* 1/180 (* angle (PI)))) 8)))) (* 1/4 (/ (* (pow y-scale 4) (pow (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* 1/4 (/ (* (pow y-scale 2) (* (+ (* -1/4 (/ (* (pow y-scale 6) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (* (pow y-scale 4) (pow (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) 2)) (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))))) (pow x-scale 6)) (sqrt (/ 1 (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (+ (* -1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* -1/4 (/ (* (pow y-scale 6) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (* (pow y-scale 4) (pow (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) 2)) (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))))) (pow x-scale 4)) (sqrt (/ 1 (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (+ (* -1/16 (* (/ (* (pow y-scale 3) (* (sqrt 8) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 2) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (sqrt (/ 1 (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))))> |
#<alt (* -1/4 (* (* y-scale (sqrt 8)) (sqrt (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))> |
#<alt (+ (* -1/4 (* (* y-scale (sqrt 8)) (sqrt (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/16 (* (/ (* (pow y-scale 3) (* (sqrt 8) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 2) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (sqrt (/ 1 (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))> |
#<alt (+ (* -1/4 (* (* y-scale (sqrt 8)) (sqrt (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (+ (* 1/16 (* (/ (* (pow y-scale 3) (* (sqrt 8) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 2) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (sqrt (/ 1 (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* -1/4 (/ (* (pow y-scale 6) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (* (pow y-scale 4) (pow (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) 2)) (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))))) (pow x-scale 4)) (sqrt (/ 1 (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))))> |
#<alt (+ (* -1/4 (* (* y-scale (sqrt 8)) (sqrt (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (+ (* 1/16 (* (/ (* (pow y-scale 3) (* (sqrt 8) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 2) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (sqrt (/ 1 (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* -1/2 (/ (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow y-scale 8) (* (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 8) (pow (sin (* 1/180 (* angle (PI)))) 8)))) (* 1/4 (/ (* (pow y-scale 4) (pow (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* 1/4 (/ (* (pow y-scale 2) (* (+ (* -1/4 (/ (* (pow y-scale 6) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (* (pow y-scale 4) (pow (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) 2)) (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))))) (pow x-scale 6)) (sqrt (/ 1 (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* -1/4 (/ (* (pow y-scale 6) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (* (pow y-scale 4) (pow (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) 2)) (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))))) (pow x-scale 4)) (sqrt (/ 1 (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 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)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))> |
#<alt (* y-scale (+ (* -1/16 (* (/ (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (/ 1 (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))> |
#<alt (* y-scale (+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* (pow y-scale 2) (+ (* -1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (pow (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) 2) (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))))) (sqrt (/ 1 (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (* -1/16 (* (/ (* x-scale (* (sqrt 8) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (/ 1 (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))))))> |
#<alt (* y-scale (+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* (pow y-scale 2) (+ (* -1/16 (* (/ (* x-scale (* (sqrt 8) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (/ 1 (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (* (pow y-scale 2) (+ (* -1/8 (* (* x-scale (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (pow (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) 2) (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))))) (sqrt (/ 1 (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (* -1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (+ (* -1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 8) (pow (sin (* 1/180 (* angle (PI)))) 8)))) (* 1/4 (/ (pow (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) 2) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* 1/4 (/ (* (+ (* -1/4 (/ (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (pow (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) 2) (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))))) (sqrt (/ 1 (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))))))))> |
#<alt (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (- (* (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))))))))> |
#<alt (+ (* -1/16 (* (/ (* (pow x-scale 3) (* (sqrt 8) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 2) (* (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (sqrt (/ 1 (- (* (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))))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (- (* (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)))))))))> |
#<alt (+ (* -1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* -1/4 (/ (* (pow x-scale 6) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 6) (pow (cos (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 4) (pow (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) 2)) (* (pow b 4) (* (pow (cos (* 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 b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))))) (pow y-scale 4)) (sqrt (/ 1 (- (* (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))))))))) (+ (* -1/16 (* (/ (* (pow x-scale 3) (* (sqrt 8) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 2) (* (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (sqrt (/ 1 (- (* (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))))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (- (* (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))))))))))> |
#<alt (+ (* -1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 8) (* (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 8) (pow (cos (* 1/180 (* angle (PI)))) 8)))) (* 1/4 (/ (* (pow x-scale 4) (pow (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* 1/4 (/ (* (pow x-scale 2) (* (+ (* -1/4 (/ (* (pow x-scale 6) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 6) (pow (cos (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 4) (pow (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) 2)) (* (pow b 4) (* (pow (cos (* 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 b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 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 (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 y-scale 6)) (sqrt (/ 1 (- (* (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))))))))) (+ (* -1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* -1/4 (/ (* (pow x-scale 6) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 6) (pow (cos (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 4) (pow (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) 2)) (* (pow b 4) (* (pow (cos (* 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 b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))))) (pow y-scale 4)) (sqrt (/ 1 (- (* (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))))))))) (+ (* -1/16 (* (/ (* (pow x-scale 3) (* (sqrt 8) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 2) (* (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (sqrt (/ 1 (- (* (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))))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (- (* (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)))))))))))> |
#<alt (* -1/4 (* (* x-scale (sqrt 8)) (sqrt (- (* (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))))))))> |
#<alt (+ (* -1/4 (* (* x-scale (sqrt 8)) (sqrt (- (* (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)))))))) (* 1/16 (* (/ (* (pow x-scale 3) (* (sqrt 8) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 2) (* (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (sqrt (/ 1 (- (* (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))))))))))> |
#<alt (+ (* -1/4 (* (* x-scale (sqrt 8)) (sqrt (- (* (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)))))))) (+ (* 1/16 (* (/ (* (pow x-scale 3) (* (sqrt 8) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 2) (* (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (sqrt (/ 1 (- (* (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))))))))) (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* -1/4 (/ (* (pow x-scale 6) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 6) (pow (cos (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 4) (pow (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) 2)) (* (pow b 4) (* (pow (cos (* 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 b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))))) (pow y-scale 4)) (sqrt (/ 1 (- (* (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)))))))))))> |
#<alt (+ (* -1/4 (* (* x-scale (sqrt 8)) (sqrt (- (* (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)))))))) (+ (* 1/16 (* (/ (* (pow x-scale 3) (* (sqrt 8) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 2) (* (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (sqrt (/ 1 (- (* (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))))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 8) (* (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 8) (pow (cos (* 1/180 (* angle (PI)))) 8)))) (* 1/4 (/ (* (pow x-scale 4) (pow (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* 1/4 (/ (* (pow x-scale 2) (* (+ (* -1/4 (/ (* (pow x-scale 6) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 6) (pow (cos (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 4) (pow (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) 2)) (* (pow b 4) (* (pow (cos (* 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 b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 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 (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 y-scale 6)) (sqrt (/ 1 (- (* (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))))))))) (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* -1/4 (/ (* (pow x-scale 6) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 6) (pow (cos (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 4) (pow (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) 2)) (* (pow b 4) (* (pow (cos (* 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 b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))))) (pow y-scale 4)) (sqrt (/ 1 (- (* (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))))))))))))> |
#<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 (* (* angle (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (* (pow b 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/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)))))))> |
#<alt (* angle (+ (* 1/8 (* (* (pow angle 2) (* x-scale (* y-scale (* (sqrt 8) (- (* (pow b 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) (- (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))) 2)) (pow b 4))))) (pow b 2)))))))) (sqrt (/ 1 (- (* (pow b 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/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (* (pow b 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/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)))))))))> |
#<alt (* angle (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (* (pow b 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/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2))))))) (* (pow angle 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (* (pow b 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) (- (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))) 2)) (pow b 4))))) (pow b 2))))))) (sqrt (/ 1 (- (* (pow b 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/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)))))))) (* 1/8 (* (* (pow angle 2) (* x-scale (* y-scale (* (sqrt 8) (- (* (pow b 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 (- (* (pow b 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) (- (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))) 2)) (pow b 4))))) (pow b 2)))) 2) (- (* (pow b 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/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)))))) (* 1/2 (/ (* (pow x-scale 2) (- (+ (* 4 (/ (* (pow b 4) (+ (* 1/2040733440000000 (pow (PI) 6)) (+ (* 1/1224440064000000 (pow (PI) 6)) (+ (* 1/102036672000000 (pow (PI) 6)) (* 1/32400 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (+ (* -1/408146688000000 (/ (pow (PI) 6) (pow x-scale 4))) (+ (* -1/6122200320000000 (/ (pow (PI) 6) (pow x-scale 4))) (* 2 (* (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (- (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2)))))))) (+ (* 1/1020366720000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/612220032000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (pow x-scale 4) (* (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))) (- (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))) 2)) (pow b 4)))))) (pow b 4))))) (pow b 2))))))))) (sqrt (/ 1 (- (* (pow b 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/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2))))))))))))> |
#<alt (* angle (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (* (pow b 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/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2))))))) (* (pow angle 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (* (pow b 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) (- (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))) 2)) (pow b 4))))) (pow b 2))))))) (sqrt (/ 1 (- (* (pow b 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/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)))))))) (* (pow angle 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (* (pow b 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 (- (* (pow b 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) (- (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))) 2)) (pow b 4))))) (pow b 2)))) 2) (- (* (pow b 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/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)))))) (* 1/2 (/ (* (pow x-scale 2) (- (+ (* 4 (/ (* (pow b 4) (+ (* 1/2040733440000000 (pow (PI) 6)) (+ (* 1/1224440064000000 (pow (PI) 6)) (+ (* 1/102036672000000 (pow (PI) 6)) (* 1/32400 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (+ (* -1/408146688000000 (/ (pow (PI) 6) (pow x-scale 4))) (+ (* -1/6122200320000000 (/ (pow (PI) 6) (pow x-scale 4))) (* 2 (* (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (- (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2)))))))) (+ (* 1/1020366720000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/612220032000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (pow x-scale 4) (* (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))) (- (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))) 2)) (pow b 4)))))) (pow b 4))))) (pow b 2)))))))) (sqrt (/ 1 (- (* (pow b 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/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)))))))) (* 1/8 (* (* (pow angle 2) (* x-scale (* y-scale (* (sqrt 8) (- (* (pow b 2) (+ (* -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 b 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) (- (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))) 2)) (pow b 4))))) (pow b 2)))) (- (* (pow b 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 (- (* (pow b 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) (- (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))) 2)) (pow b 4))))) (pow b 2)))) 2) (- (* (pow b 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/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)))))) (* 1/2 (/ (* (pow x-scale 2) (- (+ (* 4 (/ (* (pow b 4) (+ (* 1/2040733440000000 (pow (PI) 6)) (+ (* 1/1224440064000000 (pow (PI) 6)) (+ (* 1/102036672000000 (pow (PI) 6)) (* 1/32400 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (+ (* -1/408146688000000 (/ (pow (PI) 6) (pow x-scale 4))) (+ (* -1/6122200320000000 (/ (pow (PI) 6) (pow x-scale 4))) (* 2 (* (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (- (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2)))))))) (+ (* 1/1020366720000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/612220032000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (pow x-scale 4) (* (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))) (- (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))) 2)) (pow b 4)))))) (pow b 4))))) (pow b 2)))))) (- (* (pow b 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/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)))))) (* 1/2 (/ (* (pow x-scale 2) (- (+ (* 4 (/ (* (pow b 4) (+ (* -1/32400 (* (pow (PI) 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))) (+ (* -1/3149280000 (* (pow (PI) 4) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (+ (* -1/396718580736000000000 (pow (PI) 8)) (+ (* -1/2777030065152000000000 (pow (PI) 8)) (* 1/32400 (* (pow (PI) 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (+ (* 1/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))))))) (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 (- (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))) 2)) (pow b 4)))) 2)) (pow b 4))) (* 1/2 (/ (* (pow x-scale 4) (* (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))) (- (+ (* 4 (/ (* (pow b 4) (+ (* 1/2040733440000000 (pow (PI) 6)) (+ (* 1/1224440064000000 (pow (PI) 6)) (+ (* 1/102036672000000 (pow (PI) 6)) (* 1/32400 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (+ (* -1/408146688000000 (/ (pow (PI) 6) (pow x-scale 4))) (+ (* -1/6122200320000000 (/ (pow (PI) 6) (pow x-scale 4))) (* 2 (* (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (- (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2)))))))) (+ (* 1/1020366720000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/612220032000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (pow x-scale 4) (* (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))) (- (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))) 2)) (pow b 4)))))) (pow b 4)))))) (pow b 4)))))) (pow b 2))))))))) (sqrt (/ 1 (- (* (pow b 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/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 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 (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (pow (- (/ (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 (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (pow (- (/ (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 (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (pow (- (/ (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 (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (pow (- (/ (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 (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (pow (- (/ (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 (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (pow (- (/ (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 (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (pow (- (/ (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 (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (pow (- (/ (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))))> |
#<alt (* 1/4 (* x-scale (* y-scale (sqrt 8))))> |
#<alt (* 1/4 (* x-scale (* y-scale (sqrt 8))))> |
#<alt (* 1/4 (* x-scale (* y-scale (sqrt 8))))> |
#<alt (* 1/4 (* x-scale (* y-scale (sqrt 8))))> |
#<alt (* 1/4 (* x-scale (* y-scale (sqrt 8))))> |
#<alt (* 1/4 (* x-scale (* y-scale (sqrt 8))))> |
#<alt (* 1/4 (* x-scale (* y-scale (sqrt 8))))> |
#<alt (* 1/4 (* x-scale (* y-scale (sqrt 8))))> |
#<alt (* 1/4 (* x-scale (* y-scale (sqrt 8))))> |
#<alt (* 1/4 (* x-scale (* y-scale (sqrt 8))))> |
#<alt (* 1/4 (* x-scale (* y-scale (sqrt 8))))> |
#<alt (* 1/4 (* x-scale (* y-scale (sqrt 8))))> |
#<alt (* 1/4 (* x-scale (* y-scale (sqrt 8))))> |
#<alt (* 1/4 (* x-scale (* y-scale (sqrt 8))))> |
#<alt (* 1/4 (* x-scale (* y-scale (sqrt 8))))> |
#<alt (* 1/4 (* x-scale (* y-scale (sqrt 8))))> |
#<alt (* 1/4 (* x-scale (* y-scale (sqrt 8))))> |
#<alt (* 1/4 (* x-scale (* y-scale (sqrt 8))))> |
#<alt (* 1/4 (* x-scale (* y-scale (sqrt 8))))> |
#<alt (* 1/4 (* x-scale (* y-scale (sqrt 8))))> |
#<alt (* 1/4 (* x-scale (* y-scale (sqrt 8))))> |
#<alt (* 1/4 (* x-scale (* y-scale (sqrt 8))))> |
#<alt (* 1/4 (* x-scale (* y-scale (sqrt 8))))> |
#<alt (* x-scale (* y-scale (sqrt 8)))> |
#<alt (* x-scale (* y-scale (sqrt 8)))> |
#<alt (* x-scale (* y-scale (sqrt 8)))> |
#<alt (* x-scale (* y-scale (sqrt 8)))> |
#<alt (* x-scale (* y-scale (sqrt 8)))> |
#<alt (* x-scale (* y-scale (sqrt 8)))> |
#<alt (* x-scale (* y-scale (sqrt 8)))> |
#<alt (* x-scale (* y-scale (sqrt 8)))> |
#<alt (* x-scale (* y-scale (sqrt 8)))> |
#<alt (* x-scale (* y-scale (sqrt 8)))> |
#<alt (* x-scale (* y-scale (sqrt 8)))> |
#<alt (* x-scale (* y-scale (sqrt 8)))> |
#<alt (* x-scale (* y-scale (sqrt 8)))> |
#<alt (* x-scale (* y-scale (sqrt 8)))> |
#<alt (* x-scale (* y-scale (sqrt 8)))> |
#<alt (* x-scale (* y-scale (sqrt 8)))> |
#<alt (* x-scale (* y-scale (sqrt 8)))> |
#<alt (* x-scale (* y-scale (sqrt 8)))> |
#<alt (* x-scale (* y-scale (sqrt 8)))> |
#<alt (* x-scale (* y-scale (sqrt 8)))> |
#<alt (* x-scale (* y-scale (sqrt 8)))> |
#<alt (* x-scale (* y-scale (sqrt 8)))> |
#<alt (* x-scale (* y-scale (sqrt 8)))> |
#<alt (* x-scale (* y-scale (sqrt 8)))> |
#<alt (* y-scale (sqrt 8))> |
#<alt (* y-scale (sqrt 8))> |
#<alt (* y-scale (sqrt 8))> |
#<alt (* y-scale (sqrt 8))> |
#<alt (* y-scale (sqrt 8))> |
#<alt (* y-scale (sqrt 8))> |
#<alt (* y-scale (sqrt 8))> |
#<alt (* y-scale (sqrt 8))> |
#<alt (* y-scale (sqrt 8))> |
#<alt (* y-scale (sqrt 8))> |
#<alt (* y-scale (sqrt 8))> |
#<alt (* y-scale (sqrt 8))> |
#<alt (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))> |
#<alt (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))> |
#<alt (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))> |
#<alt (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))> |
#<alt (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))> |
#<alt (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))> |
#<alt (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))> |
#<alt (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))> |
#<alt (* -1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))> |
#<alt (* -1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))> |
#<alt (* -1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))> |
#<alt (* -1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))> |
#<alt (+ (* -1/4 (* (/ (* a (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))))) (* (pow b 2) x-scale)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))> |
#<alt (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* a (+ (* -1/4 (* (/ (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))))) (* (pow b 2) x-scale)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* 1/8 (* (* a (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow b 2) (pow x-scale 2))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow b 4) (* (pow x-scale 4) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))> |
#<alt (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* a (+ (* -1/4 (* (/ (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))))) (* (pow b 2) x-scale)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* a (+ (* 1/8 (* (* a (* x-scale (* y-scale (* (sqrt 8) (- (* -1/2 (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* (pow b 2) (pow x-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow b 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (+ (* -2 (pow b 3)) (* 2 (pow b 3))) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow b 2) (pow x-scale 2))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow b 4) (* (pow x-scale 4) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (* (pow b 2) (* (pow x-scale 2) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))))) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow b 2) (pow x-scale 2))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow b 4) (* (pow x-scale 4) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))))> |
#<alt (* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))> |
#<alt (* a (+ (* -1/4 (* (/ (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b))))) (* a x-scale)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))> |
#<alt (* a (+ (* -1/4 (* (/ (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b))))) (* a x-scale)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (pow x-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) (pow a 2)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))> |
#<alt (* a (+ (* -1/4 (* (/ (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b))))) (* a x-scale)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/2 (- (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (pow x-scale 2))) (* 4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (+ (* -2 b) (* 2 b)))) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* -1 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -2 b) (* 2 b)) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (pow x-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* (pow x-scale 2) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 3)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (pow x-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) (pow a 2)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))> |
#<alt (* -1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))> |
#<alt (* -1 (* a (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* 1/4 (* (/ (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b))))) (* a x-scale)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))> |
#<alt (* -1 (* a (+ (* -1 (/ (+ (* -1/4 (* (/ (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b))))) x-scale) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (pow x-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) a) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) a)) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))> |
#<alt (* -1 (* a (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/2 (- (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (pow x-scale 2))) (* 4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (+ (* -2 b) (* 2 b)))) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* -1 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -2 b) (* 2 b)) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (pow x-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* (pow x-scale 2) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) a) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (pow x-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) a)) (* -1/4 (* (/ (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b))))) x-scale) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) a)) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))> |
#<alt (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))> |
#<alt (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/2 (- (+ (* -2 (/ (+ (* (pow a 2) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2))) (pow a 2))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow a 2) (pow x-scale 2))))) (* -2 (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow a 2) (pow x-scale 2)))))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))))))))) (* b (sqrt 2)))) (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))))> |
#<alt (+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow x-scale 2)))) (pow a 2))) (* 4 (/ (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))) (pow a 2)))) (+ (* -2 (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow a 2) (pow x-scale 2)))) (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (- (+ (* -2 (/ (+ (* (pow a 2) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2))) (pow a 2))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow a 2) (pow x-scale 2))))) (* -2 (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow a 2) (pow x-scale 2)))))) (pow a 2))))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/2 (- (+ (* -2 (/ (+ (* (pow a 2) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2))) (pow a 2))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow a 2) (pow x-scale 2))))) (* -2 (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow a 2) (pow x-scale 2)))))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/2 (- (+ (* -2 (/ (+ (* (pow a 2) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2))) (pow a 2))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow a 2) (pow x-scale 2))))) (* -2 (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow a 2) (pow x-scale 2)))))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))))))) (* b (sqrt 2)))))))> |
#<alt (+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/2 (- (+ (* -2 (/ (+ (* (pow a 2) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2))) (pow a 2))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow a 2) (pow x-scale 2))))) (* -2 (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow a 2) (pow x-scale 2)))))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))))))) (* b (sqrt 2)))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))) (+ (* (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (+ (* (pow a 2) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2)))) (/ (* (pow b 2) (+ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))) (pow x-scale 2))))) (pow a 2))) (* 4 (/ (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- b a) 2)))) (pow x-scale 2))) (/ (* (pow (+ a b) 2) (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- b a) 2))) (pow x-scale 2)))) (pow a 2)))) (+ (* -2 (/ (* (pow b 2) (+ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))) (* (pow a 2) (pow x-scale 2)))) (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (- (+ (* -2 (/ (+ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow x-scale 2)))) (pow a 2))) (* 4 (/ (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))) (pow a 2)))) (+ (* -2 (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow a 2) (pow x-scale 2)))) (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (- (+ (* -2 (/ (+ (* (pow a 2) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2))) (pow a 2))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow a 2) (pow x-scale 2))))) (* -2 (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow a 2) (pow x-scale 2)))))) (pow a 2))))) (pow a 2)) (/ (* (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (- (+ (* -2 (/ (+ (* (pow a 2) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2))) (pow a 2))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow a 2) (pow x-scale 2))))) (* -2 (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow a 2) (pow x-scale 2)))))) (pow a 2)))))) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2)))) (* 1/2 (/ (* (pow x-scale 2) (* (+ (* -1/2 (- (+ (* -2 (/ (+ (* (pow a 2) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2))) (pow a 2))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow a 2) (pow x-scale 2))))) (* -2 (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow a 2) (pow x-scale 2)))))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))))) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow x-scale 2)))) (pow a 2))) (* 4 (/ (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))) (pow a 2)))) (+ (* -2 (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow a 2) (pow x-scale 2)))) (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (- (+ (* -2 (/ (+ (* (pow a 2) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2))) (pow a 2))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow a 2) (pow x-scale 2))))) (* -2 (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow a 2) (pow x-scale 2)))))) (pow a 2))))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/2 (- (+ (* -2 (/ (+ (* (pow a 2) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2))) (pow a 2))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow a 2) (pow x-scale 2))))) (* -2 (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow a 2) (pow x-scale 2)))))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow x-scale 2)))) (pow a 2))) (* 4 (/ (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))) (pow a 2)))) (+ (* -2 (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow a 2) (pow x-scale 2)))) (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (- (+ (* -2 (/ (+ (* (pow a 2) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2))) (pow a 2))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow a 2) (pow x-scale 2))))) (* -2 (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow a 2) (pow x-scale 2)))))) (pow a 2))))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/2 (- (+ (* -2 (/ (+ (* (pow a 2) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2))) (pow a 2))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow a 2) (pow x-scale 2))))) (* -2 (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow a 2) (pow x-scale 2)))))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))))) 2)) (* (pow b 2) (pow (sqrt 2) 2)))))))) (* b (sqrt 2)))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))> |
#<alt (+ (* -1/4 (* (/ (* b (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))))) (* (pow a 2) x-scale)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))> |
#<alt (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* b (+ (* -1/4 (* (/ (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))))) (* (pow a 2) x-scale)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* 1/8 (* (* b (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow a 2) (pow x-scale 2))))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))) (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow a 4) (* (pow x-scale 4) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))> |
#<alt (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* b (+ (* -1/4 (* (/ (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))))) (* (pow a 2) x-scale)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* b (+ (* 1/8 (* (* b (* x-scale (* y-scale (* (sqrt 8) (- (* -1/2 (- (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* (pow a 2) (pow x-scale 2)))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow a 4) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* -1 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -2 (pow a 3)) (* 2 (pow a 3))) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow a 2) (pow x-scale 2))))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))) (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow a 4) (* (pow x-scale 4) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (* (pow a 2) (* (pow x-scale 2) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))))) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow a 2) (pow x-scale 2))))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))) (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow a 4) (* (pow x-scale 4) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))))> |
#<alt (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))> |
#<alt (* b (+ (* -1/4 (* (/ (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a))))) (* b x-scale)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))> |
#<alt (* b (+ (* -1/4 (* (/ (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a))))) (* b x-scale)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (pow x-scale 2)))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) (pow b 2)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))> |
#<alt (* b (+ (* -1/4 (* (/ (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a))))) (* b x-scale)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/2 (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (pow x-scale 2))) (* 4 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (+ (* -2 a) (* 2 a)))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (+ (* -2 a) (* 2 a)) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (pow x-scale 2)))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* (pow x-scale 2) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow b 3)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (pow x-scale 2)))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) (pow b 2)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))> |
#<alt (* -1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))> |
#<alt (* -1 (* b (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* 1/4 (* (/ (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a))))) (* b x-scale)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))> |
#<alt (* -1 (* b (+ (* -1 (/ (+ (* -1/4 (* (/ (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a))))) x-scale) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (pow x-scale 2)))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) b) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) b)) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))> |
#<alt (* -1 (* b (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/2 (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (pow x-scale 2))) (* 4 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (+ (* -2 a) (* 2 a)))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (+ (* -2 a) (* 2 a)) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (pow x-scale 2)))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* (pow x-scale 2) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) b) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (pow x-scale 2)))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) b)) (* -1/4 (* (/ (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a))))) x-scale) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) b)) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))> |
#<alt (* 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))))> |
165 calls:
| Time | Variable | Point | Expression | |
|---|---|---|---|---|
| 66.0ms | a | @ | 0 | (* (* 1/4 (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (+ (/ (* (* a a) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) (/ (* (* b b) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale))) (* -1/2 (/ (+ (* (* -2 (+ (* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (* b b) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (/ (* (* a a) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) (/ (* (* b b) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)))) (/ (* 4 (* (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (* (+ a b) (+ a b)) (* (- b a) (- b a))))) (* x-scale x-scale))) (+ (* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (* b b) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) |
| 59.0ms | x-scale | @ | 0 | (* (* 1/4 (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (* (* b b) (+ (/ (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 b 4) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (* x-scale x-scale) (* y-scale y-scale))) (pow (* (* b b) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)))) 2)))))) |
| 52.0ms | angle | @ | 0 | (* (* 1/4 (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (* (* b b) (+ (/ (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 b 4) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (* x-scale x-scale) (* y-scale y-scale))) (pow (* (* b b) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)))) 2)))))) |
| 42.0ms | b | @ | 0 | (* (* 1/4 (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (+ (/ (* (* a a) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) (/ (* (* b b) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale))) (* -1/2 (/ (+ (* (* -2 (+ (* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (* b b) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (/ (* (* a a) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) (/ (* (* b b) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)))) (/ (* 4 (* (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (* (+ a b) (+ a b)) (* (- b a) (- b a))))) (* x-scale x-scale))) (+ (* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (* b b) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) |
| 28.0ms | b | @ | 0 | (* (* 1/4 (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (* (* b b) (+ (/ (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 b 4) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (* x-scale x-scale) (* y-scale y-scale))) (pow (* (* b b) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)))) 2)))))) |
| 1× | batch-egg-rewrite |
| 6252× | *-lowering-*.f32 |
| 6252× | *-lowering-*.f64 |
| 4134× | /-lowering-/.f32 |
| 4134× | /-lowering-/.f64 |
| 1636× | +-lowering-+.f64 |
Useful iterations: 1 (0.0ms)
| Iter | Nodes | Cost |
|---|---|---|
| 0 | 130 | 887 |
| 1 | 861 | 819 |
| 0 | 8258 | 819 |
| 1× | iter limit |
| 1× | node limit |
| Inputs |
|---|
(* 1/4 (* (* a x-scale) (* (sqrt 2) (sqrt 8)))) |
(* (* a x-scale) (* (sqrt 2) (sqrt 8))) |
(* a x-scale) |
(* (sqrt 2) (sqrt 8)) |
(/ (/ (* (* (* a (* a a)) (* b b)) (* (sqrt 2) (sqrt 8))) (* x-scale (* y-scale y-scale))) (/ (* 4 (* a (* b (* b a)))) (* x-scale (* x-scale (* y-scale y-scale))))) |
(/ (* (* (* a (* a a)) (* b b)) (* (sqrt 2) (sqrt 8))) (* x-scale (* y-scale y-scale))) |
(* (* (* a (* a a)) (* b b)) (* (sqrt 2) (sqrt 8))) |
(* (* a (* a a)) (* b b)) |
(+ (* (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))))) (* x-scale x-scale)) (/ (* b (* a (* (* b a) 8))) (/ (* x-scale (* x-scale (* y-scale y-scale))) (* b (* a (* b a)))))) (* (- (/ (+ (* (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))) (* a a)) (* (* b b) (- 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))))) (* x-scale x-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))) (* a a)) (* (* b b) (- 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))))) (* y-scale y-scale))) (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))))) (* x-scale x-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))) (* a a)) (* (* b b) (- 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))))) (* y-scale y-scale)))) (* (/ (/ (+ (sin (* (* angle (PI)) 1/90)) 0) 2) (/ (* x-scale y-scale) (* (+ b a) (* 2 (- b a))))) (/ (/ (+ (sin (* (* angle (PI)) 1/90)) 0) 2) (/ (* x-scale y-scale) (* (+ b a) (* 2 (- b a))))))))) (/ (* b (* a (* (* b a) 8))) (/ (* x-scale (* x-scale (* y-scale y-scale))) (* b (* a (* b a))))))) |
(+ (sin (* (* angle (PI)) 1/90)) 0) |
(/ (sqrt (+ (* (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))))) (* x-scale x-scale)) (/ (* b (* a (* (* b a) 8))) (/ (* x-scale (* x-scale (* y-scale y-scale))) (* b (* a (* b a)))))) (* (- (/ (+ (* (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))) (* a a)) (* (* b b) (- 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))))) (* x-scale x-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))) (* a a)) (* (* b b) (- 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))))) (* y-scale y-scale))) (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))))) (* x-scale x-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))) (* a a)) (* (* b b) (- 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))))) (* y-scale y-scale)))) (* (/ (/ (+ (sin (* (* angle (PI)) 1/90)) 0) 2) (/ (* x-scale y-scale) (* (+ b a) (* 2 (- b a))))) (/ (/ (+ (sin (* (* angle (PI)) 1/90)) 0) 2) (/ (* x-scale y-scale) (* (+ b a) (* 2 (- b a))))))))) (/ (* b (* a (* (* b a) 8))) (/ (* x-scale (* x-scale (* y-scale y-scale))) (* b (* a (* b a)))))))) (/ (* 4 (* a (* b (* b a)))) (* x-scale (* x-scale (* y-scale y-scale))))) |
(sqrt (+ (* (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))))) (* x-scale x-scale)) (/ (* b (* a (* (* b a) 8))) (/ (* x-scale (* x-scale (* y-scale y-scale))) (* b (* a (* b a)))))) (* (- (/ (+ (* (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))) (* a a)) (* (* b b) (- 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))))) (* x-scale x-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))) (* a a)) (* (* b b) (- 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))))) (* y-scale y-scale))) (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))))) (* x-scale x-scale)) (/ (+ (* (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))) (* a a)) (* (* b b) (- 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))))) (* y-scale y-scale)))) (* (/ (/ (+ (sin (* (* angle (PI)) 1/90)) 0) 2) (/ (* x-scale y-scale) (* (+ b a) (* 2 (- b a))))) (/ (/ (+ (sin (* (* angle (PI)) 1/90)) 0) 2) (/ (* x-scale y-scale) (* (+ b a) (* 2 (- b a))))))))) (/ (* b (* a (* (* b a) 8))) (/ (* x-scale (* x-scale (* y-scale y-scale))) (* b (* a (* b a)))))))) |
(* (* 1/4 (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (* (* b b) (+ (/ (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 b 4) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (* x-scale x-scale) (* y-scale y-scale))) (pow (* (* b b) (- (/ (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 (* x-scale (* y-scale (sqrt 8)))) |
(* x-scale (* y-scale (sqrt 8))) |
(* y-scale (sqrt 8)) |
(* (* 1/4 (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (+ (/ (* (* a a) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) (/ (* (* b b) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale))) (* -1/2 (/ (+ (* (* -2 (+ (* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (* b b) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (/ (* (* a a) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) (/ (* (* b b) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)))) (/ (* 4 (* (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (* (+ a b) (+ a b)) (* (- b a) (- b a))))) (* x-scale x-scale))) (+ (* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (* b b) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) |
(sqrt 2) |
(sqrt 8) |
(* 4 (* a (* b (* b a)))) |
(* a a) |
(PI) |
(cos (* (* angle (PI)) 1/90)) |
(sin (* (* angle (PI)) 1/90)) |
(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 (*.f64 a (*.f64 x-scale #s(literal 4 binary64))) #s(literal 1/4 binary64)) |
(*.f64 #s(literal 1 binary64) (*.f64 a x-scale)) |
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) a) #s(literal 4 binary64)) |
(*.f64 (*.f64 #s(literal 1/4 binary64) a) (*.f64 x-scale #s(literal 4 binary64))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a x-scale) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 8 binary64))) |
(*.f64 a (*.f64 x-scale #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 (*.f64 a x-scale) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 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 a (*.f64 a (*.f64 b (*.f64 a b)))) (/.f64 #s(literal 4 binary64) (*.f64 (*.f64 x-scale y-scale) y-scale))) (/.f64 (*.f64 (*.f64 a (*.f64 b (*.f64 a b))) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) |
(neg.f64 (/.f64 (/.f64 (*.f64 (*.f64 a (*.f64 a (*.f64 b (*.f64 a b)))) #s(literal -4 binary64)) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 a b)))) (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) |
(/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 (*.f64 b b) #s(literal 4 binary64))) (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 a b)))) (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))) (*.f64 (*.f64 x-scale y-scale) y-scale))) |
(/.f64 (*.f64 (*.f64 a (*.f64 a (*.f64 b (*.f64 a b)))) (/.f64 #s(literal 4 binary64) (*.f64 (*.f64 x-scale y-scale) y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 a b)))) (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)))) |
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 a b)))) (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 a (*.f64 b (*.f64 a b)))) (/.f64 #s(literal 4 binary64) (*.f64 (*.f64 x-scale y-scale) y-scale))))) |
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) y-scale) (*.f64 (*.f64 a (*.f64 a a)) (*.f64 (*.f64 b b) #s(literal 4 binary64)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 a b)))) (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) |
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 a b)))) (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))) (*.f64 (*.f64 x-scale y-scale) y-scale)) (*.f64 (*.f64 a (*.f64 a a)) (*.f64 (*.f64 b b) #s(literal 4 binary64))))) |
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 a b)))) (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 a (*.f64 b (*.f64 a b)))) (/.f64 #s(literal 4 binary64) (*.f64 (*.f64 x-scale y-scale) y-scale)))) #s(literal 1 binary64))) |
(/.f64 (*.f64 (*.f64 a (*.f64 a (*.f64 b (*.f64 a b)))) #s(literal -4 binary64)) (neg.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 a b)))) (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))) (*.f64 (*.f64 x-scale y-scale) y-scale)))) |
(/.f64 (/.f64 (*.f64 (*.f64 a (*.f64 a (*.f64 b (*.f64 a b)))) #s(literal -4 binary64)) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 (*.f64 (*.f64 a (*.f64 b (*.f64 a b))) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)))) |
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 a b)))) (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 a (*.f64 b (*.f64 a b)))) (/.f64 #s(literal 4 binary64) (*.f64 (*.f64 x-scale y-scale) y-scale)))))) |
(/.f64 (*.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 (*.f64 b b) #s(literal 4 binary64))) #s(literal 1 binary64)) (*.f64 (*.f64 (*.f64 x-scale y-scale) y-scale) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 a b)))) (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) |
(/.f64 (*.f64 (*.f64 (*.f64 a (*.f64 a (*.f64 b (*.f64 a b)))) #s(literal -4 binary64)) #s(literal 1 binary64)) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 a b)))) (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) |
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 a 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 a (*.f64 b (*.f64 a b)))) (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) |
(pow.f64 (/.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 a b)))) (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 a (*.f64 b (*.f64 a b)))) (/.f64 #s(literal 4 binary64) (*.f64 (*.f64 x-scale y-scale) y-scale)))) #s(literal -1 binary64)) |
(*.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 (*.f64 b b) #s(literal 4 binary64))) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 a b)))) (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))) (*.f64 (*.f64 x-scale y-scale) y-scale)))) |
(*.f64 (*.f64 (*.f64 a (*.f64 a (*.f64 b (*.f64 a b)))) (/.f64 #s(literal 4 binary64) (*.f64 (*.f64 x-scale y-scale) y-scale))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 a b)))))) |
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 (*.f64 b b) #s(literal 4 binary64))) (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 a b)))) (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))) (*.f64 (*.f64 x-scale y-scale) y-scale)))) |
(*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 a (*.f64 b (*.f64 a b)))) #s(literal -4 binary64)) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 a (*.f64 b (*.f64 a b))) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) |
(*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 a (*.f64 b (*.f64 a b)))) (/.f64 #s(literal 4 binary64) (*.f64 (*.f64 x-scale y-scale) y-scale))) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 a b))))) (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))) |
(*.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 b (*.f64 a b)))) #s(literal 4 binary64)) (/.f64 (/.f64 #s(literal 4 binary64) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 (*.f64 a (*.f64 b (*.f64 a b))) (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) |
(*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 (*.f64 b b) #s(literal 4 binary64))) #s(literal 4 binary64)) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 (*.f64 a (*.f64 b (*.f64 a b))) (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) |
(*.f64 (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 b (*.f64 a b)))) x-scale) #s(literal 4 binary64)) (/.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (/.f64 (*.f64 a (*.f64 b (*.f64 a b))) (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) |
(*.f64 (/.f64 (*.f64 a (*.f64 a a)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 a b)))) (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)))) (/.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) (*.f64 (*.f64 x-scale y-scale) y-scale))) |
(*.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 b (*.f64 a b)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 a b)))) (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)))) (/.f64 #s(literal 4 binary64) (*.f64 (*.f64 x-scale y-scale) y-scale))) |
(*.f64 (/.f64 #s(literal 4 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 a b)))) (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)))) (/.f64 (*.f64 a (*.f64 a (*.f64 b (*.f64 a b)))) (*.f64 (*.f64 x-scale y-scale) y-scale))) |
(*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 a (*.f64 b (*.f64 a b)))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 a b)))) (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)))) (/.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (*.f64 x-scale y-scale) y-scale))) |
(*.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 b (*.f64 a b)))) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 a b))))) (/.f64 (/.f64 #s(literal 4 binary64) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) |
(*.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 b (*.f64 a b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (/.f64 #s(literal 4 binary64) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 (*.f64 a (*.f64 b (*.f64 a b))) (*.f64 (*.f64 x-scale y-scale) y-scale)))) |
(*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 (*.f64 b b) #s(literal 4 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 a b))))) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) |
(*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 (*.f64 b b) #s(literal 4 binary64))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 (*.f64 a (*.f64 b (*.f64 a b))) (*.f64 (*.f64 x-scale y-scale) y-scale)))) |
(*.f64 (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 b (*.f64 a b)))) x-scale) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 a b))))) (/.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) |
(*.f64 (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 b (*.f64 a b)))) x-scale) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (/.f64 (*.f64 a (*.f64 b (*.f64 a b))) (*.f64 (*.f64 x-scale y-scale) y-scale)))) |
(*.f64 (*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 a (*.f64 b (*.f64 a b)))) (/.f64 #s(literal 4 binary64) (*.f64 (*.f64 x-scale y-scale) y-scale))) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 a b))))) x-scale) (*.f64 (*.f64 x-scale y-scale) y-scale)) |
(*.f64 (*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 a (*.f64 b (*.f64 a b)))) (/.f64 #s(literal 4 binary64) (*.f64 (*.f64 x-scale y-scale) y-scale))) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 a b))))) (*.f64 y-scale y-scale)) (*.f64 x-scale x-scale)) |
(*.f64 (*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 a (*.f64 b (*.f64 a b)))) (/.f64 #s(literal 4 binary64) (*.f64 (*.f64 x-scale y-scale) y-scale))) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 a b))))) (*.f64 (*.f64 x-scale y-scale) y-scale)) x-scale) |
(*.f64 (*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 a (*.f64 b (*.f64 a b)))) (/.f64 #s(literal 4 binary64) (*.f64 (*.f64 x-scale y-scale) y-scale))) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 a b))))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) |
(*.f64 (*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 a (*.f64 b (*.f64 a b)))) (/.f64 #s(literal 4 binary64) (*.f64 (*.f64 x-scale y-scale) y-scale))) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 a b))))) (*.f64 x-scale y-scale)) (*.f64 x-scale y-scale)) |
(*.f64 (*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 a (*.f64 b (*.f64 a b)))) (/.f64 #s(literal 4 binary64) (*.f64 (*.f64 x-scale y-scale) y-scale))) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 a b))))) (*.f64 (*.f64 x-scale x-scale) y-scale)) y-scale) |
(neg.f64 (/.f64 (*.f64 (*.f64 a (*.f64 a (*.f64 b (*.f64 a b)))) #s(literal -4 binary64)) (*.f64 (*.f64 x-scale y-scale) y-scale))) |
(/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 (*.f64 b b) #s(literal 4 binary64))) (*.f64 (*.f64 x-scale y-scale) y-scale)) |
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 x-scale y-scale) y-scale) (*.f64 (*.f64 a (*.f64 a a)) (*.f64 (*.f64 b b) #s(literal 4 binary64))))) |
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 (*.f64 x-scale y-scale) y-scale) (*.f64 (*.f64 a (*.f64 a 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 (*.f64 a a)) (*.f64 (*.f64 b b) #s(literal 4 binary64))) x-scale))) |
(/.f64 (*.f64 (*.f64 a (*.f64 a (*.f64 b (*.f64 a b)))) #s(literal -4 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 x-scale y-scale) y-scale))) |
(/.f64 (/.f64 (*.f64 (*.f64 a (*.f64 a 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 (*.f64 x-scale y-scale) y-scale) (*.f64 (*.f64 a (*.f64 a a)) (*.f64 (*.f64 b b) #s(literal 4 binary64)))))) |
(/.f64 (neg.f64 (*.f64 (*.f64 a (*.f64 a (*.f64 b (*.f64 a b)))) #s(literal -4 binary64))) (neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 x-scale y-scale) y-scale)))) |
(/.f64 (neg.f64 (/.f64 (*.f64 (*.f64 a (*.f64 a 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 (*.f64 x-scale y-scale) y-scale) (*.f64 (*.f64 a (*.f64 a a)) (*.f64 (*.f64 b b) #s(literal 4 binary64)))) #s(literal -1 binary64)) |
(*.f64 (*.f64 a (*.f64 a (*.f64 b (*.f64 a b)))) (/.f64 #s(literal 4 binary64) (*.f64 (*.f64 x-scale y-scale) y-scale))) |
(*.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 (*.f64 b b) #s(literal 4 binary64))) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale y-scale) y-scale))) |
(*.f64 #s(literal 1 binary64) (*.f64 (*.f64 a (*.f64 a (*.f64 b (*.f64 a b)))) (/.f64 #s(literal 4 binary64) (*.f64 (*.f64 x-scale y-scale) y-scale)))) |
(*.f64 (*.f64 (*.f64 a (*.f64 a (*.f64 b (*.f64 a b)))) #s(literal -4 binary64)) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 x-scale y-scale) y-scale)))) |
(*.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 b (*.f64 a b)))) x-scale) (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale))) |
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (/.f64 (*.f64 a (*.f64 a (*.f64 b (*.f64 a b)))) x-scale)) |
(*.f64 (/.f64 #s(literal 4 binary64) x-scale) (/.f64 (*.f64 a (*.f64 a (*.f64 b (*.f64 a b)))) (*.f64 y-scale y-scale))) |
(*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 (*.f64 b b) #s(literal 4 binary64))) x-scale) (/.f64 #s(literal 1 binary64) (*.f64 y-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 a (*.f64 a a)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) x-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 a (*.f64 a (*.f64 b (*.f64 a b)))) (*.f64 y-scale y-scale)) (/.f64 #s(literal 4 binary64) x-scale)) |
(*.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 b (*.f64 a b)))) (*.f64 x-scale y-scale)) (/.f64 #s(literal 4 binary64) y-scale)) |
(*.f64 (/.f64 #s(literal 4 binary64) (*.f64 x-scale y-scale)) (/.f64 (*.f64 a (*.f64 a (*.f64 b (*.f64 a b)))) y-scale)) |
(*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 a (*.f64 b (*.f64 a b)))) (sqrt.f64 #s(literal 2 binary64))) x-scale) (/.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 y-scale y-scale))) |
(*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 a (*.f64 b (*.f64 a b)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (sqrt.f64 #s(literal 8 binary64)) x-scale)) |
(*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 a (*.f64 b (*.f64 a b)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 x-scale y-scale)) (/.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale)) |
(*.f64 (*.f64 a (*.f64 a a)) (*.f64 (*.f64 b b) #s(literal 4 binary64))) |
(*.f64 (*.f64 a (*.f64 a (*.f64 b (*.f64 a b)))) #s(literal 4 binary64)) |
(*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a (*.f64 b (*.f64 a b))))) |
(*.f64 (*.f64 #s(literal 4 binary64) a) (*.f64 a (*.f64 b (*.f64 a b)))) |
(*.f64 (*.f64 (*.f64 a (*.f64 a (*.f64 b (*.f64 a b)))) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))) |
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a a))) (*.f64 b b)) |
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 b b)) (*.f64 a (*.f64 a a))) |
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 a (*.f64 a a)) b)) b) |
(*.f64 a (*.f64 a (*.f64 b (*.f64 a b)))) |
(*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) |
(*.f64 (*.f64 b b) (*.f64 a (*.f64 a a))) |
(*.f64 (*.f64 b (*.f64 a b)) (*.f64 a a)) |
(*.f64 (*.f64 a (*.f64 b (*.f64 a b))) a) |
(*.f64 (*.f64 (*.f64 a (*.f64 a a)) b) b) |
(+.f64 (/.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 #s(literal 8 binary64) (*.f64 a b)))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (*.f64 a (*.f64 b (*.f64 a b))))) (/.f64 (*.f64 x-scale x-scale) (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))))) (/.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64))))) (*.f64 y-scale y-scale))) (/.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) (*.f64 (*.f64 (/.f64 x-scale (+.f64 a b)) (/.f64 y-scale (*.f64 #s(literal 2 binary64) (-.f64 b a)))) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (*.f64 a (*.f64 b (*.f64 a b)))) (*.f64 b (*.f64 a (*.f64 #s(literal 8 binary64) (*.f64 a b))))))) |
(+.f64 (/.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64))))) (*.f64 y-scale y-scale))) (/.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) (*.f64 (*.f64 (/.f64 x-scale (+.f64 a b)) (/.f64 y-scale (*.f64 #s(literal 2 binary64) (-.f64 b a)))) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (*.f64 a (*.f64 b (*.f64 a b)))) (*.f64 b (*.f64 a (*.f64 #s(literal 8 binary64) (*.f64 a b)))))) (/.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 #s(literal 8 binary64) (*.f64 a b)))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (*.f64 a (*.f64 b (*.f64 a b))))) (/.f64 (*.f64 x-scale x-scale) (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))))))))))) |
(-.f64 (/.f64 (pow.f64 (/.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 #s(literal 8 binary64) (*.f64 a b)))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (*.f64 a (*.f64 b (*.f64 a b))))) (/.f64 (*.f64 x-scale x-scale) (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))))) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 #s(literal 8 binary64) (*.f64 a b)))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (*.f64 a (*.f64 b (*.f64 a b))))) (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))) (*.f64 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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64))))) (*.f64 y-scale y-scale))) (/.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) (*.f64 (*.f64 (/.f64 x-scale (+.f64 a b)) (/.f64 y-scale (*.f64 #s(literal 2 binary64) (-.f64 b a)))) #s(literal 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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64))))) (*.f64 y-scale y-scale))) (/.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) (*.f64 (*.f64 (/.f64 x-scale (+.f64 a b)) (/.f64 y-scale (*.f64 #s(literal 2 binary64) (-.f64 b a)))) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (*.f64 a (*.f64 b (*.f64 a b)))) (*.f64 b (*.f64 a (*.f64 #s(literal 8 binary64) (*.f64 a b)))))) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 #s(literal 8 binary64) (*.f64 a b)))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (*.f64 a (*.f64 b (*.f64 a b))))) (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))) (*.f64 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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64))))) (*.f64 y-scale y-scale))) (/.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) (*.f64 (*.f64 (/.f64 x-scale (+.f64 a b)) (/.f64 y-scale (*.f64 #s(literal 2 binary64) (-.f64 b a)))) #s(literal 2 binary64))))))))) |
(fma.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b (*.f64 a (*.f64 #s(literal 8 binary64) (*.f64 a b)))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (*.f64 a (*.f64 b (*.f64 a b))))) (/.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64))))) (*.f64 y-scale y-scale))) (/.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) (*.f64 (*.f64 (/.f64 x-scale (+.f64 a b)) (/.f64 y-scale (*.f64 #s(literal 2 binary64) (-.f64 b a)))) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (*.f64 a (*.f64 b (*.f64 a b)))) (*.f64 b (*.f64 a (*.f64 #s(literal 8 binary64) (*.f64 a b))))))) |
(fma.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 #s(literal 8 binary64) (*.f64 a b)))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (*.f64 a (*.f64 b (*.f64 a b))))) (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))) (*.f64 x-scale x-scale)) (/.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64))))) (*.f64 y-scale y-scale))) (/.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) (*.f64 (*.f64 (/.f64 x-scale (+.f64 a b)) (/.f64 y-scale (*.f64 #s(literal 2 binary64) (-.f64 b a)))) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (*.f64 a (*.f64 b (*.f64 a b)))) (*.f64 b (*.f64 a (*.f64 #s(literal 8 binary64) (*.f64 a b))))))) |
(fma.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 #s(literal 8 binary64) (*.f64 a b)))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (*.f64 a (*.f64 b (*.f64 a b))))) (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64))))) (*.f64 y-scale y-scale))) (/.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) (*.f64 (*.f64 (/.f64 x-scale (+.f64 a b)) (/.f64 y-scale (*.f64 #s(literal 2 binary64) (-.f64 b a)))) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 #s(literal 8 binary64) (*.f64 a b)))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (*.f64 a (*.f64 b (*.f64 a b))))) (/.f64 (*.f64 x-scale x-scale) (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))))))))))) |
(fma.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64))))) (*.f64 y-scale y-scale))) (/.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) (*.f64 (*.f64 (/.f64 x-scale (+.f64 a b)) (/.f64 y-scale (*.f64 #s(literal 2 binary64) (-.f64 b a)))) #s(literal 2 binary64))))) (/.f64 (*.f64 b (*.f64 a (*.f64 #s(literal 8 binary64) (*.f64 a b)))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (*.f64 a (*.f64 b (*.f64 a b))))) (/.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 #s(literal 8 binary64) (*.f64 a b)))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (*.f64 a (*.f64 b (*.f64 a b))))) (/.f64 (*.f64 x-scale x-scale) (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))))))))))) |
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (pow.f64 (/.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 #s(literal 8 binary64) (*.f64 a b)))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (*.f64 a (*.f64 b (*.f64 a b))))) (/.f64 (*.f64 x-scale x-scale) (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))))) #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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64))))) (*.f64 y-scale y-scale))) (/.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) (*.f64 (*.f64 (/.f64 x-scale (+.f64 a b)) (/.f64 y-scale (*.f64 #s(literal 2 binary64) (-.f64 b a)))) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (*.f64 a (*.f64 b (*.f64 a b)))) (*.f64 b (*.f64 a (*.f64 #s(literal 8 binary64) (*.f64 a b)))))) (-.f64 (/.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64))))) (*.f64 y-scale y-scale))) (/.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) (*.f64 (*.f64 (/.f64 x-scale (+.f64 a b)) (/.f64 y-scale (*.f64 #s(literal 2 binary64) (-.f64 b a)))) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (*.f64 a (*.f64 b (*.f64 a b)))) (*.f64 b (*.f64 a (*.f64 #s(literal 8 binary64) (*.f64 a b)))))) (/.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 #s(literal 8 binary64) (*.f64 a b)))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (*.f64 a (*.f64 b (*.f64 a b))))) (/.f64 (*.f64 x-scale x-scale) (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))))))))))))) (+.f64 (pow.f64 (/.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 #s(literal 8 binary64) (*.f64 a b)))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (*.f64 a (*.f64 b (*.f64 a b))))) (/.f64 (*.f64 x-scale x-scale) (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))))) #s(literal 3 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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64))))) (*.f64 y-scale y-scale))) (/.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) (*.f64 (*.f64 (/.f64 x-scale (+.f64 a b)) (/.f64 y-scale (*.f64 #s(literal 2 binary64) (-.f64 b a)))) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (*.f64 a (*.f64 b (*.f64 a b)))) (*.f64 b (*.f64 a (*.f64 #s(literal 8 binary64) (*.f64 a b)))))) #s(literal 3 binary64))))) |
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 #s(literal 8 binary64) (*.f64 a b)))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (*.f64 a (*.f64 b (*.f64 a b))))) (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))) (*.f64 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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64))))) (*.f64 y-scale y-scale))) (/.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) (*.f64 (*.f64 (/.f64 x-scale (+.f64 a b)) (/.f64 y-scale (*.f64 #s(literal 2 binary64) (-.f64 b a)))) #s(literal 2 binary64))))))) (-.f64 (pow.f64 (/.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 #s(literal 8 binary64) (*.f64 a b)))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (*.f64 a (*.f64 b (*.f64 a b))))) (/.f64 (*.f64 x-scale x-scale) (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))))) #s(literal 2 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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64))))) (*.f64 y-scale y-scale))) (/.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) (*.f64 (*.f64 (/.f64 x-scale (+.f64 a b)) (/.f64 y-scale (*.f64 #s(literal 2 binary64) (-.f64 b a)))) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (*.f64 a (*.f64 b (*.f64 a b)))) (*.f64 b (*.f64 a (*.f64 #s(literal 8 binary64) (*.f64 a b)))))) #s(literal 2 binary64))))) |
(/.f64 (+.f64 (pow.f64 (/.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 #s(literal 8 binary64) (*.f64 a b)))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (*.f64 a (*.f64 b (*.f64 a b))))) (/.f64 (*.f64 x-scale x-scale) (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))))) #s(literal 3 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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64))))) (*.f64 y-scale y-scale))) (/.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) (*.f64 (*.f64 (/.f64 x-scale (+.f64 a b)) (/.f64 y-scale (*.f64 #s(literal 2 binary64) (-.f64 b a)))) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (*.f64 a (*.f64 b (*.f64 a b)))) (*.f64 b (*.f64 a (*.f64 #s(literal 8 binary64) (*.f64 a b)))))) #s(literal 3 binary64))) (+.f64 (pow.f64 (/.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 #s(literal 8 binary64) (*.f64 a b)))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (*.f64 a (*.f64 b (*.f64 a b))))) (/.f64 (*.f64 x-scale x-scale) (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))))) #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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64))))) (*.f64 y-scale y-scale))) (/.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) (*.f64 (*.f64 (/.f64 x-scale (+.f64 a b)) (/.f64 y-scale (*.f64 #s(literal 2 binary64) (-.f64 b a)))) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (*.f64 a (*.f64 b (*.f64 a b)))) (*.f64 b (*.f64 a (*.f64 #s(literal 8 binary64) (*.f64 a b)))))) (-.f64 (/.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64))))) (*.f64 y-scale y-scale))) (/.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) (*.f64 (*.f64 (/.f64 x-scale (+.f64 a b)) (/.f64 y-scale (*.f64 #s(literal 2 binary64) (-.f64 b a)))) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (*.f64 a (*.f64 b (*.f64 a b)))) (*.f64 b (*.f64 a (*.f64 #s(literal 8 binary64) (*.f64 a b)))))) (/.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 #s(literal 8 binary64) (*.f64 a b)))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (*.f64 a (*.f64 b (*.f64 a b))))) (/.f64 (*.f64 x-scale x-scale) (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))))))))) |
(/.f64 (-.f64 (pow.f64 (/.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 #s(literal 8 binary64) (*.f64 a b)))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (*.f64 a (*.f64 b (*.f64 a b))))) (/.f64 (*.f64 x-scale x-scale) (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))))) #s(literal 2 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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64))))) (*.f64 y-scale y-scale))) (/.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) (*.f64 (*.f64 (/.f64 x-scale (+.f64 a b)) (/.f64 y-scale (*.f64 #s(literal 2 binary64) (-.f64 b a)))) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (*.f64 a (*.f64 b (*.f64 a b)))) (*.f64 b (*.f64 a (*.f64 #s(literal 8 binary64) (*.f64 a b)))))) #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 #s(literal 8 binary64) (*.f64 a b)))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (*.f64 a (*.f64 b (*.f64 a b))))) (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))) (*.f64 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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64))))) (*.f64 y-scale y-scale))) (/.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) (*.f64 (*.f64 (/.f64 x-scale (+.f64 a b)) (/.f64 y-scale (*.f64 #s(literal 2 binary64) (-.f64 b a)))) #s(literal 2 binary64)))))))) |
(/.f64 (+.f64 (*.f64 (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))) (*.f64 b (*.f64 a (*.f64 #s(literal 8 binary64) (*.f64 a b))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (*.f64 a (*.f64 b (*.f64 a b))))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (/.f64 (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (*.f64 a (*.f64 b (*.f64 a b))))) (*.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64))))) (*.f64 y-scale y-scale))) (/.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) (*.f64 (*.f64 (/.f64 x-scale (+.f64 a b)) (/.f64 y-scale (*.f64 #s(literal 2 binary64) (-.f64 b a)))) #s(literal 2 binary64))))) (*.f64 b (*.f64 a (*.f64 #s(literal 8 binary64) (*.f64 a b))))))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (/.f64 (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (*.f64 a (*.f64 b (*.f64 a b))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (*.f64 a (*.f64 b (*.f64 a b)))))) |
(/.f64 (+.f64 (*.f64 (*.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))) (*.f64 x-scale x-scale)) (*.f64 b (*.f64 a (*.f64 #s(literal 8 binary64) (*.f64 a b))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (*.f64 a (*.f64 b (*.f64 a b))))) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (*.f64 a (*.f64 b (*.f64 a b)))) (*.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64))))) (*.f64 y-scale y-scale))) (/.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) (*.f64 (*.f64 (/.f64 x-scale (+.f64 a b)) (/.f64 y-scale (*.f64 #s(literal 2 binary64) (-.f64 b a)))) #s(literal 2 binary64))))) (*.f64 b (*.f64 a (*.f64 #s(literal 8 binary64) (*.f64 a b))))))) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (*.f64 a (*.f64 b (*.f64 a b)))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (*.f64 a (*.f64 b (*.f64 a b)))))) |
(/.f64 (+.f64 (*.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))) (/.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (*.f64 a (*.f64 b (*.f64 a b)))) (*.f64 b (*.f64 a (*.f64 #s(literal 8 binary64) (*.f64 a b)))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (*.f64 a (*.f64 b (*.f64 a b))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64))))) (*.f64 y-scale y-scale))) (/.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) (*.f64 (*.f64 (/.f64 x-scale (+.f64 a b)) (/.f64 y-scale (*.f64 #s(literal 2 binary64) (-.f64 b a)))) #s(literal 2 binary64))))) (*.f64 b (*.f64 a (*.f64 #s(literal 8 binary64) (*.f64 a b))))))) (*.f64 (*.f64 x-scale x-scale) (/.f64 (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (*.f64 a (*.f64 b (*.f64 a b)))))) |
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64))))) (*.f64 y-scale y-scale))) (/.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) (*.f64 (*.f64 (/.f64 x-scale (+.f64 a b)) (/.f64 y-scale (*.f64 #s(literal 2 binary64) (-.f64 b a)))) #s(literal 2 binary64))))) (*.f64 b (*.f64 a (*.f64 #s(literal 8 binary64) (*.f64 a b))))) (*.f64 (*.f64 x-scale x-scale) (/.f64 (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (*.f64 a (*.f64 b (*.f64 a b)))))) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (*.f64 a (*.f64 b (*.f64 a b)))) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))) (*.f64 b (*.f64 a (*.f64 #s(literal 8 binary64) (*.f64 a b))))))) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (*.f64 a (*.f64 b (*.f64 a b)))) (*.f64 (*.f64 x-scale x-scale) (/.f64 (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (*.f64 a (*.f64 b (*.f64 a b))))))) |
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64))))) (*.f64 y-scale y-scale))) (/.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) (*.f64 (*.f64 (/.f64 x-scale (+.f64 a b)) (/.f64 y-scale (*.f64 #s(literal 2 binary64) (-.f64 b a)))) #s(literal 2 binary64))))) (*.f64 b (*.f64 a (*.f64 #s(literal 8 binary64) (*.f64 a b))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (*.f64 a (*.f64 b (*.f64 a b))))) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (*.f64 a (*.f64 b (*.f64 a b)))) (*.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))) (*.f64 x-scale x-scale)) (*.f64 b (*.f64 a (*.f64 #s(literal 8 binary64) (*.f64 a b))))))) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (*.f64 a (*.f64 b (*.f64 a b)))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (*.f64 a (*.f64 b (*.f64 a b)))))) |
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64))))) (*.f64 y-scale y-scale))) (/.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) (*.f64 (*.f64 (/.f64 x-scale (+.f64 a b)) (/.f64 y-scale (*.f64 #s(literal 2 binary64) (-.f64 b a)))) #s(literal 2 binary64))))) (*.f64 b (*.f64 a (*.f64 #s(literal 8 binary64) (*.f64 a b))))) (*.f64 x-scale x-scale)) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (*.f64 a (*.f64 b (*.f64 a b)))) (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))) (/.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (*.f64 a (*.f64 b (*.f64 a b)))) (*.f64 b (*.f64 a (*.f64 #s(literal 8 binary64) (*.f64 a b)))))))) (*.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (*.f64 a (*.f64 b (*.f64 a b)))) (*.f64 x-scale x-scale))) |
(/.f64 (neg.f64 (+.f64 (pow.f64 (/.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 #s(literal 8 binary64) (*.f64 a b)))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (*.f64 a (*.f64 b (*.f64 a b))))) (/.f64 (*.f64 x-scale x-scale) (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))))) #s(literal 3 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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64))))) (*.f64 y-scale y-scale))) (/.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) (*.f64 (*.f64 (/.f64 x-scale (+.f64 a b)) (/.f64 y-scale (*.f64 #s(literal 2 binary64) (-.f64 b a)))) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (*.f64 a (*.f64 b (*.f64 a b)))) (*.f64 b (*.f64 a (*.f64 #s(literal 8 binary64) (*.f64 a b)))))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (/.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 #s(literal 8 binary64) (*.f64 a b)))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (*.f64 a (*.f64 b (*.f64 a b))))) (/.f64 (*.f64 x-scale x-scale) (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))))) #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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64))))) (*.f64 y-scale y-scale))) (/.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) (*.f64 (*.f64 (/.f64 x-scale (+.f64 a b)) (/.f64 y-scale (*.f64 #s(literal 2 binary64) (-.f64 b a)))) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (*.f64 a (*.f64 b (*.f64 a b)))) (*.f64 b (*.f64 a (*.f64 #s(literal 8 binary64) (*.f64 a b)))))) (-.f64 (/.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64))))) (*.f64 y-scale y-scale))) (/.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) (*.f64 (*.f64 (/.f64 x-scale (+.f64 a b)) (/.f64 y-scale (*.f64 #s(literal 2 binary64) (-.f64 b a)))) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (*.f64 a (*.f64 b (*.f64 a b)))) (*.f64 b (*.f64 a (*.f64 #s(literal 8 binary64) (*.f64 a b)))))) (/.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 #s(literal 8 binary64) (*.f64 a b)))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (*.f64 a (*.f64 b (*.f64 a b))))) (/.f64 (*.f64 x-scale x-scale) (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))))))))))))))) |
(/.f64 (neg.f64 (-.f64 (pow.f64 (/.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 #s(literal 8 binary64) (*.f64 a b)))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (*.f64 a (*.f64 b (*.f64 a b))))) (/.f64 (*.f64 x-scale x-scale) (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))))) #s(literal 2 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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64))))) (*.f64 y-scale y-scale))) (/.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) (*.f64 (*.f64 (/.f64 x-scale (+.f64 a b)) (/.f64 y-scale (*.f64 #s(literal 2 binary64) (-.f64 b a)))) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (*.f64 a (*.f64 b (*.f64 a b)))) (*.f64 b (*.f64 a (*.f64 #s(literal 8 binary64) (*.f64 a b)))))) #s(literal 2 binary64)))) (neg.f64 (*.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 #s(literal 8 binary64) (*.f64 a b)))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (*.f64 a (*.f64 b (*.f64 a b))))) (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))) (*.f64 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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64))))) (*.f64 y-scale y-scale))) (/.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) (*.f64 (*.f64 (/.f64 x-scale (+.f64 a b)) (/.f64 y-scale (*.f64 #s(literal 2 binary64) (-.f64 b a)))) #s(literal 2 binary64))))))))) |
(/.f64 (+.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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64))))) (*.f64 y-scale y-scale))) (/.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) (*.f64 (*.f64 (/.f64 x-scale (+.f64 a b)) (/.f64 y-scale (*.f64 #s(literal 2 binary64) (-.f64 b a)))) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (*.f64 a (*.f64 b (*.f64 a b)))) (*.f64 b (*.f64 a (*.f64 #s(literal 8 binary64) (*.f64 a b)))))) #s(literal 3 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 #s(literal 8 binary64) (*.f64 a b)))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (*.f64 a (*.f64 b (*.f64 a b))))) (/.f64 (*.f64 x-scale x-scale) (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))))) #s(literal 3 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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64))))) (*.f64 y-scale y-scale))) (/.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) (*.f64 (*.f64 (/.f64 x-scale (+.f64 a b)) (/.f64 y-scale (*.f64 #s(literal 2 binary64) (-.f64 b a)))) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (*.f64 a (*.f64 b (*.f64 a b)))) (*.f64 b (*.f64 a (*.f64 #s(literal 8 binary64) (*.f64 a b)))))) #s(literal 2 binary64)) (-.f64 (pow.f64 (/.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 #s(literal 8 binary64) (*.f64 a b)))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (*.f64 a (*.f64 b (*.f64 a b))))) (/.f64 (*.f64 x-scale x-scale) (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))))) #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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64))))) (*.f64 y-scale y-scale))) (/.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) (*.f64 (*.f64 (/.f64 x-scale (+.f64 a b)) (/.f64 y-scale (*.f64 #s(literal 2 binary64) (-.f64 b a)))) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (*.f64 a (*.f64 b (*.f64 a b)))) (*.f64 b (*.f64 a (*.f64 #s(literal 8 binary64) (*.f64 a b)))))) (/.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 #s(literal 8 binary64) (*.f64 a b)))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (*.f64 a (*.f64 b (*.f64 a b))))) (/.f64 (*.f64 x-scale x-scale) (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))))))))) |
(/.f64 (-.f64 (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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64))))) (*.f64 y-scale y-scale))) (/.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) (*.f64 (*.f64 (/.f64 x-scale (+.f64 a b)) (/.f64 y-scale (*.f64 #s(literal 2 binary64) (-.f64 b a)))) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (*.f64 a (*.f64 b (*.f64 a b)))) (*.f64 b (*.f64 a (*.f64 #s(literal 8 binary64) (*.f64 a b)))))) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 #s(literal 8 binary64) (*.f64 a b)))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (*.f64 a (*.f64 b (*.f64 a b))))) (/.f64 (*.f64 x-scale x-scale) (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))))) #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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64))))) (*.f64 y-scale y-scale))) (/.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) (*.f64 (*.f64 (/.f64 x-scale (+.f64 a b)) (/.f64 y-scale (*.f64 #s(literal 2 binary64) (-.f64 b a)))) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (*.f64 a (*.f64 b (*.f64 a b)))) (*.f64 b (*.f64 a (*.f64 #s(literal 8 binary64) (*.f64 a b)))))) (/.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 #s(literal 8 binary64) (*.f64 a b)))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (*.f64 a (*.f64 b (*.f64 a b))))) (/.f64 (*.f64 x-scale x-scale) (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))))))) |
(*.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 #s(literal 8 binary64) (*.f64 a b)))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (*.f64 a (*.f64 b (*.f64 a b))))) (-.f64 (+.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64))))) (*.f64 y-scale y-scale))) (/.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) (*.f64 (*.f64 (/.f64 x-scale (+.f64 a b)) (/.f64 y-scale (*.f64 #s(literal 2 binary64) (-.f64 b a)))) #s(literal 2 binary64)))))) |
(*.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 #s(literal 8 binary64) (*.f64 a b)))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (*.f64 a (*.f64 b (*.f64 a b))))) (+.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64))))) (*.f64 y-scale y-scale))) (/.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) (*.f64 (*.f64 (/.f64 x-scale (+.f64 a b)) (/.f64 y-scale (*.f64 #s(literal 2 binary64) (-.f64 b a)))) #s(literal 2 binary64))))) (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))) (*.f64 x-scale x-scale)))) |
(*.f64 (+.f64 (pow.f64 (/.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 #s(literal 8 binary64) (*.f64 a b)))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (*.f64 a (*.f64 b (*.f64 a b))))) (/.f64 (*.f64 x-scale x-scale) (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))))) #s(literal 3 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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64))))) (*.f64 y-scale y-scale))) (/.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) (*.f64 (*.f64 (/.f64 x-scale (+.f64 a b)) (/.f64 y-scale (*.f64 #s(literal 2 binary64) (-.f64 b a)))) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (*.f64 a (*.f64 b (*.f64 a b)))) (*.f64 b (*.f64 a (*.f64 #s(literal 8 binary64) (*.f64 a b)))))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (/.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 #s(literal 8 binary64) (*.f64 a b)))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (*.f64 a (*.f64 b (*.f64 a b))))) (/.f64 (*.f64 x-scale x-scale) (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))))) #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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64))))) (*.f64 y-scale y-scale))) (/.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) (*.f64 (*.f64 (/.f64 x-scale (+.f64 a b)) (/.f64 y-scale (*.f64 #s(literal 2 binary64) (-.f64 b a)))) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (*.f64 a (*.f64 b (*.f64 a b)))) (*.f64 b (*.f64 a (*.f64 #s(literal 8 binary64) (*.f64 a b)))))) (-.f64 (/.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64))))) (*.f64 y-scale y-scale))) (/.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) (*.f64 (*.f64 (/.f64 x-scale (+.f64 a b)) (/.f64 y-scale (*.f64 #s(literal 2 binary64) (-.f64 b a)))) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (*.f64 a (*.f64 b (*.f64 a b)))) (*.f64 b (*.f64 a (*.f64 #s(literal 8 binary64) (*.f64 a b)))))) (/.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 #s(literal 8 binary64) (*.f64 a b)))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (*.f64 a (*.f64 b (*.f64 a b))))) (/.f64 (*.f64 x-scale x-scale) (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))))))))))))))) |
(*.f64 (-.f64 (pow.f64 (/.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 #s(literal 8 binary64) (*.f64 a b)))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (*.f64 a (*.f64 b (*.f64 a b))))) (/.f64 (*.f64 x-scale x-scale) (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))))) #s(literal 2 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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64))))) (*.f64 y-scale y-scale))) (/.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) (*.f64 (*.f64 (/.f64 x-scale (+.f64 a b)) (/.f64 y-scale (*.f64 #s(literal 2 binary64) (-.f64 b a)))) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (*.f64 a (*.f64 b (*.f64 a b)))) (*.f64 b (*.f64 a (*.f64 #s(literal 8 binary64) (*.f64 a b)))))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 #s(literal 8 binary64) (*.f64 a b)))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (*.f64 a (*.f64 b (*.f64 a b))))) (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))) (*.f64 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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64))))) (*.f64 y-scale y-scale))) (/.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) (*.f64 (*.f64 (/.f64 x-scale (+.f64 a b)) (/.f64 y-scale (*.f64 #s(literal 2 binary64) (-.f64 b a)))) #s(literal 2 binary64))))))))) |
(+.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 0 binary64)) |
(+.f64 #s(literal 0 binary64) (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))) |
(-.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 0 binary64)) |
(-.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) (/.f64 #s(literal 0 binary64) (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))))) |
(sin.f64 (*.f64 angle (*.f64 (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 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 3 binary64)))) |
(/.f64 #s(literal 1 binary64) (/.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))) |
(/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 3 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))))))) |
(/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))) |
(/.f64 (neg.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 3 binary64))) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))) |
(/.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))))))) (-.f64 #s(literal 0 binary64) (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))))) |
(/.f64 (+.f64 #s(literal 0 binary64) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 3 binary64))) (+.f64 #s(literal 0 binary64) (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 #s(literal 0 binary64) (sin.f64 (*.f64 angle (*.f64 (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 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))))))) (-.f64 #s(literal 0 binary64) (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))))) |
(/.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 3 binary64)) #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/90 binary64)))))))) |
(*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 3 binary64)) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))) |
(*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (/.f64 #s(literal 1 binary64) (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))))) |
(neg.f64 (/.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 #s(literal 8 binary64) (*.f64 a b)))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (*.f64 a (*.f64 b (*.f64 a b))))) (-.f64 (+.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64))))) (*.f64 y-scale y-scale))) (/.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) (*.f64 (*.f64 (/.f64 x-scale (+.f64 a b)) (/.f64 y-scale (*.f64 #s(literal 2 binary64) (-.f64 b a)))) #s(literal 2 binary64))))))) (/.f64 (*.f64 (*.f64 a (*.f64 b (*.f64 a b))) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) |
(neg.f64 (/.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 (*.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 #s(literal 8 binary64) (*.f64 a b)))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (*.f64 a (*.f64 b (*.f64 a b))))) (-.f64 (+.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64))))) (*.f64 y-scale y-scale))) (/.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) (*.f64 (*.f64 (/.f64 x-scale (+.f64 a b)) (/.f64 y-scale (*.f64 #s(literal 2 binary64) (-.f64 b a)))) #s(literal 2 binary64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 a b)))) (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) |
(/.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 #s(literal 8 binary64) (*.f64 a b)))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (*.f64 a (*.f64 b (*.f64 a b))))) (-.f64 (+.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64))))) (*.f64 y-scale y-scale))) (/.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) (*.f64 (*.f64 (/.f64 x-scale (+.f64 a b)) (/.f64 y-scale (*.f64 #s(literal 2 binary64) (-.f64 b a)))) #s(literal 2 binary64))))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 a b)))) (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)))) |
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 a b)))) (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))) (sqrt.f64 (*.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 #s(literal 8 binary64) (*.f64 a b)))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (*.f64 a (*.f64 b (*.f64 a b))))) (-.f64 (+.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64))))) (*.f64 y-scale y-scale))) (/.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) (*.f64 (*.f64 (/.f64 x-scale (+.f64 a b)) (/.f64 y-scale (*.f64 #s(literal 2 binary64) (-.f64 b a)))) #s(literal 2 binary64))))))))) |
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 a b)))) (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))) (sqrt.f64 (*.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 #s(literal 8 binary64) (*.f64 a b)))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (*.f64 a (*.f64 b (*.f64 a b))))) (-.f64 (+.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64))))) (*.f64 y-scale y-scale))) (/.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) (*.f64 (*.f64 (/.f64 x-scale (+.f64 a b)) (/.f64 y-scale (*.f64 #s(literal 2 binary64) (-.f64 b a)))) #s(literal 2 binary64)))))))) #s(literal 1 binary64))) |
(/.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 (*.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 #s(literal 8 binary64) (*.f64 a b)))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (*.f64 a (*.f64 b (*.f64 a b))))) (-.f64 (+.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64))))) (*.f64 y-scale y-scale))) (/.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) (*.f64 (*.f64 (/.f64 x-scale (+.f64 a b)) (/.f64 y-scale (*.f64 #s(literal 2 binary64) (-.f64 b a)))) #s(literal 2 binary64)))))))) (/.f64 (*.f64 (*.f64 a (*.f64 b (*.f64 a b))) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)))) |
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 a b)))) (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))) (sqrt.f64 (*.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 #s(literal 8 binary64) (*.f64 a b)))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (*.f64 a (*.f64 b (*.f64 a b))))) (-.f64 (+.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64))))) (*.f64 y-scale y-scale))) (/.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) (*.f64 (*.f64 (/.f64 x-scale (+.f64 a b)) (/.f64 y-scale (*.f64 #s(literal 2 binary64) (-.f64 b a)))) #s(literal 2 binary64)))))))))) |
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 (*.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 #s(literal 8 binary64) (*.f64 a b)))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (*.f64 a (*.f64 b (*.f64 a b))))) (-.f64 (+.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64))))) (*.f64 y-scale y-scale))) (/.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) (*.f64 (*.f64 (/.f64 x-scale (+.f64 a b)) (/.f64 y-scale (*.f64 #s(literal 2 binary64) (-.f64 b a)))) #s(literal 2 binary64))))))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 a b)))) (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)))) |
(pow.f64 (/.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 a b)))) (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))) (sqrt.f64 (*.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 #s(literal 8 binary64) (*.f64 a b)))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (*.f64 a (*.f64 b (*.f64 a b))))) (-.f64 (+.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64))))) (*.f64 y-scale y-scale))) (/.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) (*.f64 (*.f64 (/.f64 x-scale (+.f64 a b)) (/.f64 y-scale (*.f64 #s(literal 2 binary64) (-.f64 b a)))) #s(literal 2 binary64)))))))) #s(literal -1 binary64)) |
(*.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 #s(literal 8 binary64) (*.f64 a b)))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (*.f64 a (*.f64 b (*.f64 a b))))) (-.f64 (+.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64))))) (*.f64 y-scale y-scale))) (/.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) (*.f64 (*.f64 (/.f64 x-scale (+.f64 a b)) (/.f64 y-scale (*.f64 #s(literal 2 binary64) (-.f64 b a)))) #s(literal 2 binary64))))))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 a b)))))) |
(*.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 #s(literal 8 binary64) (*.f64 a b)))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (*.f64 a (*.f64 b (*.f64 a b))))) (-.f64 (+.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64))))) (*.f64 y-scale y-scale))) (/.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) (*.f64 (*.f64 (/.f64 x-scale (+.f64 a b)) (/.f64 y-scale (*.f64 #s(literal 2 binary64) (-.f64 b a)))) #s(literal 2 binary64))))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 a b)))) (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) |
(*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 (*.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 #s(literal 8 binary64) (*.f64 a b)))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (*.f64 a (*.f64 b (*.f64 a b))))) (-.f64 (+.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64))))) (*.f64 y-scale y-scale))) (/.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) (*.f64 (*.f64 (/.f64 x-scale (+.f64 a b)) (/.f64 y-scale (*.f64 #s(literal 2 binary64) (-.f64 b a)))) #s(literal 2 binary64)))))))) (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 a (*.f64 b (*.f64 a b))) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) |
(*.f64 (/.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 #s(literal 8 binary64) (*.f64 a b)))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (*.f64 a (*.f64 b (*.f64 a b))))) (-.f64 (+.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64))))) (*.f64 y-scale y-scale))) (/.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) (*.f64 (*.f64 (/.f64 x-scale (+.f64 a b)) (/.f64 y-scale (*.f64 #s(literal 2 binary64) (-.f64 b a)))) #s(literal 2 binary64))))))) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 a b))))) (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))) |
(*.f64 (*.f64 (/.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 #s(literal 8 binary64) (*.f64 a b)))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (*.f64 a (*.f64 b (*.f64 a b))))) (-.f64 (+.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64))))) (*.f64 y-scale y-scale))) (/.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) (*.f64 (*.f64 (/.f64 x-scale (+.f64 a b)) (/.f64 y-scale (*.f64 #s(literal 2 binary64) (-.f64 b a)))) #s(literal 2 binary64))))))) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 a b))))) x-scale) (*.f64 (*.f64 x-scale y-scale) y-scale)) |
(*.f64 (*.f64 (/.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 #s(literal 8 binary64) (*.f64 a b)))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (*.f64 a (*.f64 b (*.f64 a b))))) (-.f64 (+.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64))))) (*.f64 y-scale y-scale))) (/.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) (*.f64 (*.f64 (/.f64 x-scale (+.f64 a b)) (/.f64 y-scale (*.f64 #s(literal 2 binary64) (-.f64 b a)))) #s(literal 2 binary64))))))) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 a b))))) (*.f64 y-scale y-scale)) (*.f64 x-scale x-scale)) |
(*.f64 (*.f64 (/.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 #s(literal 8 binary64) (*.f64 a b)))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (*.f64 a (*.f64 b (*.f64 a b))))) (-.f64 (+.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64))))) (*.f64 y-scale y-scale))) (/.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) (*.f64 (*.f64 (/.f64 x-scale (+.f64 a b)) (/.f64 y-scale (*.f64 #s(literal 2 binary64) (-.f64 b a)))) #s(literal 2 binary64))))))) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 a b))))) (*.f64 (*.f64 x-scale y-scale) y-scale)) x-scale) |
(*.f64 (*.f64 (/.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 #s(literal 8 binary64) (*.f64 a b)))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (*.f64 a (*.f64 b (*.f64 a b))))) (-.f64 (+.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64))))) (*.f64 y-scale y-scale))) (/.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) (*.f64 (*.f64 (/.f64 x-scale (+.f64 a b)) (/.f64 y-scale (*.f64 #s(literal 2 binary64) (-.f64 b a)))) #s(literal 2 binary64))))))) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 a b))))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) |
(*.f64 (*.f64 (/.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 #s(literal 8 binary64) (*.f64 a b)))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (*.f64 a (*.f64 b (*.f64 a b))))) (-.f64 (+.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64))))) (*.f64 y-scale y-scale))) (/.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) (*.f64 (*.f64 (/.f64 x-scale (+.f64 a b)) (/.f64 y-scale (*.f64 #s(literal 2 binary64) (-.f64 b a)))) #s(literal 2 binary64))))))) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 a b))))) (*.f64 x-scale y-scale)) (*.f64 x-scale y-scale)) |
(*.f64 (*.f64 (/.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 #s(literal 8 binary64) (*.f64 a b)))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (*.f64 a (*.f64 b (*.f64 a b))))) (-.f64 (+.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64))))) (*.f64 y-scale y-scale))) (/.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) (*.f64 (*.f64 (/.f64 x-scale (+.f64 a b)) (/.f64 y-scale (*.f64 #s(literal 2 binary64) (-.f64 b a)))) #s(literal 2 binary64))))))) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 a b))))) (*.f64 (*.f64 x-scale x-scale) y-scale)) y-scale) |
(exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 #s(literal 8 binary64) (*.f64 a b)))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (*.f64 a (*.f64 b (*.f64 a b))))) (-.f64 (+.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64))))) (*.f64 y-scale y-scale))) (/.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) (*.f64 (*.f64 (/.f64 x-scale (+.f64 a b)) (/.f64 y-scale (*.f64 #s(literal 2 binary64) (-.f64 b a)))) #s(literal 2 binary64))))))) #s(literal 1/2 binary64))) |
(sqrt.f64 (*.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 #s(literal 8 binary64) (*.f64 a b)))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (*.f64 a (*.f64 b (*.f64 a b))))) (-.f64 (+.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64))))) (*.f64 y-scale y-scale))) (/.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) (*.f64 (*.f64 (/.f64 x-scale (+.f64 a b)) (/.f64 y-scale (*.f64 #s(literal 2 binary64) (-.f64 b a)))) #s(literal 2 binary64))))))) |
(/.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 #s(literal 8 binary64) (*.f64 a b)))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (*.f64 a (*.f64 b (*.f64 a b))))) (/.f64 (*.f64 x-scale x-scale) (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))))) #s(literal 3 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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64))))) (*.f64 y-scale y-scale))) (/.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) (*.f64 (*.f64 (/.f64 x-scale (+.f64 a b)) (/.f64 y-scale (*.f64 #s(literal 2 binary64) (-.f64 b a)))) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (*.f64 a (*.f64 b (*.f64 a b)))) (*.f64 b (*.f64 a (*.f64 #s(literal 8 binary64) (*.f64 a b)))))) #s(literal 3 binary64)))) (sqrt.f64 (+.f64 (pow.f64 (/.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 #s(literal 8 binary64) (*.f64 a b)))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (*.f64 a (*.f64 b (*.f64 a b))))) (/.f64 (*.f64 x-scale x-scale) (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))))) #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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64))))) (*.f64 y-scale y-scale))) (/.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) (*.f64 (*.f64 (/.f64 x-scale (+.f64 a b)) (/.f64 y-scale (*.f64 #s(literal 2 binary64) (-.f64 b a)))) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (*.f64 a (*.f64 b (*.f64 a b)))) (*.f64 b (*.f64 a (*.f64 #s(literal 8 binary64) (*.f64 a b)))))) (-.f64 (/.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64))))) (*.f64 y-scale y-scale))) (/.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) (*.f64 (*.f64 (/.f64 x-scale (+.f64 a b)) (/.f64 y-scale (*.f64 #s(literal 2 binary64) (-.f64 b a)))) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (*.f64 a (*.f64 b (*.f64 a b)))) (*.f64 b (*.f64 a (*.f64 #s(literal 8 binary64) (*.f64 a b)))))) (/.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 #s(literal 8 binary64) (*.f64 a b)))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (*.f64 a (*.f64 b (*.f64 a b))))) (/.f64 (*.f64 x-scale x-scale) (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))))))))))))))) |
(/.f64 (sqrt.f64 (-.f64 (pow.f64 (/.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 #s(literal 8 binary64) (*.f64 a b)))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (*.f64 a (*.f64 b (*.f64 a b))))) (/.f64 (*.f64 x-scale x-scale) (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))))) #s(literal 2 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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64))))) (*.f64 y-scale y-scale))) (/.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) (*.f64 (*.f64 (/.f64 x-scale (+.f64 a b)) (/.f64 y-scale (*.f64 #s(literal 2 binary64) (-.f64 b a)))) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (*.f64 a (*.f64 b (*.f64 a b)))) (*.f64 b (*.f64 a (*.f64 #s(literal 8 binary64) (*.f64 a b)))))) #s(literal 2 binary64)))) (sqrt.f64 (*.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 #s(literal 8 binary64) (*.f64 a b)))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (*.f64 a (*.f64 b (*.f64 a b))))) (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))) (*.f64 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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64))))) (*.f64 y-scale y-scale))) (/.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) (*.f64 (*.f64 (/.f64 x-scale (+.f64 a b)) (/.f64 y-scale (*.f64 #s(literal 2 binary64) (-.f64 b a)))) #s(literal 2 binary64))))))))) |
(pow.f64 (*.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 #s(literal 8 binary64) (*.f64 a b)))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (*.f64 a (*.f64 b (*.f64 a b))))) (-.f64 (+.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64))))) (*.f64 y-scale y-scale))) (/.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) (*.f64 (*.f64 (/.f64 x-scale (+.f64 a b)) (/.f64 y-scale (*.f64 #s(literal 2 binary64) (-.f64 b a)))) #s(literal 2 binary64)))))) #s(literal 1/2 binary64)) |
(*.f64 (pow.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 #s(literal 8 binary64) (*.f64 a b)))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (*.f64 a (*.f64 b (*.f64 a b))))) #s(literal 1/2 binary64)) (pow.f64 (-.f64 (+.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64))))) (*.f64 y-scale y-scale))) (/.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) (*.f64 (*.f64 (/.f64 x-scale (+.f64 a b)) (/.f64 y-scale (*.f64 #s(literal 2 binary64) (-.f64 b a)))) #s(literal 2 binary64))))) #s(literal 1/2 binary64))) |
(*.f64 (sqrt.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 #s(literal 8 binary64) (*.f64 a b)))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (*.f64 a (*.f64 b (*.f64 a b)))))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64))))) (*.f64 y-scale y-scale))) (/.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) (*.f64 (*.f64 (/.f64 x-scale (+.f64 a b)) (/.f64 y-scale (*.f64 #s(literal 2 binary64) (-.f64 b a)))) #s(literal 2 binary64))))))) |
(*.f64 (pow.f64 (*.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 #s(literal 8 binary64) (*.f64 a b)))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (*.f64 a (*.f64 b (*.f64 a b))))) (-.f64 (+.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64))))) (*.f64 y-scale y-scale))) (/.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) (*.f64 (*.f64 (/.f64 x-scale (+.f64 a b)) (/.f64 y-scale (*.f64 #s(literal 2 binary64) (-.f64 b a)))) #s(literal 2 binary64)))))) #s(literal 1/4 binary64)) (pow.f64 (*.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 #s(literal 8 binary64) (*.f64 a b)))) (/.f64 (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (*.f64 a (*.f64 b (*.f64 a b))))) (-.f64 (+.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (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 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64))))) (*.f64 y-scale y-scale))) (/.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) (*.f64 (*.f64 (/.f64 x-scale (+.f64 a b)) (/.f64 y-scale (*.f64 #s(literal 2 binary64) (-.f64 b a)))) #s(literal 2 binary64)))))) #s(literal 1/4 binary64))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (-.f64 (*.f64 b (*.f64 b (+.f64 (/.f64 (+.f64 #s(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/180 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 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 y-scale y-scale))))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b b) (*.f64 b b))) (+.f64 #s(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/180 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/180 binary64))))))) (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (+.f64 #s(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/180 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 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))))))) |
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale y-scale)) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (-.f64 (*.f64 b (*.f64 b (+.f64 (/.f64 (+.f64 #s(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/180 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 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 y-scale y-scale))))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b b) (*.f64 b b))) (+.f64 #s(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/180 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/180 binary64))))))) (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (+.f64 #s(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/180 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 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))))) |
(*.f64 (sqrt.f64 (-.f64 (*.f64 b (*.f64 b (+.f64 (/.f64 (+.f64 #s(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/180 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 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 y-scale y-scale))))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b b) (*.f64 b b))) (+.f64 #s(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/180 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/180 binary64))))))) (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (+.f64 #s(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/180 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 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale y-scale)) (sqrt.f64 #s(literal 8 binary64)))) |
(*.f64 (*.f64 (sqrt.f64 (-.f64 (*.f64 b (*.f64 b (+.f64 (/.f64 (+.f64 #s(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/180 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 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 y-scale y-scale))))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b b) (*.f64 b b))) (+.f64 #s(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/180 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/180 binary64))))))) (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (+.f64 #s(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/180 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 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))))) #s(literal 1/4 binary64)) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) |
(*.f64 (*.f64 (sqrt.f64 (-.f64 (*.f64 b (*.f64 b (+.f64 (/.f64 (+.f64 #s(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/180 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 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 y-scale y-scale))))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b b) (*.f64 b b))) (+.f64 #s(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/180 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/180 binary64))))))) (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (+.f64 #s(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/180 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 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) #s(literal 1/4 binary64)) |
(*.f64 (*.f64 (sqrt.f64 (-.f64 (*.f64 b (*.f64 b (+.f64 (/.f64 (+.f64 #s(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/180 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 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 y-scale y-scale))))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b b) (*.f64 b b))) (+.f64 #s(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/180 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/180 binary64))))))) (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (+.f64 #s(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/180 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 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/4 binary64) x-scale)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale)) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) |
(*.f64 (*.f64 (*.f64 x-scale y-scale) (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)) y-scale)) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale y-scale)) (sqrt.f64 #s(literal 8 binary64))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale)) x-scale) |
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (sqrt.f64 #s(literal 8 binary64))) y-scale) |
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) y-scale) (sqrt.f64 #s(literal 8 binary64))) |
(*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale)) |
(*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64))) |
(*.f64 (*.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale) x-scale) |
(*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) y-scale) |
(*.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale) |
(*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64))) (sqrt.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 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(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/180 binary64))))))))) (/.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))))) (*.f64 (*.f64 b b) (-.f64 #s(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/180 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 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(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/180 binary64))))))))) (*.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 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))))) (*.f64 (*.f64 b b) (-.f64 #s(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/180 binary64)))))))))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))))) (*.f64 (-.f64 #s(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/180 binary64)))))) (*.f64 (+.f64 a b) (*.f64 (+.f64 a b) (*.f64 (-.f64 b a) (-.f64 b a)))))) (*.f64 x-scale x-scale))))))))) |
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale y-scale)) (sqrt.f64 #s(literal 8 binary64))) (sqrt.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 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(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/180 binary64))))))))) (/.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))))) (*.f64 (*.f64 b b) (-.f64 #s(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/180 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 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(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/180 binary64))))))))) (*.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 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))))) (*.f64 (*.f64 b b) (-.f64 #s(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/180 binary64)))))))))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))))) (*.f64 (-.f64 #s(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/180 binary64)))))) (*.f64 (+.f64 a b) (*.f64 (+.f64 a b) (*.f64 (-.f64 b a) (-.f64 b a)))))) (*.f64 x-scale x-scale)))))))) |
(*.f64 (sqrt.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 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(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/180 binary64))))))))) (/.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))))) (*.f64 (*.f64 b b) (-.f64 #s(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/180 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 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(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/180 binary64))))))))) (*.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 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))))) (*.f64 (*.f64 b b) (-.f64 #s(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/180 binary64)))))))))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))))) (*.f64 (-.f64 #s(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/180 binary64)))))) (*.f64 (+.f64 a b) (*.f64 (+.f64 a b) (*.f64 (-.f64 b a) (-.f64 b a)))))) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale y-scale)) (sqrt.f64 #s(literal 8 binary64)))) |
(*.f64 (*.f64 (sqrt.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 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(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/180 binary64))))))))) (/.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))))) (*.f64 (*.f64 b b) (-.f64 #s(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/180 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 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(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/180 binary64))))))))) (*.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 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))))) (*.f64 (*.f64 b b) (-.f64 #s(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/180 binary64)))))))))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))))) (*.f64 (-.f64 #s(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/180 binary64)))))) (*.f64 (+.f64 a b) (*.f64 (+.f64 a b) (*.f64 (-.f64 b a) (-.f64 b a)))))) (*.f64 x-scale x-scale))))))) #s(literal 1/4 binary64)) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) |
(*.f64 (*.f64 (sqrt.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 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(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/180 binary64))))))))) (/.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))))) (*.f64 (*.f64 b b) (-.f64 #s(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/180 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 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(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/180 binary64))))))))) (*.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 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))))) (*.f64 (*.f64 b b) (-.f64 #s(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/180 binary64)))))))))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))))) (*.f64 (-.f64 #s(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/180 binary64)))))) (*.f64 (+.f64 a b) (*.f64 (+.f64 a b) (*.f64 (-.f64 b a) (-.f64 b a)))))) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64)))) #s(literal 1/4 binary64)) |
(*.f64 (*.f64 (sqrt.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 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(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/180 binary64))))))))) (/.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))))) (*.f64 (*.f64 b b) (-.f64 #s(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/180 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 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))))) (*.f64 (*.f64 b b) (+.f64 #s(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/180 binary64))))))))) (*.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 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))))) (*.f64 (*.f64 b b) (-.f64 #s(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/180 binary64)))))))))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))))))) (*.f64 (-.f64 #s(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/180 binary64)))))) (*.f64 (+.f64 a b) (*.f64 (+.f64 a b) (*.f64 (-.f64 b a) (-.f64 b a)))))) (*.f64 x-scale x-scale))))))) (*.f64 #s(literal 1/4 binary64) x-scale)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale)) |
(exp.f64 (*.f64 (log.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) |
(sqrt.f64 #s(literal 2 binary64)) |
(pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)) |
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 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 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 a b)))) |
(*.f64 (*.f64 a (*.f64 b (*.f64 a b))) #s(literal 4 binary64)) |
(*.f64 (*.f64 #s(literal 4 binary64) a) (*.f64 b (*.f64 a 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 b (*.f64 a 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) |
(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 (*.f64 (PI.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 (*.f64 (PI.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 (*.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))) |
(cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) |
(+.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 0 binary64)) |
(+.f64 #s(literal 0 binary64) (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))) |
(-.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 0 binary64)) |
(-.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) (/.f64 #s(literal 0 binary64) (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))))) |
(sin.f64 (*.f64 angle (*.f64 (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 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 3 binary64)))) |
(/.f64 #s(literal 1 binary64) (/.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))) |
(/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 3 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))))))) |
(/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))) |
(/.f64 (neg.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 3 binary64))) (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))) |
(/.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))))))) (-.f64 #s(literal 0 binary64) (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))))) |
(/.f64 (+.f64 #s(literal 0 binary64) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 3 binary64))) (+.f64 #s(literal 0 binary64) (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (*.f64 #s(literal 0 binary64) (sin.f64 (*.f64 angle (*.f64 (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 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))))))) (-.f64 #s(literal 0 binary64) (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))))) |
(/.f64 (-.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 3 binary64)) #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/90 binary64)))))))) |
(*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 3 binary64)) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))))) |
(*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))))) (/.f64 #s(literal 1 binary64) (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))))) |
(exp.f64 (*.f64 (log.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))) #s(literal 1 binary64))) |
(cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) |
(pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 1 binary64)) |
(*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 1/2 binary64)) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 1/2 binary64))) |
(exp.f64 (*.f64 (log.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))) #s(literal 1 binary64))) |
(sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) |
(pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 1 binary64)) |
(*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 1/2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 1/2 binary64))) |
| 1× | egg-herbie |
| 8546× | *-lowering-*.f32 |
| 8546× | *-lowering-*.f64 |
| 3052× | +-lowering-+.f64 |
| 3052× | +-lowering-+.f32 |
| 2308× | /-lowering-/.f32 |
Useful iterations: 0 (0.0ms)
| Iter | Nodes | Cost |
|---|---|---|
| 0 | 2871 | 173007 |
| 0 | 8088 | 173007 |
| 1× | iter limit |
| 1× | node limit |
| 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 b 2)) |
(* (pow a 3) (pow b 2)) |
(* (pow a 3) (pow b 2)) |
(* (pow a 3) (pow b 2)) |
(* (pow a 3) (pow b 2)) |
(* (pow a 3) (pow b 2)) |
(* (pow a 3) (pow b 2)) |
(* (pow a 3) (pow b 2)) |
(* (pow a 3) (pow b 2)) |
(* (pow a 3) (pow b 2)) |
(* (pow a 3) (pow b 2)) |
(* (pow a 3) (pow b 2)) |
(* (pow a 3) (pow b 2)) |
(* (pow a 3) (pow b 2)) |
(* (pow a 3) (pow b 2)) |
(* (pow a 3) (pow b 2)) |
(* (pow a 3) (pow b 2)) |
(* (pow a 3) (pow b 2)) |
(* (pow a 3) (pow b 2)) |
(* (pow a 3) (pow b 2)) |
(* (pow a 3) (pow b 2)) |
(* (pow a 3) (pow b 2)) |
(* (pow a 3) (pow b 2)) |
(* (pow a 3) (pow b 2)) |
(* (pow a 4) (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))))) |
(* (pow a 4) (+ (* -4 (* (/ (* a (* (pow b 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))))) (* (pow x-scale 4) (pow y-scale 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)))))) (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))))))) |
(* (pow a 4) (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (+ (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* a (+ (* -4 (* (/ (* (pow b 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* (pow x-scale 4) (pow y-scale 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)))))) (* a (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 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)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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))))))))))) |
(* (pow a 4) (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (+ (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* a (+ (* -4 (* (/ (* (pow b 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* (pow x-scale 4) (pow y-scale 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)))))) (* a (+ (* -4 (* (/ (* a (* (pow b 4) (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 (pow b 3)) (* 2 (pow b 3))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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))) (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)))))) (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 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)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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)))))))))))) |
(* (pow a 6) (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) |
(* (pow a 6) (+ (* -4 (* (/ (* (pow b 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (* a (* (pow x-scale 4) (pow y-scale 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)))))) (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) |
(* (pow a 6) (+ (* -4 (* (/ (* (pow b 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (* a (* (pow x-scale 4) (pow y-scale 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)))))) (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (+ (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/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 (/ 1 (pow y-scale 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 x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 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) (* (pow x-scale 2) (pow y-scale 2))))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) (* (pow x-scale 4) (pow y-scale 2)))))))))) |
(* (pow a 6) (+ (* -4 (* (/ (* (pow b 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (* a (* (pow x-scale 4) (pow y-scale 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)))))) (+ (* -4 (* (/ (* (pow b 4) (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 b) (* 2 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 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (* (pow x-scale 2) (* (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)))))))) (* (pow a 3) (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))) (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (+ (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/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 (/ 1 (pow y-scale 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 x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 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) (* (pow x-scale 2) (pow y-scale 2))))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) (* (pow x-scale 4) (pow y-scale 2))))))))))) |
(* (pow a 6) (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) |
(* (pow a 6) (+ (* 4 (* (/ (* (pow b 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (* a (* (pow x-scale 4) (pow y-scale 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)))))) (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) |
(* (pow a 6) (+ (* -1 (/ (+ (* -4 (* (/ (* (pow b 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (* (pow x-scale 4) (pow y-scale 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)))))) (* -1 (/ (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/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 (/ 1 (pow y-scale 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 x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))))) a))) a)) (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) |
(* (pow a 6) (+ (* -1 (/ (+ (* -4 (* (/ (* (pow b 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (* (pow x-scale 4) (pow y-scale 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)))))) (* -1 (/ (+ (* 4 (* (/ (* (pow b 4) (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 b) (* 2 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 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (* (pow x-scale 2) (* (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)))))))) (* a (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))) (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/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 (/ 1 (pow y-scale 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 x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))))) a))) a)) (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) |
(+ (* 8 (/ (* (pow a 4) (* (pow b 4) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (/ (pow b 2) (pow x-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (pow b 6)) (* (pow x-scale 4) (pow y-scale 2))))) |
(+ (* 8 (/ (* (pow a 4) (* (pow b 4) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (/ (pow b 2) (pow x-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 8 (/ (* (pow a 4) (pow b 6)) (* (pow x-scale 4) (pow y-scale 2)))) (* (pow angle 2) (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow 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)))))))) |
(+ (* 8 (/ (* (pow a 4) (* (pow b 4) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (/ (pow b 2) (pow x-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 8 (/ (* (pow a 4) (pow b 6)) (* (pow x-scale 4) (pow y-scale 2)))) (* (pow angle 2) (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))))) (* (pow x-scale 4) (pow y-scale 2)))) (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow 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 b 4) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4)))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* -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/2 (/ (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 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) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (/ (pow b 2) (pow x-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 8 (/ (* (pow a 4) (pow b 6)) (* (pow x-scale 4) (pow y-scale 2)))) (* (pow angle 2) (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))))) (* (pow x-scale 4) (pow y-scale 2)))) (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow 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 b 4) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4)))))) (* (pow x-scale 4) (pow y-scale 2)))) (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* -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/2 (/ (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 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)))) (* (pow angle 2) (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* -1/765275040000000 (* (pow b 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow a 2) (pow (PI) 6)))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* -1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow y-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))))) (/ (* (pow (+ a b) 2) (* (+ (* 1/31886460000000 (pow (PI) 6)) (* 1/19131876000000 (pow (PI) 6))) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (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 (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 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) (+ (* (pow 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 4) (pow y-scale 2)))) (* 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))) (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-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))))) |
(+ (* 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)))))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 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))) (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-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))))) |
(+ (* 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)))))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 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))) (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-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))))) |
(+ (* 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)))))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 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))) (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-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))))) |
(+ (* 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)))))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 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))) (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-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))))) |
(+ (* 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)))))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 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))) (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-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))))) |
(+ (* 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)))))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 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))) (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-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))))) |
(+ (* 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)))))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 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))) (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-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))))) |
(* (pow b 4) (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))))) |
(* (pow b 4) (+ (* -4 (* (/ (* (pow a 4) (* b (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))))) (* (pow x-scale 4) (pow y-scale 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)))))) (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))))))) |
(* (pow b 4) (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (+ (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* b (+ (* -4 (* (/ (* (pow a 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* (pow x-scale 4) (pow y-scale 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)))))) (* b (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 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)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (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 x-scale 2) (pow y-scale 2))))))))))) |
(* (pow b 4) (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (+ (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* b (+ (* -4 (* (/ (* (pow a 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* (pow x-scale 4) (pow y-scale 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)))))) (* b (+ (* -4 (* (/ (* (pow a 4) (* b (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 (pow a 3)) (* 2 (pow a 3))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* 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) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* 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))) (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)))))) (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 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)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (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 x-scale 2) (pow y-scale 2)))))))))))) |
(* (pow b 6) (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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)))))) |
(* (pow b 6) (+ (* -4 (* (/ (* (pow a 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (* b (* (pow x-scale 4) (pow y-scale 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)))))) (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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))))))) |
(* (pow b 6) (+ (* -4 (* (/ (* (pow a 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (* b (* (pow x-scale 4) (pow y-scale 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)))))) (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (+ (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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)))) (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/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)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (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) (* (pow x-scale 2) (pow y-scale 2))))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (* (pow x-scale 4) (pow y-scale 2)))))))))) |
(* (pow b 6) (+ (* -4 (* (/ (* (pow a 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (* b (* (pow x-scale 4) (pow y-scale 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)))))) (+ (* -4 (* (/ (* (pow a 4) (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 a) (* 2 a)) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (* (pow x-scale 2) (* (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)))))))) (* (pow b 3) (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (+ (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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)))) (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/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)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (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) (* (pow x-scale 2) (pow y-scale 2))))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (* (pow x-scale 4) (pow y-scale 2))))))))))) |
(* (pow b 6) (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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)))))) |
(* (pow b 6) (+ (* 4 (* (/ (* (pow a 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (* b (* (pow x-scale 4) (pow y-scale 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)))))) (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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))))))) |
(* (pow b 6) (+ (* -1 (/ (+ (* -4 (* (/ (* (pow a 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (* (pow x-scale 4) (pow y-scale 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)))))) (* -1 (/ (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/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)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))))) b))) b)) (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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))))))) |
(* (pow b 6) (+ (* -1 (/ (+ (* -4 (* (/ (* (pow a 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (* (pow x-scale 4) (pow y-scale 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)))))) (* -1 (/ (+ (* 4 (* (/ (* (pow a 4) (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 a) (* 2 a)) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (* (pow x-scale 2) (* (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)))))))) (* b (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/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)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))))) b))) b)) (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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))))))) |
(/ (+ (* -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)))))))))) (pow y-scale 2))) (* 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)))))))))) (pow y-scale 2)))) (pow x-scale 4)) |
(/ (+ (* -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)))))))))) (pow y-scale 2))) (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (* (pow x-scale 2) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (pow 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))) (* 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)))))))))) (pow y-scale 2))))) (pow x-scale 4)) |
(/ (+ (* -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)))))))))) (pow y-scale 2))) (+ (* 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)))))))))) (pow y-scale 2))) (* (pow x-scale 2) (+ (* -4 (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))))) (* (pow y-scale 2) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (pow y-scale 2))))))) (pow x-scale 4)) |
(/ (+ (* -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)))))))))) (pow y-scale 2))) (+ (* 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)))))))))) (pow y-scale 2))) (* (pow x-scale 2) (+ (* 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (pow y-scale 2))) (* (pow x-scale 2) (+ (* -4 (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))))) (* (pow y-scale 2) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 2 (/ (* (pow a 4) (* (pow b 4) (* (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)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 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)))))))) 3)))))))))) (pow x-scale 4)) |
(/ (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (pow y-scale 2)))) (pow x-scale 4)) |
(/ (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (+ (* -4 (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))) (* 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)))))))))) (pow y-scale 2))))) (pow x-scale 4)) |
(/ (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (+ (* -4 (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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 4) (* (pow b 4) (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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 4) (* (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))) 3))))) (* 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)))))))))) (pow y-scale 2)))))) (pow x-scale 4)) |
(/ (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (+ (* -4 (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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 4) (* (pow b 4) (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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 4) (* (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))) 3))))) (+ (* 4 (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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 x-scale 6) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))) (* 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)))))))))) (pow y-scale 2))))))) (pow x-scale 4)) |
(/ (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (pow y-scale 2)))) (pow x-scale 4)) |
(/ (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (+ (* -4 (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))) (* 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)))))))))) (pow y-scale 2))))) (pow x-scale 4)) |
(/ (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (+ (* -4 (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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 4) (* (pow b 4) (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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 4) (* (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))) 3))))) (* 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)))))))))) (pow y-scale 2)))))) (pow x-scale 4)) |
(/ (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (+ (* -4 (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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 4) (* (pow b 4) (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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 4) (* (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))) 3))))) (+ (* 4 (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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 x-scale 6) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))) (* 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)))))))))) (pow y-scale 2))))))) (pow x-scale 4)) |
(/ (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))))) (* (pow x-scale 2) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 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)))))))))) (pow x-scale 4)))) (pow y-scale 2)) |
(/ (+ (* -4 (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))))) (* (pow x-scale 2) (+ (* (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 a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))))) (* (pow x-scale 2) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 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)))))))))) (pow x-scale 4))))) (pow y-scale 2)) |
(/ (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))))) (* (pow x-scale 2) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (+ (* 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)))))))))) (pow x-scale 4))) (* (pow y-scale 2) (+ (* -4 (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))))) (* (pow x-scale 2) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 2 (/ (* (pow a 4) (* (pow b 4) (* (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)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 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)))))))) 3)))))))) (pow y-scale 2)) |
(/ (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))))) (* (pow x-scale 2) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (+ (* 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)))))))))) (pow x-scale 4))) (* (pow y-scale 2) (+ (* -4 (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))))) (* (pow x-scale 2) (+ (* (pow 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 4) (* (pow b 4) (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 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)))))))) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow 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 x-scale 2) (+ (* (pow 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)) |
(/ (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4)))) (pow y-scale 2)) |
(/ (+ (* -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))))) (pow x-scale 2))) (+ (* 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)))))))))) (pow x-scale 4))) (* 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (pow y-scale 2)))))) (pow y-scale 2)) |
(/ (+ (* -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))))) (pow x-scale 2))) (+ (* -4 (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 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))))))) (+ (* 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)))))))))) (pow x-scale 4))) (* 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (pow y-scale 2))))))) (pow y-scale 2)) |
(/ (+ (* -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))))) (pow x-scale 2))) (+ (* -4 (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 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))))))) (+ (* 2 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))))) (* (pow x-scale 2) (* (pow y-scale 6) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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))))) (+ (* 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)))))))))) (pow x-scale 4))) (* 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (pow y-scale 2)))))))) (pow y-scale 2)) |
(/ (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4)))) (pow y-scale 2)) |
(/ (+ (* -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))))) (pow x-scale 2))) (+ (* 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)))))))))) (pow x-scale 4))) (* 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (pow y-scale 2)))))) (pow y-scale 2)) |
(/ (+ (* -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))))) (pow x-scale 2))) (+ (* -4 (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 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))))))) (+ (* 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)))))))))) (pow x-scale 4))) (* 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (pow y-scale 2))))))) (pow y-scale 2)) |
(/ (+ (* -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))))) (pow x-scale 2))) (+ (* -4 (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 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))))))) (+ (* 2 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))))) (* (pow x-scale 2) (* (pow y-scale 6) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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))))) (+ (* 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)))))))))) (pow x-scale 4))) (* 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (pow y-scale 2)))))))) (pow y-scale 2)) |
(* 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/4 (* (/ (* (pow x-scale 2) (pow y-scale 2)) (pow b 2)) (sqrt (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))))))) |
(+ (* -1/2 (* (/ (* a (* (pow b 2) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (* (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (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 x-scale 2) (pow y-scale 2)) (pow b 2)) (sqrt (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))))))))) |
(+ (* 1/4 (* (/ (* (pow x-scale 2) (pow y-scale 2)) (pow b 2)) (sqrt (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))))))) (* a (+ (* -1/2 (* (/ (* (pow b 2) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (* (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (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/8 (* (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (- (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 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)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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 (/ (* (pow b 8) (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2))) (* (pow x-scale 8) (* (pow y-scale 8) (* (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (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))))))))))) (pow b 2)) (sqrt (/ 1 (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))))))))))) |
(+ (* 1/4 (* (/ (* (pow x-scale 2) (pow y-scale 2)) (pow b 2)) (sqrt (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))))))) (* a (+ (* -1/2 (* (/ (* (pow b 2) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (* (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (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))))))) (* a (+ (* 1/8 (* (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (- (* -4 (* (/ (* (pow b 4) (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 (pow b 3)) (* 2 (pow b 3))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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))) (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)))))) (* -2 (* (/ (* (pow b 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 (pow b 3)) (* 2 (pow b 3))) (- (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 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)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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 (/ (* (pow b 8) (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2))) (* (pow x-scale 8) (* (pow y-scale 8) (* (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (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))))))))))) (* (pow x-scale 4) (* (pow y-scale 4) (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (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)))))))))) (pow b 2)) (sqrt (/ 1 (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))))))))) (* 1/8 (* (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 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)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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 (/ (* (pow b 8) (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2))) (* (pow x-scale 8) (* (pow y-scale 8) (* (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (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)))))))))) (pow b 2)) (sqrt (/ 1 (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))))))))))))) |
(* 1/4 (* (/ (* a (* (pow x-scale 2) (pow y-scale 2))) (pow b 2)) (sqrt (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))))) |
(* a (+ (* -1/2 (* (/ (* (pow b 2) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (* a (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (* (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (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 x-scale 2) (pow y-scale 2)) (pow b 2)) (sqrt (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))))))) |
(* a (+ (* -1/2 (* (/ (* (pow b 2) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (* a (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (* (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (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/8 (* (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/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 (/ 1 (pow y-scale 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 x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))))) (* 4 (/ (* (pow b 8) (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 8) (* (pow y-scale 8) (* (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (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)))))))))) (* (pow a 2) (pow b 2))) (sqrt (/ 1 (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 1/4 (* (/ (* (pow x-scale 2) (pow y-scale 2)) (pow b 2)) (sqrt (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))))))) |
(* a (+ (* -1/2 (* (/ (* (pow b 2) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (* a (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (* (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (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/8 (* (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* -4 (* (/ (* (pow b 4) (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 b) (* 2 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 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (* (pow x-scale 2) (* (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)))))))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 b 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 b) (* 2 b)) (- (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/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 (/ 1 (pow y-scale 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 x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))))) (* 4 (/ (* (pow b 8) (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 8) (* (pow y-scale 8) (* (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (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))))))))))) (* (pow x-scale 4) (* (pow y-scale 4) (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 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 3) (pow b 2))) (sqrt (/ 1 (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 1/8 (* (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/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 (/ 1 (pow y-scale 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 x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))))) (* 4 (/ (* (pow b 8) (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 8) (* (pow y-scale 8) (* (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (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)))))))))) (* (pow a 2) (pow b 2))) (sqrt (/ 1 (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 1/4 (* (/ (* (pow x-scale 2) (pow y-scale 2)) (pow b 2)) (sqrt (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))))))))) |
(* -1/4 (* (/ (* a (* (pow x-scale 2) (pow y-scale 2))) (pow b 2)) (sqrt (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))))) |
(* -1 (* a (+ (* 1/4 (* (/ (* (pow x-scale 2) (pow y-scale 2)) (pow b 2)) (sqrt (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (* (/ (* (pow b 2) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (* a (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (* (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (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 (* a (+ (* -1 (/ (+ (* -1/2 (* (/ (* (pow b 2) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (* (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (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/8 (* (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/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 (/ 1 (pow y-scale 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 x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))))) (* 4 (/ (* (pow b 8) (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 8) (* (pow y-scale 8) (* (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (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)))))))))) (* a (pow b 2))) (sqrt (/ 1 (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))))))) a)) (* 1/4 (* (/ (* (pow x-scale 2) (pow y-scale 2)) (pow b 2)) (sqrt (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))))))) |
(* -1 (* a (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (* (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* -4 (* (/ (* (pow b 4) (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 b) (* 2 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 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (* (pow x-scale 2) (* (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)))))))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 b 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 b) (* 2 b)) (- (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/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 (/ 1 (pow y-scale 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 x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))))) (* 4 (/ (* (pow b 8) (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 8) (* (pow y-scale 8) (* (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (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))))))))))) (* (pow x-scale 4) (* (pow y-scale 4) (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (* a (pow b 2))) (sqrt (/ 1 (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 1/8 (* (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/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 (/ 1 (pow y-scale 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 x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))))) (* 4 (/ (* (pow b 8) (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 8) (* (pow y-scale 8) (* (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (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)))))))))) (pow b 2)) (sqrt (/ 1 (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))))))) a)) (* -1/2 (* (/ (* (pow b 2) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (* (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (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)))))))) a)) (* 1/4 (* (/ (* (pow x-scale 2) (pow y-scale 2)) (pow b 2)) (sqrt (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))))))) |
(* 1/4 (* (/ (* (pow x-scale 2) (pow y-scale 2)) (* (pow a 2) (pow b 2))) (sqrt (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (/ (pow b 2) (pow x-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (pow b 6)) (* (pow x-scale 4) (pow y-scale 2)))))))) |
(+ (* 1/8 (* (/ (* (pow angle 2) (* (pow x-scale 2) (* (pow y-scale 2) (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow 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 a 2) (pow b 2))) (sqrt (/ 1 (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (/ (pow b 2) (pow x-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (pow b 6)) (* (pow x-scale 4) (pow y-scale 2))))))))) (* 1/4 (* (/ (* (pow x-scale 2) (pow y-scale 2)) (* (pow a 2) (pow b 2))) (sqrt (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (/ (pow b 2) (pow x-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (pow b 6)) (* (pow x-scale 4) (pow y-scale 2))))))))) |
(+ (* 1/4 (* (/ (* (pow x-scale 2) (pow y-scale 2)) (* (pow a 2) (pow b 2))) (sqrt (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (/ (pow b 2) (pow x-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (pow b 6)) (* (pow x-scale 4) (pow y-scale 2)))))))) (* (pow angle 2) (+ (* 1/8 (* (/ (* (pow angle 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4)))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* -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/2 (/ (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 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))))) (* 1/4 (/ (pow (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow 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))))) 2) (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (/ (pow b 2) (pow x-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (pow b 6)) (* (pow x-scale 4) (pow y-scale 2))))))))))) (* (pow a 2) (pow b 2))) (sqrt (/ 1 (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (/ (pow b 2) (pow x-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (pow b 6)) (* (pow x-scale 4) (pow y-scale 2))))))))) (* 1/8 (* (/ (* (pow x-scale 2) (* (pow y-scale 2) (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow 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 a 2) (pow b 2))) (sqrt (/ 1 (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (/ (pow b 2) (pow x-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (pow b 6)) (* (pow x-scale 4) (pow y-scale 2)))))))))))) |
(+ (* 1/4 (* (/ (* (pow x-scale 2) (pow y-scale 2)) (* (pow a 2) (pow b 2))) (sqrt (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (/ (pow b 2) (pow x-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (pow b 6)) (* (pow x-scale 4) (pow y-scale 2)))))))) (* (pow angle 2) (+ (* 1/8 (* (/ (* (pow x-scale 2) (* (pow y-scale 2) (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow 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 a 2) (pow b 2))) (sqrt (/ 1 (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (/ (pow b 2) (pow x-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (pow b 6)) (* (pow x-scale 4) (pow y-scale 2))))))))) (* (pow angle 2) (+ (* 1/8 (* (/ (* (pow angle 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* -1/765275040000000 (* (pow b 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow a 2) (pow (PI) 6)))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* -1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow y-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))))) (/ (* (pow (+ a b) 2) (* (+ (* 1/31886460000000 (pow (PI) 6)) (* 1/19131876000000 (pow (PI) 6))) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (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 (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 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))))) (* 1/2 (/ (* (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow 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))))) (- (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4)))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* -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/2 (/ (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 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))))) (* 1/4 (/ (pow (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow 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))))) 2) (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (/ (pow b 2) (pow x-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (pow b 6)) (* (pow x-scale 4) (pow y-scale 2))))))))) (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (/ (pow b 2) (pow x-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (pow b 6)) (* (pow x-scale 4) (pow y-scale 2))))))))))) (* (pow a 2) (pow b 2))) (sqrt (/ 1 (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (/ (pow b 2) (pow x-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (pow b 6)) (* (pow x-scale 4) (pow y-scale 2))))))))) (* 1/8 (* (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4)))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* -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/2 (/ (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 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))))) (* 1/4 (/ (pow (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow 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))))) 2) (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (/ (pow b 2) (pow x-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (pow b 6)) (* (pow x-scale 4) (pow y-scale 2)))))))))) (* (pow a 2) (pow b 2))) (sqrt (/ 1 (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (/ (pow b 2) (pow x-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (pow b 6)) (* (pow x-scale 4) (pow y-scale 2)))))))))))))) |
(* 1/4 (* (/ (* (pow x-scale 2) (pow y-scale 2)) (* (pow a 2) (pow b 2))) (sqrt (+ (* 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)))))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 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))) (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-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/4 (* (/ (* (pow x-scale 2) (pow y-scale 2)) (* (pow a 2) (pow b 2))) (sqrt (+ (* 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)))))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 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))) (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-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/4 (* (/ (* (pow x-scale 2) (pow y-scale 2)) (* (pow a 2) (pow b 2))) (sqrt (+ (* 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)))))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 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))) (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-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/4 (* (/ (* (pow x-scale 2) (pow y-scale 2)) (* (pow a 2) (pow b 2))) (sqrt (+ (* 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)))))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 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))) (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-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/4 (* (/ (* (pow x-scale 2) (pow y-scale 2)) (* (pow a 2) (pow b 2))) (sqrt (+ (* 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)))))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 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))) (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-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/4 (* (/ (* (pow x-scale 2) (pow y-scale 2)) (* (pow a 2) (pow b 2))) (sqrt (+ (* 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)))))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 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))) (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-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/4 (* (/ (* (pow x-scale 2) (pow y-scale 2)) (* (pow a 2) (pow b 2))) (sqrt (+ (* 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)))))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 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))) (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-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/4 (* (/ (* (pow x-scale 2) (pow y-scale 2)) (* (pow a 2) (pow b 2))) (sqrt (+ (* 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)))))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 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))) (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-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/4 (* (/ (* (pow x-scale 2) (pow y-scale 2)) (pow a 2)) (sqrt (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))))))) |
(+ (* -1/2 (* (/ (* (pow a 2) (* b (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (* (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (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 x-scale 2) (pow y-scale 2)) (pow a 2)) (sqrt (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))))))))) |
(+ (* 1/4 (* (/ (* (pow x-scale 2) (pow y-scale 2)) (pow a 2)) (sqrt (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))))))) (* b (+ (* -1/2 (* (/ (* (pow a 2) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (* (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (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/8 (* (/ (* b (* (pow x-scale 2) (* (pow y-scale 2) (- (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 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)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (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 x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow a 8) (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2))) (* (pow x-scale 8) (* (pow y-scale 8) (* (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (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))))))))))) (pow a 2)) (sqrt (/ 1 (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))))))))))) |
(+ (* 1/4 (* (/ (* (pow x-scale 2) (pow y-scale 2)) (pow a 2)) (sqrt (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))))))) (* b (+ (* -1/2 (* (/ (* (pow a 2) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (* (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (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))))))) (* b (+ (* 1/8 (* (/ (* b (* (pow x-scale 2) (* (pow y-scale 2) (- (* -4 (* (/ (* (pow a 4) (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 (pow a 3)) (* 2 (pow a 3))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* 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) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* 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))) (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)))))) (* -2 (* (/ (* (pow a 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 (pow a 3)) (* 2 (pow a 3))) (- (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 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)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (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 x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow a 8) (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2))) (* (pow x-scale 8) (* (pow y-scale 8) (* (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (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))))))))))) (* (pow x-scale 4) (* (pow y-scale 4) (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (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)))))))))) (pow a 2)) (sqrt (/ 1 (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))))))))) (* 1/8 (* (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 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)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (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 x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow a 8) (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2))) (* (pow x-scale 8) (* (pow y-scale 8) (* (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (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)))))))))) (pow a 2)) (sqrt (/ 1 (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))))))))))))) |
(* 1/4 (* (/ (* b (* (pow x-scale 2) (pow y-scale 2))) (pow a 2)) (sqrt (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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)))))))) |
(* b (+ (* -1/2 (* (/ (* (pow a 2) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (* b (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (* (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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))))) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (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 x-scale 2) (pow y-scale 2)) (pow a 2)) (sqrt (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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)))))))))) |
(* b (+ (* -1/2 (* (/ (* (pow a 2) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (* b (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (* (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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))))) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) (+ (* 1/8 (* (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/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)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))))) (* 4 (/ (* (pow a 8) (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 8) (* (pow y-scale 8) (* (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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))))) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (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) (pow b 2))) (sqrt (/ 1 (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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))))))))) (* 1/4 (* (/ (* (pow x-scale 2) (pow y-scale 2)) (pow a 2)) (sqrt (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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))))))))))) |
(* b (+ (* -1/2 (* (/ (* (pow a 2) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (* b (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (* (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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))))) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) (+ (* 1/8 (* (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* -4 (* (/ (* (pow a 4) (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 a) (* 2 a)) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (* (pow x-scale 2) (* (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)))))))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 a 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 a) (* 2 a)) (- (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/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)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))))) (* 4 (/ (* (pow a 8) (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 8) (* (pow y-scale 8) (* (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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))))) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))))) (* (pow x-scale 4) (* (pow y-scale 4) (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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)))))))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (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) (pow b 3))) (sqrt (/ 1 (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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))))))))) (+ (* 1/8 (* (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/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)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))))) (* 4 (/ (* (pow a 8) (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 8) (* (pow y-scale 8) (* (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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))))) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (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) (pow b 2))) (sqrt (/ 1 (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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))))))))) (* 1/4 (* (/ (* (pow x-scale 2) (pow y-scale 2)) (pow a 2)) (sqrt (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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)))))))))))) |
(* -1/4 (* (/ (* b (* (pow x-scale 2) (pow y-scale 2))) (pow a 2)) (sqrt (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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)))))))) |
(* -1 (* b (+ (* 1/4 (* (/ (* (pow x-scale 2) (pow y-scale 2)) (pow a 2)) (sqrt (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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)))))))) (* 1/2 (* (/ (* (pow a 2) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (* b (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (* (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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))))) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))))))) |
(* -1 (* b (+ (* -1 (/ (+ (* -1/2 (* (/ (* (pow a 2) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (* (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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))))) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) (* -1/8 (* (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/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)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))))) (* 4 (/ (* (pow a 8) (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 8) (* (pow y-scale 8) (* (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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))))) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (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) b)) (sqrt (/ 1 (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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)))))))))) b)) (* 1/4 (* (/ (* (pow x-scale 2) (pow y-scale 2)) (pow a 2)) (sqrt (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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))))))))))) |
(* -1 (* b (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (* (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* -4 (* (/ (* (pow a 4) (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 a) (* 2 a)) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (* (pow x-scale 2) (* (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)))))))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 a 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 a) (* 2 a)) (- (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/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)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))))) (* 4 (/ (* (pow a 8) (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 8) (* (pow y-scale 8) (* (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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))))) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))))) (* (pow x-scale 4) (* (pow y-scale 4) (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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)))))))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (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) b)) (sqrt (/ 1 (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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))))))))) (* 1/8 (* (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/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)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))))) (* 4 (/ (* (pow a 8) (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 8) (* (pow y-scale 8) (* (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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))))) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (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)) (sqrt (/ 1 (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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)))))))))) b)) (* -1/2 (* (/ (* (pow a 2) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (* (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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))))) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))))) b)) (* 1/4 (* (/ (* (pow x-scale 2) (pow y-scale 2)) (pow a 2)) (sqrt (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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))))))))))) |
(* 1/4 (* (/ (pow y-scale 2) (* (pow a 2) (pow b 2))) (sqrt (+ (* -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)))))))))) (pow y-scale 2))) (* 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)))))))))) (pow y-scale 2))))))) |
(+ (* 1/4 (* (/ (pow y-scale 2) (* (pow a 2) (pow b 2))) (sqrt (+ (* -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)))))))))) (pow y-scale 2))) (* 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)))))))))) (pow y-scale 2))))))) (* (* (pow a 2) (* (pow b 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (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 (+ (* -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)))))))))) (pow y-scale 2))) (* 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)))))))))) (pow y-scale 2)))))))) |
(+ (* 1/4 (* (/ (pow y-scale 2) (* (pow a 2) (pow b 2))) (sqrt (+ (* -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)))))))))) (pow y-scale 2))) (* 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)))))))))) (pow y-scale 2))))))) (* (pow x-scale 2) (+ (* 1/8 (* (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* -4 (/ (* (pow a 4) (* (pow b 4) (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))))) (* (pow y-scale 2) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 16 (/ (* (pow a 8) (* (pow b 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) 2))) (* (pow y-scale 4) (+ (* -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)))))))))) (pow y-scale 2))) (* 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)))))))))) (pow y-scale 2)))))))))) (* (pow a 2) (pow b 2))) (sqrt (/ 1 (+ (* -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)))))))))) (pow y-scale 2))) (* 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)))))))))) (pow y-scale 2)))))))) (* (* (pow a 2) (* (pow b 2) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (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 (+ (* -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)))))))))) (pow y-scale 2))) (* 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)))))))))) (pow y-scale 2)))))))))) |
(+ (* 1/4 (* (/ (pow y-scale 2) (* (pow a 2) (pow b 2))) (sqrt (+ (* -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)))))))))) (pow y-scale 2))) (* 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)))))))))) (pow y-scale 2))))))) (* (pow x-scale 2) (+ (* (* (pow a 2) (* (pow b 2) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (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 (+ (* -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)))))))))) (pow y-scale 2))) (* 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)))))))))) (pow y-scale 2))))))) (* (pow x-scale 2) (+ (* 1/8 (* (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 2 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 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)))))))) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (- (* -4 (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))))) (* (pow y-scale 2) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 16 (/ (* (pow a 8) (* (pow b 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) 2))) (* (pow y-scale 4) (+ (* -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)))))))))) (pow y-scale 2))) (* 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)))))))))) (pow y-scale 2)))))))) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (pow 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) (+ (* -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)))))))))) (pow y-scale 2))) (* 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)))))))))) (pow y-scale 2)))))))))) (* (pow a 2) (pow b 2))) (sqrt (/ 1 (+ (* -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)))))))))) (pow y-scale 2))) (* 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)))))))))) (pow y-scale 2)))))))) (* 1/8 (* (/ (* (pow y-scale 2) (- (* -4 (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))))) (* (pow y-scale 2) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 16 (/ (* (pow a 8) (* (pow b 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) 2))) (* (pow y-scale 4) (+ (* -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)))))))))) (pow y-scale 2))) (* 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)))))))))) (pow y-scale 2))))))))) (* (pow a 2) (pow b 2))) (sqrt (/ 1 (+ (* -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)))))))))) (pow y-scale 2))) (* 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)))))))))) (pow y-scale 2))))))))))))) |
(* 1/4 (* (/ (pow y-scale 2) (* (pow a 2) (pow b 2))) (sqrt (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (pow y-scale 2))))))) |
(+ (* -1/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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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 (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (pow y-scale 2)))))))) (* 1/4 (* (/ (pow y-scale 2) (* (pow a 2) (pow b 2))) (sqrt (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (pow y-scale 2)))))))) |
(+ (* -1/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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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 (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* (pow y-scale 2) (- (* 2 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 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))) 3)))) (* 4 (/ (* (pow a 8) (* (pow b 8) (pow (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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 y-scale 4) (* (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (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))))))) (* (pow a 2) (* (pow b 2) (pow x-scale 4)))) (sqrt (/ 1 (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (pow y-scale 2)))))))) (* 1/4 (* (/ (pow y-scale 2) (* (pow a 2) (pow b 2))) (sqrt (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (pow y-scale 2))))))))) |
(+ (* -1/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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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 (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* (pow y-scale 2) (- (* 2 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 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))) 3)))) (* 4 (/ (* (pow a 8) (* (pow b 8) (pow (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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 y-scale 4) (* (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (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))))))) (* (pow a 2) (* (pow b 2) (pow x-scale 4)))) (sqrt (/ 1 (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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 y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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 4) (* (pow b 4) (* (- (* 2 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 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))) 3)))) (* 4 (/ (* (pow a 8) (* (pow b 8) (pow (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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 y-scale 4) (* (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (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)))))) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* (pow y-scale 2) (* (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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) (pow x-scale 6)))) (sqrt (/ 1 (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (pow y-scale 2)))))))) (* 1/4 (* (/ (pow y-scale 2) (* (pow a 2) (pow b 2))) (sqrt (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (pow y-scale 2)))))))))) |
(* 1/4 (* (/ (pow y-scale 2) (* (pow a 2) (pow b 2))) (sqrt (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (pow y-scale 2))))))) |
(+ (* -1/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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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 (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (pow y-scale 2)))))))) (* 1/4 (* (/ (pow y-scale 2) (* (pow a 2) (pow b 2))) (sqrt (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (pow y-scale 2)))))))) |
(+ (* -1/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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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 (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* (pow y-scale 2) (- (* 2 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 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))) 3)))) (* 4 (/ (* (pow a 8) (* (pow b 8) (pow (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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 y-scale 4) (* (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (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))))))) (* (pow a 2) (* (pow b 2) (pow x-scale 4)))) (sqrt (/ 1 (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (pow y-scale 2)))))))) (* 1/4 (* (/ (pow y-scale 2) (* (pow a 2) (pow b 2))) (sqrt (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (pow y-scale 2))))))))) |
(+ (* -1/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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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 (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* (pow y-scale 2) (- (* 2 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 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))) 3)))) (* 4 (/ (* (pow a 8) (* (pow b 8) (pow (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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 y-scale 4) (* (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (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))))))) (* (pow a 2) (* (pow b 2) (pow x-scale 4)))) (sqrt (/ 1 (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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 y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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 4) (* (pow b 4) (* (- (* 2 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 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))) 3)))) (* 4 (/ (* (pow a 8) (* (pow b 8) (pow (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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 y-scale 4) (* (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (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)))))) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* (pow y-scale 2) (* (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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) (pow x-scale 6)))) (sqrt (/ 1 (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (pow y-scale 2)))))))) (* 1/4 (* (/ (pow y-scale 2) (* (pow a 2) (pow b 2))) (sqrt (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (pow y-scale 2)))))))))) |
(* 1/4 (* (/ (* (pow x-scale 2) y-scale) (* (pow a 2) (pow b 2))) (sqrt (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))))) (* (pow x-scale 2) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 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)))))))))) (pow x-scale 4))))))) |
(* y-scale (+ (* -1/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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 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 (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))))) (* (pow x-scale 2) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 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)))))))))) (pow x-scale 4)))))))) (* 1/4 (* (/ (pow x-scale 2) (* (pow a 2) (pow b 2))) (sqrt (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))))) (* (pow x-scale 2) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 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)))))))))) (pow x-scale 4))))))))) |
(* y-scale (+ (* 1/4 (* (/ (pow x-scale 2) (* (pow a 2) (pow b 2))) (sqrt (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))))) (* (pow x-scale 2) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 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)))))))))) (pow x-scale 4))))))) (* (pow y-scale 2) (+ (* -1/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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 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 (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))))) (* (pow x-scale 2) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 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)))))))))) (pow x-scale 4)))))))) (* 1/8 (* (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 2 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 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)))))))) 3)))) (* 4 (/ (* (pow a 8) (* (pow b 8) (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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow 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 x-scale 4) (* (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))))) (* (pow x-scale 2) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 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)))))))))) (pow x-scale 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)))))))) (* (pow a 2) (pow b 2))) (sqrt (/ 1 (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))))) (* (pow x-scale 2) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 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)))))))))) (pow x-scale 4)))))))))))) |
(* y-scale (+ (* 1/4 (* (/ (pow x-scale 2) (* (pow a 2) (pow b 2))) (sqrt (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))))) (* (pow x-scale 2) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 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)))))))))) (pow x-scale 4))))))) (* (pow y-scale 2) (+ (* -1/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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 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 (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))))) (* (pow x-scale 2) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 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)))))))))) (pow x-scale 4)))))))) (* (pow y-scale 2) (+ (* 1/8 (* (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow 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 x-scale 2) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* -2 (/ (* (pow a 4) (* (pow b 4) (* (- (* 2 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 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)))))))) 3)))) (* 4 (/ (* (pow a 8) (* (pow b 8) (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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow 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 x-scale 4) (* (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))))) (* (pow x-scale 2) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 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)))))))))) (pow x-scale 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)))))) (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))))) (* (pow x-scale 2) (* (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))))) (* (pow x-scale 2) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 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)))))))))) (pow x-scale 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))))))))))))))) (* (pow a 2) (pow b 2))) (sqrt (/ 1 (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))))) (* (pow x-scale 2) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 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)))))))))) (pow x-scale 4)))))))) (* 1/8 (* (/ (* (pow x-scale 2) (- (* 2 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 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)))))))) 3)))) (* 4 (/ (* (pow a 8) (* (pow b 8) (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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow 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 x-scale 4) (* (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))))) (* (pow x-scale 2) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 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)))))))))) (pow x-scale 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))))))) (* (pow a 2) (pow b 2))) (sqrt (/ 1 (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))))) (* (pow x-scale 2) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 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)))))))))) (pow x-scale 4)))))))))))))) |
(* 1/4 (* (/ (* (pow x-scale 2) y-scale) (* (pow a 2) (pow b 2))) (sqrt (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4))))))) |
(* y-scale (+ (* 1/4 (* (/ (pow x-scale 2) (* (pow a 2) (pow b 2))) (sqrt (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4))))))) (* (/ (* (pow a 2) (* (pow b 2) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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)) (sqrt (/ 1 (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4))))))))) |
(* y-scale (+ (* 1/8 (* (/ (* (pow x-scale 2) (- (* -4 (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) (* 16 (/ (* (pow a 8) (* (pow b 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)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) 2))) (* (pow x-scale 4) (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4))))))))) (* (pow a 2) (* (pow b 2) (pow y-scale 4)))) (sqrt (/ 1 (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4)))))))) (+ (* 1/4 (* (/ (pow x-scale 2) (* (pow a 2) (pow b 2))) (sqrt (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4))))))) (* (/ (* (pow a 2) (* (pow b 2) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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)) (sqrt (/ 1 (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4)))))))))) |
(* y-scale (+ (* 1/8 (* (/ (* (pow x-scale 2) (- (* -4 (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) (* 16 (/ (* (pow a 8) (* (pow b 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)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) 2))) (* (pow x-scale 4) (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4))))))))) (* (pow a 2) (* (pow b 2) (pow y-scale 4)))) (sqrt (/ 1 (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4)))))))) (+ (* 1/8 (* (/ (* (pow x-scale 2) (- (* 2 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 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))) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (- (* -4 (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) (* 16 (/ (* (pow a 8) (* (pow b 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)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) 2))) (* (pow x-scale 4) (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4))))))))) (* (pow a 2) (* (pow b 2) (pow y-scale 6)))) (sqrt (/ 1 (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4)))))))) (+ (* 1/4 (* (/ (pow x-scale 2) (* (pow a 2) (pow b 2))) (sqrt (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4))))))) (* (/ (* (pow a 2) (* (pow b 2) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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)) (sqrt (/ 1 (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4))))))))))) |
(* -1/4 (* (/ (* (pow x-scale 2) y-scale) (* (pow a 2) (pow b 2))) (sqrt (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4))))))) |
(* -1 (* y-scale (+ (* 1/4 (* (/ (pow x-scale 2) (* (pow a 2) (pow b 2))) (sqrt (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4))))))) (* (/ (* (pow a 2) (* (pow b 2) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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)) (sqrt (/ 1 (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4)))))))))) |
(* -1 (* y-scale (+ (* 1/8 (* (/ (* (pow x-scale 2) (- (* -4 (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) (* 16 (/ (* (pow a 8) (* (pow b 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)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) 2))) (* (pow x-scale 4) (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4))))))))) (* (pow a 2) (* (pow b 2) (pow y-scale 4)))) (sqrt (/ 1 (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4)))))))) (+ (* 1/4 (* (/ (pow x-scale 2) (* (pow a 2) (pow b 2))) (sqrt (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4))))))) (* (/ (* (pow a 2) (* (pow b 2) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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)) (sqrt (/ 1 (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4))))))))))) |
(* -1 (* y-scale (+ (* 1/8 (* (/ (* (pow x-scale 2) (- (* -4 (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) (* 16 (/ (* (pow a 8) (* (pow b 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)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) 2))) (* (pow x-scale 4) (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4))))))))) (* (pow a 2) (* (pow b 2) (pow y-scale 4)))) (sqrt (/ 1 (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4)))))))) (+ (* 1/8 (* (/ (* (pow x-scale 2) (- (* 2 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 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))) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (- (* -4 (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) (* 16 (/ (* (pow a 8) (* (pow b 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)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) 2))) (* (pow x-scale 4) (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4))))))))) (* (pow a 2) (* (pow b 2) (pow y-scale 6)))) (sqrt (/ 1 (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4)))))))) (+ (* 1/4 (* (/ (pow x-scale 2) (* (pow a 2) (pow b 2))) (sqrt (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4))))))) (* (/ (* (pow a 2) (* (pow b 2) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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)) (sqrt (/ 1 (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4)))))))))))) |
(* (pow a 2) (sqrt (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))))))) |
(* (pow a 2) (+ (sqrt (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))))) (* -2 (* (/ (* a (* (pow b 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))))) (* (pow x-scale 4) (pow y-scale 4))) (sqrt (/ 1 (* (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (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))))))))) |
(* (pow a 2) (+ (sqrt (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))))) (* a (+ (* -2 (* (/ (* (pow b 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* (pow x-scale 4) (pow y-scale 4))) (sqrt (/ 1 (* (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (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/2 (* (* a (- (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 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)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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 (/ (* (pow b 8) (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2))) (* (pow x-scale 8) (* (pow y-scale 8) (* (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (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))))))))) (sqrt (/ 1 (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))))))))))))) |
(* (pow a 2) (+ (sqrt (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))))) (* a (+ (* -2 (* (/ (* (pow b 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* (pow x-scale 4) (pow y-scale 4))) (sqrt (/ 1 (* (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (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))))))) (* a (+ (* 1/2 (* (sqrt (/ 1 (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))))))) (- (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 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)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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 (/ (* (pow b 8) (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2))) (* (pow x-scale 8) (* (pow y-scale 8) (* (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (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/2 (* (* a (- (* -4 (* (/ (* (pow b 4) (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 (pow b 3)) (* 2 (pow b 3))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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))) (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)))))) (* -2 (* (/ (* (pow b 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 (pow b 3)) (* 2 (pow b 3))) (- (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 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)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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 (/ (* (pow b 8) (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2))) (* (pow x-scale 8) (* (pow y-scale 8) (* (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (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))))))))))) (* (pow x-scale 4) (* (pow y-scale 4) (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (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)))))))) (sqrt (/ 1 (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))))))))))))))) |
(* (pow a 3) (sqrt (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) |
(* (pow a 3) (+ (sqrt (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (* -2 (* (/ (* (pow b 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (* a (* (pow x-scale 4) (pow y-scale 4)))) (sqrt (/ 1 (* (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (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))))))))) |
(* (pow a 3) (+ (sqrt (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (+ (* -2 (* (/ (* (pow b 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (* a (* (pow x-scale 4) (pow y-scale 4)))) (sqrt (/ 1 (* (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (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/2 (* (/ (- (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/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 (/ 1 (pow y-scale 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 x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))))) (* 4 (/ (* (pow b 8) (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 8) (* (pow y-scale 8) (* (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (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)))))))) (pow a 2)) (sqrt (/ 1 (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))))))))) |
(* (pow a 3) (+ (sqrt (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (+ (* -2 (* (/ (* (pow b 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (* a (* (pow x-scale 4) (pow y-scale 4)))) (sqrt (/ 1 (* (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (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/2 (* (/ (- (* -4 (* (/ (* (pow b 4) (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 b) (* 2 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 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (* (pow x-scale 2) (* (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)))))))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 b 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 b) (* 2 b)) (- (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/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 (/ 1 (pow y-scale 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 x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))))) (* 4 (/ (* (pow b 8) (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 8) (* (pow y-scale 8) (* (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (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))))))))))) (* (pow x-scale 4) (* (pow y-scale 4) (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 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 3)) (sqrt (/ 1 (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 1/2 (* (/ (- (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/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 (/ 1 (pow y-scale 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 x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))))) (* 4 (/ (* (pow b 8) (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 8) (* (pow y-scale 8) (* (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (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)))))))) (pow a 2)) (sqrt (/ 1 (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))))))))) |
(* -1 (* (pow a 3) (sqrt (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))))) |
(* -1 (* (pow a 3) (+ (sqrt (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (* 2 (* (/ (* (pow b 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (* a (* (pow x-scale 4) (pow y-scale 4)))) (sqrt (/ 1 (* (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (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 (* (pow a 3) (+ (sqrt (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (* -1 (/ (+ (* -2 (* (/ (* (pow b 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (* (pow x-scale 4) (pow y-scale 4))) (sqrt (/ 1 (* (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (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/2 (* (/ (- (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/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 (/ 1 (pow y-scale 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 x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))))) (* 4 (/ (* (pow b 8) (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 8) (* (pow y-scale 8) (* (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (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)))))))) a) (sqrt (/ 1 (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))))))) a))))) |
(* -1 (* (pow a 3) (+ (sqrt (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (* -1 (/ (+ (* -2 (* (/ (* (pow b 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (* (pow x-scale 4) (pow y-scale 4))) (sqrt (/ 1 (* (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (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 (/ (+ (* -1/2 (* (/ (- (* -4 (* (/ (* (pow b 4) (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 b) (* 2 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 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (* (pow x-scale 2) (* (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)))))))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 b 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 b) (* 2 b)) (- (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/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 (/ 1 (pow y-scale 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 x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))))) (* 4 (/ (* (pow b 8) (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 8) (* (pow y-scale 8) (* (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (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))))))))))) (* (pow x-scale 4) (* (pow y-scale 4) (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))) a) (sqrt (/ 1 (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 1/2 (* (sqrt (/ 1 (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (- (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/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 (/ 1 (pow y-scale 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 x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))))) (* 4 (/ (* (pow b 8) (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 8) (* (pow y-scale 8) (* (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (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))))))))))) a))) a))))) |
(sqrt (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (/ (pow b 2) (pow x-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (pow b 6)) (* (pow x-scale 4) (pow y-scale 2)))))) |
(+ (sqrt (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (/ (pow b 2) (pow x-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (pow b 6)) (* (pow x-scale 4) (pow y-scale 2)))))) (* 1/2 (* (* (pow angle 2) (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow 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)))))) (sqrt (/ 1 (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (/ (pow b 2) (pow x-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (pow b 6)) (* (pow x-scale 4) (pow y-scale 2)))))))))) |
(+ (sqrt (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (/ (pow b 2) (pow x-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (pow b 6)) (* (pow x-scale 4) (pow y-scale 2)))))) (* (pow angle 2) (+ (* 1/2 (* (* (pow angle 2) (- (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4)))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* -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/2 (/ (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 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))))) (* 1/4 (/ (pow (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow 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))))) 2) (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (/ (pow b 2) (pow x-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (pow b 6)) (* (pow x-scale 4) (pow y-scale 2))))))))) (sqrt (/ 1 (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (/ (pow b 2) (pow x-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (pow b 6)) (* (pow x-scale 4) (pow y-scale 2))))))))) (* 1/2 (* (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow 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))))) (sqrt (/ 1 (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (/ (pow b 2) (pow x-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (pow b 6)) (* (pow x-scale 4) (pow y-scale 2)))))))))))) |
(+ (sqrt (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (/ (pow b 2) (pow x-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (pow b 6)) (* (pow x-scale 4) (pow y-scale 2)))))) (* (pow angle 2) (+ (* 1/2 (* (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow 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))))) (sqrt (/ 1 (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (/ (pow b 2) (pow x-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (pow b 6)) (* (pow x-scale 4) (pow y-scale 2))))))))) (* (pow angle 2) (+ (* 1/2 (* (sqrt (/ 1 (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (/ (pow b 2) (pow x-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (pow b 6)) (* (pow x-scale 4) (pow y-scale 2))))))) (- (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4)))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* -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/2 (/ (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 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))))) (* 1/4 (/ (pow (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow 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))))) 2) (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (/ (pow b 2) (pow x-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (pow b 6)) (* (pow x-scale 4) (pow y-scale 2)))))))))) (* 1/2 (* (* (pow angle 2) (- (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* -1/765275040000000 (* (pow b 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow a 2) (pow (PI) 6)))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* -1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow y-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))))) (/ (* (pow (+ a b) 2) (* (+ (* 1/31886460000000 (pow (PI) 6)) (* 1/19131876000000 (pow (PI) 6))) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (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 (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 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))))) (* 1/2 (/ (* (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow 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))))) (- (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4)))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* -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/2 (/ (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 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))))) (* 1/4 (/ (pow (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow 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))))) 2) (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (/ (pow b 2) (pow x-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (pow b 6)) (* (pow x-scale 4) (pow y-scale 2))))))))) (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (/ (pow b 2) (pow x-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (pow b 6)) (* (pow x-scale 4) (pow y-scale 2))))))))) (sqrt (/ 1 (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (/ (pow b 2) (pow x-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (pow b 6)) (* (pow x-scale 4) (pow y-scale 2)))))))))))))) |
(sqrt (+ (* 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)))))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 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))) (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-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)))))) |
(sqrt (+ (* 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)))))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 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))) (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-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)))))) |
(sqrt (+ (* 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)))))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 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))) (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-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)))))) |
(sqrt (+ (* 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)))))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 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))) (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-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)))))) |
(sqrt (+ (* 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)))))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 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))) (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-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)))))) |
(sqrt (+ (* 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)))))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 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))) (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-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)))))) |
(sqrt (+ (* 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)))))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 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))) (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-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)))))) |
(sqrt (+ (* 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)))))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 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))) (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-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)))))) |
(* (pow b 2) (sqrt (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))))))) |
(* (pow b 2) (+ (sqrt (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))))) (* -2 (* (/ (* (pow a 4) (* b (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))))) (* (pow x-scale 4) (pow y-scale 4))) (sqrt (/ 1 (* (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (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))))))))) |
(* (pow b 2) (+ (sqrt (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))))) (* b (+ (* -2 (* (/ (* (pow a 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* (pow x-scale 4) (pow y-scale 4))) (sqrt (/ 1 (* (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (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/2 (* (* b (- (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 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)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (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 x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow a 8) (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2))) (* (pow x-scale 8) (* (pow y-scale 8) (* (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (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))))))))) (sqrt (/ 1 (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))))))))))))) |
(* (pow b 2) (+ (sqrt (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))))) (* b (+ (* -2 (* (/ (* (pow a 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* (pow x-scale 4) (pow y-scale 4))) (sqrt (/ 1 (* (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (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))))))) (* b (+ (* 1/2 (* (sqrt (/ 1 (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))))))) (- (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 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)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (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 x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow a 8) (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2))) (* (pow x-scale 8) (* (pow y-scale 8) (* (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (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/2 (* (* b (- (* -4 (* (/ (* (pow a 4) (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 (pow a 3)) (* 2 (pow a 3))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* 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) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* 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))) (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)))))) (* -2 (* (/ (* (pow a 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 (pow a 3)) (* 2 (pow a 3))) (- (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 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)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (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 x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow a 8) (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2))) (* (pow x-scale 8) (* (pow y-scale 8) (* (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (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))))))))))) (* (pow x-scale 4) (* (pow y-scale 4) (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (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)))))))) (sqrt (/ 1 (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))))))))))))))) |
(* (pow b 3) (sqrt (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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))))))) |
(* (pow b 3) (+ (sqrt (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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)))))) (* -2 (* (/ (* (pow a 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (* b (* (pow x-scale 4) (pow y-scale 4)))) (sqrt (/ 1 (* (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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))))) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (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 3) (+ (sqrt (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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)))))) (+ (* -2 (* (/ (* (pow a 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (* b (* (pow x-scale 4) (pow y-scale 4)))) (sqrt (/ 1 (* (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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))))) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) (* 1/2 (* (/ (- (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/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)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))))) (* 4 (/ (* (pow a 8) (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 8) (* (pow y-scale 8) (* (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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))))) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (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 (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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)))))))))))) |
(* (pow b 3) (+ (sqrt (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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)))))) (+ (* -2 (* (/ (* (pow a 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (* b (* (pow x-scale 4) (pow y-scale 4)))) (sqrt (/ 1 (* (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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))))) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) (+ (* 1/2 (* (/ (- (* -4 (* (/ (* (pow a 4) (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 a) (* 2 a)) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (* (pow x-scale 2) (* (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)))))))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 a 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 a) (* 2 a)) (- (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/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)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))))) (* 4 (/ (* (pow a 8) (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 8) (* (pow y-scale 8) (* (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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))))) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))))) (* (pow x-scale 4) (* (pow y-scale 4) (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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)))))))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (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 3)) (sqrt (/ 1 (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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))))))))) (* 1/2 (* (/ (- (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/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)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))))) (* 4 (/ (* (pow a 8) (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 8) (* (pow y-scale 8) (* (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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))))) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (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 (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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))))))))))))) |
(* -1 (* (pow b 3) (sqrt (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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)))))))) |
(* -1 (* (pow b 3) (+ (sqrt (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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)))))) (* 2 (* (/ (* (pow a 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (* b (* (pow x-scale 4) (pow y-scale 4)))) (sqrt (/ 1 (* (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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))))) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))))))) |
(* -1 (* (pow b 3) (+ (sqrt (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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)))))) (* -1 (/ (+ (* -2 (* (/ (* (pow a 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (* (pow x-scale 4) (pow y-scale 4))) (sqrt (/ 1 (* (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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))))) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) (* -1/2 (* (/ (- (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/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)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))))) (* 4 (/ (* (pow a 8) (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 8) (* (pow y-scale 8) (* (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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))))) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))))) b) (sqrt (/ 1 (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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)))))))))) b))))) |
(* -1 (* (pow b 3) (+ (sqrt (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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)))))) (* -1 (/ (+ (* -2 (* (/ (* (pow a 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (* (pow x-scale 4) (pow y-scale 4))) (sqrt (/ 1 (* (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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))))) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) (* -1 (/ (+ (* -1/2 (* (/ (- (* -4 (* (/ (* (pow a 4) (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 a) (* 2 a)) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (* (pow x-scale 2) (* (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)))))))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 a 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 a) (* 2 a)) (- (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/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)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))))) (* 4 (/ (* (pow a 8) (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 8) (* (pow y-scale 8) (* (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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))))) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))))) (* (pow x-scale 4) (* (pow y-scale 4) (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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)))))))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) b) (sqrt (/ 1 (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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))))))))) (* 1/2 (* (sqrt (/ 1 (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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))))))) (- (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/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)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))))) (* 4 (/ (* (pow a 8) (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 8) (* (pow y-scale 8) (* (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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))))) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))))) b))) b))))) |
(* (/ 1 (pow x-scale 2)) (sqrt (+ (* -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)))))))))) (pow y-scale 2))) (* 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)))))))))) (pow y-scale 2)))))) |
(/ (+ (sqrt (+ (* -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)))))))))) (pow y-scale 2))) (* 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)))))))))) (pow y-scale 2))))) (* 4 (* (/ (* (pow a 4) (* (pow b 4) (* (pow x-scale 2) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (pow 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)) (sqrt (/ 1 (+ (* -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)))))))))) (pow y-scale 2))) (* 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)))))))))) (pow y-scale 2))))))))) (pow x-scale 2)) |
(/ (+ (sqrt (+ (* -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)))))))))) (pow y-scale 2))) (* 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)))))))))) (pow y-scale 2))))) (* (pow x-scale 2) (+ (* 1/2 (* (* (pow x-scale 2) (- (* -4 (/ (* (pow a 4) (* (pow b 4) (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))))) (* (pow y-scale 2) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 16 (/ (* (pow a 8) (* (pow b 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) 2))) (* (pow y-scale 4) (+ (* -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)))))))))) (pow y-scale 2))) (* 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)))))))))) (pow y-scale 2))))))))) (sqrt (/ 1 (+ (* -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)))))))))) (pow y-scale 2))) (* 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)))))))))) (pow y-scale 2)))))))) (* 4 (* (/ (* (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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (pow 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)) (sqrt (/ 1 (+ (* -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)))))))))) (pow y-scale 2))) (* 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)))))))))) (pow y-scale 2))))))))))) (pow x-scale 2)) |
(/ (+ (sqrt (+ (* -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)))))))))) (pow y-scale 2))) (* 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)))))))))) (pow y-scale 2))))) (* (pow x-scale 2) (+ (* 4 (* (/ (* (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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (pow 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)) (sqrt (/ 1 (+ (* -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)))))))))) (pow y-scale 2))) (* 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)))))))))) (pow y-scale 2)))))))) (* (pow x-scale 2) (+ (* 1/2 (* (sqrt (/ 1 (+ (* -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)))))))))) (pow y-scale 2))) (* 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)))))))))) (pow y-scale 2)))))) (- (* -4 (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))))) (* (pow y-scale 2) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 16 (/ (* (pow a 8) (* (pow b 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) 2))) (* (pow y-scale 4) (+ (* -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)))))))))) (pow y-scale 2))) (* 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)))))))))) (pow y-scale 2)))))))))) (* 1/2 (* (* (pow x-scale 2) (- (* 2 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 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)))))))) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (- (* -4 (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))))) (* (pow y-scale 2) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 16 (/ (* (pow a 8) (* (pow b 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) 2))) (* (pow y-scale 4) (+ (* -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)))))))))) (pow y-scale 2))) (* 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)))))))))) (pow y-scale 2)))))))) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (pow 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) (+ (* -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)))))))))) (pow y-scale 2))) (* 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)))))))))) (pow y-scale 2))))))))) (sqrt (/ 1 (+ (* -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)))))))))) (pow y-scale 2))) (* 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)))))))))) (pow y-scale 2))))))))))))) (pow x-scale 2)) |
(* (/ 1 (pow x-scale 2)) (sqrt (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (pow y-scale 2)))))) |
(/ (+ (sqrt (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (pow y-scale 2))))) (* -2 (* (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (pow y-scale 2))))))))) (pow x-scale 2)) |
(/ (+ (sqrt (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (pow y-scale 2))))) (+ (* -2 (* (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (pow y-scale 2)))))))) (* 1/2 (* (/ (- (* 2 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 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))) 3)))) (* 4 (/ (* (pow a 8) (* (pow b 8) (pow (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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 y-scale 4) (* (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (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)))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (pow y-scale 2)))))))))) (pow x-scale 2)) |
(/ (+ (sqrt (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (pow y-scale 2))))) (+ (* -2 (* (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (pow y-scale 2)))))))) (+ (* 1/2 (* (/ (- (* 2 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 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))) 3)))) (* 4 (/ (* (pow a 8) (* (pow b 8) (pow (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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 y-scale 4) (* (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (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)))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (pow y-scale 2)))))))) (* 1/2 (* (/ (- (* 4 (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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 y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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 4) (* (pow b 4) (* (- (* 2 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 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))) 3)))) (* 4 (/ (* (pow a 8) (* (pow b 8) (pow (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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 y-scale 4) (* (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (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)))))) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* (pow y-scale 2) (* (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (pow y-scale 2))))))))))) (pow x-scale 2)) |
(* (/ 1 (pow x-scale 2)) (sqrt (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (pow y-scale 2)))))) |
(/ (+ (sqrt (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (pow y-scale 2))))) (* -2 (* (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (pow y-scale 2))))))))) (pow x-scale 2)) |
(/ (+ (sqrt (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (pow y-scale 2))))) (+ (* -2 (* (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (pow y-scale 2)))))))) (* 1/2 (* (/ (- (* 2 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 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))) 3)))) (* 4 (/ (* (pow a 8) (* (pow b 8) (pow (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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 y-scale 4) (* (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (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)))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (pow y-scale 2)))))))))) (pow x-scale 2)) |
(/ (+ (sqrt (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (pow y-scale 2))))) (+ (* -2 (* (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (pow y-scale 2)))))))) (+ (* 1/2 (* (/ (- (* 2 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 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))) 3)))) (* 4 (/ (* (pow a 8) (* (pow b 8) (pow (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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 y-scale 4) (* (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (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)))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (pow y-scale 2)))))))) (* 1/2 (* (/ (- (* 4 (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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 y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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 4) (* (pow b 4) (* (- (* 2 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 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))) 3)))) (* 4 (/ (* (pow a 8) (* (pow b 8) (pow (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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 y-scale 4) (* (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (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)))))) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* (pow y-scale 2) (* (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (pow y-scale 2))))))))))) (pow x-scale 2)) |
(* (/ 1 y-scale) (sqrt (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))))) (* (pow x-scale 2) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 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)))))))))) (pow x-scale 4)))))) |
(/ (+ (sqrt (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))))) (* (pow x-scale 2) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 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)))))))))) (pow x-scale 4))))) (* -2 (* (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))))) (* (pow x-scale 2) (+ (* (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 (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))))) (* (pow x-scale 2) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 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)))))))))) (pow x-scale 4))))))))) y-scale) |
(/ (+ (sqrt (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))))) (* (pow x-scale 2) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 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)))))))))) (pow x-scale 4))))) (* (pow y-scale 2) (+ (* -2 (* (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))))) (* (pow x-scale 2) (+ (* (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 (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))))) (* (pow x-scale 2) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 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)))))))))) (pow x-scale 4)))))))) (* 1/2 (* (* (pow y-scale 2) (- (* 2 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 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)))))))) 3)))) (* 4 (/ (* (pow a 8) (* (pow b 8) (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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow 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 x-scale 4) (* (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))))) (* (pow x-scale 2) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 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)))))))))) (pow x-scale 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))))))) (sqrt (/ 1 (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))))) (* (pow x-scale 2) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 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)))))))))) (pow x-scale 4))))))))))) y-scale) |
(/ (+ (sqrt (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))))) (* (pow x-scale 2) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 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)))))))))) (pow x-scale 4))))) (* (pow y-scale 2) (+ (* -2 (* (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))))) (* (pow x-scale 2) (+ (* (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 (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))))) (* (pow x-scale 2) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 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)))))))))) (pow x-scale 4)))))))) (* (pow y-scale 2) (+ (* 1/2 (* (sqrt (/ 1 (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))))) (* (pow x-scale 2) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 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)))))))))) (pow x-scale 4)))))) (- (* 2 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 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)))))))) 3)))) (* 4 (/ (* (pow a 8) (* (pow b 8) (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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow 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 x-scale 4) (* (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))))) (* (pow x-scale 2) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 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)))))))))) (pow x-scale 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/2 (* (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow 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 x-scale 2) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* -2 (/ (* (pow a 4) (* (pow b 4) (* (- (* 2 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 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)))))))) 3)))) (* 4 (/ (* (pow a 8) (* (pow b 8) (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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow 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 x-scale 4) (* (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))))) (* (pow x-scale 2) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 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)))))))))) (pow x-scale 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)))))) (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))))) (* (pow x-scale 2) (* (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))))) (* (pow x-scale 2) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 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)))))))))) (pow x-scale 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)))))))))))))) (sqrt (/ 1 (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))))) (* (pow x-scale 2) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 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)))))))))) (pow x-scale 4))))))))))))) y-scale) |
(* (/ 1 y-scale) (sqrt (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4)))))) |
(/ (+ (sqrt (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4))))) (* 4 (* (/ (* (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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (pow y-scale 2))) (sqrt (/ 1 (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4))))))))) y-scale) |
(/ (+ (sqrt (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4))))) (+ (* 1/2 (* (/ (- (* -4 (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) (* 16 (/ (* (pow a 8) (* (pow b 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)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) 2))) (* (pow x-scale 4) (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4)))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4)))))))) (* 4 (* (/ (* (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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (pow y-scale 2))) (sqrt (/ 1 (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4)))))))))) y-scale) |
(/ (+ (sqrt (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4))))) (+ (* 1/2 (* (/ (- (* -4 (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) (* 16 (/ (* (pow a 8) (* (pow b 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)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) 2))) (* (pow x-scale 4) (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4)))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4)))))))) (+ (* 1/2 (* (/ (- (* 2 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 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))) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (- (* -4 (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) (* 16 (/ (* (pow a 8) (* (pow b 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)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) 2))) (* (pow x-scale 4) (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4)))))))) (pow y-scale 6)) (sqrt (/ 1 (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4)))))))) (* 4 (* (/ (* (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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (pow y-scale 2))) (sqrt (/ 1 (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4))))))))))) y-scale) |
(* -1 (* (/ 1 y-scale) (sqrt (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4))))))) |
(* -1 (/ (+ (sqrt (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4))))) (* 4 (* (/ (* (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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (pow y-scale 2))) (sqrt (/ 1 (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4))))))))) y-scale)) |
(* -1 (/ (+ (sqrt (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4))))) (+ (* 1/2 (* (/ (- (* -4 (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) (* 16 (/ (* (pow a 8) (* (pow b 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)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) 2))) (* (pow x-scale 4) (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4)))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4)))))))) (* 4 (* (/ (* (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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (pow y-scale 2))) (sqrt (/ 1 (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4)))))))))) y-scale)) |
(* -1 (/ (+ (sqrt (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4))))) (+ (* 1/2 (* (/ (- (* -4 (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) (* 16 (/ (* (pow a 8) (* (pow b 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)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) 2))) (* (pow x-scale 4) (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4)))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4)))))))) (+ (* 1/2 (* (/ (- (* 2 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 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))) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (- (* -4 (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) (* 16 (/ (* (pow a 8) (* (pow b 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)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) 2))) (* (pow x-scale 4) (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4)))))))) (pow y-scale 6)) (sqrt (/ 1 (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4)))))))) (* 4 (* (/ (* (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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (pow y-scale 2))) (sqrt (/ 1 (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4))))))))))) y-scale)) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) |
(* x-scale (+ (* -1/16 (* (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (sqrt (/ 1 (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) |
(* x-scale (+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (* (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 b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 6) (pow (cos (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (pow (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) 2) (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))))) (sqrt (/ 1 (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))) (* -1/16 (* (/ (* y-scale (* (sqrt 8) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (sqrt (/ 1 (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))))) |
(* x-scale (+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* (pow x-scale 2) (+ (* -1/16 (* (/ (* y-scale (* (sqrt 8) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (sqrt (/ 1 (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))) (* (pow x-scale 2) (+ (* -1/8 (* (* y-scale (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 6) (pow (cos (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (pow (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) 2) (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))))) (sqrt (/ 1 (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (* (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 b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 8) (pow (cos (* 1/180 (* angle (PI)))) 8)))) (* 1/4 (/ (pow (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) 2) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* 1/4 (/ (* (+ (* -1/4 (/ (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 6) (pow (cos (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (pow (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) 2) (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))))) (sqrt (/ 1 (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))))))) |
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) |
(+ (* -1/16 (* (/ (* (pow y-scale 3) (* (sqrt 8) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 2) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (sqrt (/ 1 (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) |
(+ (* -1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* -1/4 (/ (* (pow y-scale 6) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (* (pow y-scale 4) (pow (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) 2)) (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))))) (pow x-scale 4)) (sqrt (/ 1 (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (+ (* -1/16 (* (/ (* (pow y-scale 3) (* (sqrt 8) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 2) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (sqrt (/ 1 (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) |
(+ (* -1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* -1/2 (/ (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow y-scale 8) (* (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 8) (pow (sin (* 1/180 (* angle (PI)))) 8)))) (* 1/4 (/ (* (pow y-scale 4) (pow (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* 1/4 (/ (* (pow y-scale 2) (* (+ (* -1/4 (/ (* (pow y-scale 6) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (* (pow y-scale 4) (pow (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) 2)) (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))))) (pow x-scale 6)) (sqrt (/ 1 (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (+ (* -1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* -1/4 (/ (* (pow y-scale 6) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (* (pow y-scale 4) (pow (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) 2)) (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))))) (pow x-scale 4)) (sqrt (/ 1 (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (+ (* -1/16 (* (/ (* (pow y-scale 3) (* (sqrt 8) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 2) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (sqrt (/ 1 (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))) |
(* -1/4 (* (* y-scale (sqrt 8)) (sqrt (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) |
(+ (* -1/4 (* (* y-scale (sqrt 8)) (sqrt (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/16 (* (/ (* (pow y-scale 3) (* (sqrt 8) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 2) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (sqrt (/ 1 (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) |
(+ (* -1/4 (* (* y-scale (sqrt 8)) (sqrt (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (+ (* 1/16 (* (/ (* (pow y-scale 3) (* (sqrt 8) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 2) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (sqrt (/ 1 (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* -1/4 (/ (* (pow y-scale 6) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (* (pow y-scale 4) (pow (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) 2)) (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))))) (pow x-scale 4)) (sqrt (/ 1 (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))) |
(+ (* -1/4 (* (* y-scale (sqrt 8)) (sqrt (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (+ (* 1/16 (* (/ (* (pow y-scale 3) (* (sqrt 8) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 2) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (sqrt (/ 1 (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* -1/2 (/ (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow y-scale 8) (* (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 8) (pow (sin (* 1/180 (* angle (PI)))) 8)))) (* 1/4 (/ (* (pow y-scale 4) (pow (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* 1/4 (/ (* (pow y-scale 2) (* (+ (* -1/4 (/ (* (pow y-scale 6) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (* (pow y-scale 4) (pow (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) 2)) (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))))) (pow x-scale 6)) (sqrt (/ 1 (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* -1/4 (/ (* (pow y-scale 6) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (* (pow y-scale 4) (pow (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) 2)) (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))))) (pow x-scale 4)) (sqrt (/ 1 (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) |
(* y-scale (+ (* -1/16 (* (/ (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (/ 1 (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) |
(* y-scale (+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* (pow y-scale 2) (+ (* -1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (pow (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) 2) (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))))) (sqrt (/ 1 (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (* -1/16 (* (/ (* x-scale (* (sqrt 8) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (/ 1 (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))))) |
(* y-scale (+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* (pow y-scale 2) (+ (* -1/16 (* (/ (* x-scale (* (sqrt 8) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (/ 1 (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (* (pow y-scale 2) (+ (* -1/8 (* (* x-scale (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (pow (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) 2) (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))))) (sqrt (/ 1 (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (* -1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (+ (* -1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 8) (pow (sin (* 1/180 (* angle (PI)))) 8)))) (* 1/4 (/ (pow (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) 2) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* 1/4 (/ (* (+ (* -1/4 (/ (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (pow (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) 2) (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))))) (sqrt (/ 1 (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))))))) |
(* 1/4 (* (* x-scale (sqrt 8)) (sqrt (- (* (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)))))))) |
(+ (* -1/16 (* (/ (* (pow x-scale 3) (* (sqrt 8) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 2) (* (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (sqrt (/ 1 (- (* (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))))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (- (* (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))))))))) |
(+ (* -1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* -1/4 (/ (* (pow x-scale 6) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 6) (pow (cos (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 4) (pow (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) 2)) (* (pow b 4) (* (pow (cos (* 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 b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))))) (pow y-scale 4)) (sqrt (/ 1 (- (* (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))))))))) (+ (* -1/16 (* (/ (* (pow x-scale 3) (* (sqrt 8) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 2) (* (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (sqrt (/ 1 (- (* (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))))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (- (* (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)))))))))) |
(+ (* -1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 8) (* (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 8) (pow (cos (* 1/180 (* angle (PI)))) 8)))) (* 1/4 (/ (* (pow x-scale 4) (pow (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* 1/4 (/ (* (pow x-scale 2) (* (+ (* -1/4 (/ (* (pow x-scale 6) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 6) (pow (cos (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 4) (pow (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) 2)) (* (pow b 4) (* (pow (cos (* 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 b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 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 (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 y-scale 6)) (sqrt (/ 1 (- (* (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))))))))) (+ (* -1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* -1/4 (/ (* (pow x-scale 6) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 6) (pow (cos (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 4) (pow (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) 2)) (* (pow b 4) (* (pow (cos (* 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 b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))))) (pow y-scale 4)) (sqrt (/ 1 (- (* (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))))))))) (+ (* -1/16 (* (/ (* (pow x-scale 3) (* (sqrt 8) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 2) (* (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (sqrt (/ 1 (- (* (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))))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (- (* (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))))))))))) |
(* -1/4 (* (* x-scale (sqrt 8)) (sqrt (- (* (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)))))))) |
(+ (* -1/4 (* (* x-scale (sqrt 8)) (sqrt (- (* (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)))))))) (* 1/16 (* (/ (* (pow x-scale 3) (* (sqrt 8) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 2) (* (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (sqrt (/ 1 (- (* (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)))))))))) |
(+ (* -1/4 (* (* x-scale (sqrt 8)) (sqrt (- (* (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)))))))) (+ (* 1/16 (* (/ (* (pow x-scale 3) (* (sqrt 8) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 2) (* (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (sqrt (/ 1 (- (* (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))))))))) (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* -1/4 (/ (* (pow x-scale 6) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 6) (pow (cos (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 4) (pow (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) 2)) (* (pow b 4) (* (pow (cos (* 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 b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))))) (pow y-scale 4)) (sqrt (/ 1 (- (* (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))))))))))) |
(+ (* -1/4 (* (* x-scale (sqrt 8)) (sqrt (- (* (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)))))))) (+ (* 1/16 (* (/ (* (pow x-scale 3) (* (sqrt 8) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 2) (* (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (sqrt (/ 1 (- (* (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))))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 8) (* (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 8) (pow (cos (* 1/180 (* angle (PI)))) 8)))) (* 1/4 (/ (* (pow x-scale 4) (pow (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* 1/4 (/ (* (pow x-scale 2) (* (+ (* -1/4 (/ (* (pow x-scale 6) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 6) (pow (cos (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 4) (pow (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) 2)) (* (pow b 4) (* (pow (cos (* 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 b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 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 (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 y-scale 6)) (sqrt (/ 1 (- (* (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))))))))) (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* -1/4 (/ (* (pow x-scale 6) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 6) (pow (cos (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 4) (pow (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) 2)) (* (pow b 4) (* (pow (cos (* 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 b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))))) (pow y-scale 4)) (sqrt (/ 1 (- (* (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)))))))))))) |
(* 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 (* (* angle (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (* (pow b 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/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2))))))) |
(* angle (+ (* 1/8 (* (* (pow angle 2) (* x-scale (* y-scale (* (sqrt 8) (- (* (pow b 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) (- (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))) 2)) (pow b 4))))) (pow b 2)))))))) (sqrt (/ 1 (- (* (pow b 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/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (* (pow b 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/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2))))))))) |
(* angle (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (* (pow b 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/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2))))))) (* (pow angle 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (* (pow b 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) (- (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))) 2)) (pow b 4))))) (pow b 2))))))) (sqrt (/ 1 (- (* (pow b 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/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)))))))) (* 1/8 (* (* (pow angle 2) (* x-scale (* y-scale (* (sqrt 8) (- (* (pow b 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 (- (* (pow b 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) (- (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))) 2)) (pow b 4))))) (pow b 2)))) 2) (- (* (pow b 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/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)))))) (* 1/2 (/ (* (pow x-scale 2) (- (+ (* 4 (/ (* (pow b 4) (+ (* 1/2040733440000000 (pow (PI) 6)) (+ (* 1/1224440064000000 (pow (PI) 6)) (+ (* 1/102036672000000 (pow (PI) 6)) (* 1/32400 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (+ (* -1/408146688000000 (/ (pow (PI) 6) (pow x-scale 4))) (+ (* -1/6122200320000000 (/ (pow (PI) 6) (pow x-scale 4))) (* 2 (* (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (- (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2)))))))) (+ (* 1/1020366720000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/612220032000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (pow x-scale 4) (* (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))) (- (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))) 2)) (pow b 4)))))) (pow b 4))))) (pow b 2))))))))) (sqrt (/ 1 (- (* (pow b 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/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)))))))))))) |
(* angle (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (* (pow b 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/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2))))))) (* (pow angle 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (* (pow b 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) (- (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))) 2)) (pow b 4))))) (pow b 2))))))) (sqrt (/ 1 (- (* (pow b 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/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)))))))) (* (pow angle 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (* (pow b 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 (- (* (pow b 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) (- (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))) 2)) (pow b 4))))) (pow b 2)))) 2) (- (* (pow b 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/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)))))) (* 1/2 (/ (* (pow x-scale 2) (- (+ (* 4 (/ (* (pow b 4) (+ (* 1/2040733440000000 (pow (PI) 6)) (+ (* 1/1224440064000000 (pow (PI) 6)) (+ (* 1/102036672000000 (pow (PI) 6)) (* 1/32400 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (+ (* -1/408146688000000 (/ (pow (PI) 6) (pow x-scale 4))) (+ (* -1/6122200320000000 (/ (pow (PI) 6) (pow x-scale 4))) (* 2 (* (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (- (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2)))))))) (+ (* 1/1020366720000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/612220032000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (pow x-scale 4) (* (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))) (- (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))) 2)) (pow b 4)))))) (pow b 4))))) (pow b 2)))))))) (sqrt (/ 1 (- (* (pow b 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/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)))))))) (* 1/8 (* (* (pow angle 2) (* x-scale (* y-scale (* (sqrt 8) (- (* (pow b 2) (+ (* -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 b 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) (- (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))) 2)) (pow b 4))))) (pow b 2)))) (- (* (pow b 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 (- (* (pow b 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) (- (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))) 2)) (pow b 4))))) (pow b 2)))) 2) (- (* (pow b 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/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)))))) (* 1/2 (/ (* (pow x-scale 2) (- (+ (* 4 (/ (* (pow b 4) (+ (* 1/2040733440000000 (pow (PI) 6)) (+ (* 1/1224440064000000 (pow (PI) 6)) (+ (* 1/102036672000000 (pow (PI) 6)) (* 1/32400 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (+ (* -1/408146688000000 (/ (pow (PI) 6) (pow x-scale 4))) (+ (* -1/6122200320000000 (/ (pow (PI) 6) (pow x-scale 4))) (* 2 (* (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (- (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2)))))))) (+ (* 1/1020366720000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/612220032000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (pow x-scale 4) (* (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))) (- (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))) 2)) (pow b 4)))))) (pow b 4))))) (pow b 2)))))) (- (* (pow b 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/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)))))) (* 1/2 (/ (* (pow x-scale 2) (- (+ (* 4 (/ (* (pow b 4) (+ (* -1/32400 (* (pow (PI) 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))) (+ (* -1/3149280000 (* (pow (PI) 4) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (+ (* -1/396718580736000000000 (pow (PI) 8)) (+ (* -1/2777030065152000000000 (pow (PI) 8)) (* 1/32400 (* (pow (PI) 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (+ (* 1/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))))))) (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 (- (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))) 2)) (pow b 4)))) 2)) (pow b 4))) (* 1/2 (/ (* (pow x-scale 4) (* (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))) (- (+ (* 4 (/ (* (pow b 4) (+ (* 1/2040733440000000 (pow (PI) 6)) (+ (* 1/1224440064000000 (pow (PI) 6)) (+ (* 1/102036672000000 (pow (PI) 6)) (* 1/32400 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (+ (* -1/408146688000000 (/ (pow (PI) 6) (pow x-scale 4))) (+ (* -1/6122200320000000 (/ (pow (PI) 6) (pow x-scale 4))) (* 2 (* (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (- (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2)))))))) (+ (* 1/1020366720000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/612220032000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (pow x-scale 4) (* (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))) (- (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))) 2)) (pow b 4)))))) (pow b 4)))))) (pow b 4)))))) (pow b 2))))))))) (sqrt (/ 1 (- (* (pow b 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/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 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 (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (pow (- (/ (pow (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 (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (pow (- (/ (pow (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 (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (pow (- (/ (pow (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 (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (pow (- (/ (pow (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 (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (pow (- (/ (pow (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 (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (pow (- (/ (pow (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 (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (pow (- (/ (pow (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 (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (pow (- (/ (pow (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)))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(* x-scale (* y-scale (sqrt 8))) |
(* x-scale (* y-scale (sqrt 8))) |
(* x-scale (* y-scale (sqrt 8))) |
(* x-scale (* y-scale (sqrt 8))) |
(* x-scale (* y-scale (sqrt 8))) |
(* x-scale (* y-scale (sqrt 8))) |
(* x-scale (* y-scale (sqrt 8))) |
(* x-scale (* y-scale (sqrt 8))) |
(* x-scale (* y-scale (sqrt 8))) |
(* x-scale (* y-scale (sqrt 8))) |
(* x-scale (* y-scale (sqrt 8))) |
(* x-scale (* y-scale (sqrt 8))) |
(* x-scale (* y-scale (sqrt 8))) |
(* x-scale (* y-scale (sqrt 8))) |
(* x-scale (* y-scale (sqrt 8))) |
(* x-scale (* y-scale (sqrt 8))) |
(* x-scale (* y-scale (sqrt 8))) |
(* x-scale (* y-scale (sqrt 8))) |
(* x-scale (* y-scale (sqrt 8))) |
(* x-scale (* y-scale (sqrt 8))) |
(* x-scale (* y-scale (sqrt 8))) |
(* x-scale (* y-scale (sqrt 8))) |
(* x-scale (* y-scale (sqrt 8))) |
(* x-scale (* y-scale (sqrt 8))) |
(* y-scale (sqrt 8)) |
(* y-scale (sqrt 8)) |
(* y-scale (sqrt 8)) |
(* y-scale (sqrt 8)) |
(* y-scale (sqrt 8)) |
(* y-scale (sqrt 8)) |
(* y-scale (sqrt 8)) |
(* y-scale (sqrt 8)) |
(* y-scale (sqrt 8)) |
(* y-scale (sqrt 8)) |
(* y-scale (sqrt 8)) |
(* y-scale (sqrt 8)) |
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) |
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) |
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) |
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) |
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) |
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) |
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) |
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) |
(* -1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) |
(* -1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) |
(* -1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) |
(* -1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) |
(+ (* -1/4 (* (/ (* a (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))))) (* (pow b 2) x-scale)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* a (+ (* -1/4 (* (/ (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))))) (* (pow b 2) x-scale)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* 1/8 (* (* a (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow b 2) (pow x-scale 2))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow b 4) (* (pow x-scale 4) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* a (+ (* -1/4 (* (/ (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))))) (* (pow b 2) x-scale)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* a (+ (* 1/8 (* (* a (* x-scale (* y-scale (* (sqrt 8) (- (* -1/2 (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* (pow b 2) (pow x-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow b 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (+ (* -2 (pow b 3)) (* 2 (pow b 3))) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow b 2) (pow x-scale 2))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow b 4) (* (pow x-scale 4) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (* (pow b 2) (* (pow x-scale 2) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))))) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow b 2) (pow x-scale 2))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow b 4) (* (pow x-scale 4) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))))) |
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) |
(* a (+ (* -1/4 (* (/ (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b))))) (* a x-scale)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) |
(* a (+ (* -1/4 (* (/ (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b))))) (* a x-scale)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (pow x-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) (pow a 2)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) |
(* a (+ (* -1/4 (* (/ (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b))))) (* a x-scale)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/2 (- (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (pow x-scale 2))) (* 4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (+ (* -2 b) (* 2 b)))) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* -1 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -2 b) (* 2 b)) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (pow x-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* (pow x-scale 2) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 3)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (pow x-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) (pow a 2)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) |
(* -1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) |
(* -1 (* a (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* 1/4 (* (/ (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b))))) (* a x-scale)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) |
(* -1 (* a (+ (* -1 (/ (+ (* -1/4 (* (/ (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b))))) x-scale) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (pow x-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) a) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) a)) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) |
(* -1 (* a (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/2 (- (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (pow x-scale 2))) (* 4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (+ (* -2 b) (* 2 b)))) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* -1 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -2 b) (* 2 b)) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (pow x-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* (pow x-scale 2) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) a) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (pow x-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) a)) (* -1/4 (* (/ (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b))))) x-scale) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) a)) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) |
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) |
(+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/2 (- (+ (* -2 (/ (+ (* (pow a 2) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2))) (pow a 2))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow a 2) (pow x-scale 2))))) (* -2 (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow a 2) (pow x-scale 2)))))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))))))))) (* b (sqrt 2)))) (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))) |
(+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow x-scale 2)))) (pow a 2))) (* 4 (/ (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))) (pow a 2)))) (+ (* -2 (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow a 2) (pow x-scale 2)))) (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (- (+ (* -2 (/ (+ (* (pow a 2) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2))) (pow a 2))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow a 2) (pow x-scale 2))))) (* -2 (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow a 2) (pow x-scale 2)))))) (pow a 2))))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/2 (- (+ (* -2 (/ (+ (* (pow a 2) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2))) (pow a 2))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow a 2) (pow x-scale 2))))) (* -2 (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow a 2) (pow x-scale 2)))))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/2 (- (+ (* -2 (/ (+ (* (pow a 2) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2))) (pow a 2))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow a 2) (pow x-scale 2))))) (* -2 (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow a 2) (pow x-scale 2)))))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))))))) (* b (sqrt 2))))))) |
(+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/2 (- (+ (* -2 (/ (+ (* (pow a 2) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2))) (pow a 2))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow a 2) (pow x-scale 2))))) (* -2 (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow a 2) (pow x-scale 2)))))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))))))) (* b (sqrt 2)))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))) (+ (* (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (+ (* (pow a 2) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2)))) (/ (* (pow b 2) (+ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))) (pow x-scale 2))))) (pow a 2))) (* 4 (/ (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- b a) 2)))) (pow x-scale 2))) (/ (* (pow (+ a b) 2) (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- b a) 2))) (pow x-scale 2)))) (pow a 2)))) (+ (* -2 (/ (* (pow b 2) (+ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))) (* (pow a 2) (pow x-scale 2)))) (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (- (+ (* -2 (/ (+ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow x-scale 2)))) (pow a 2))) (* 4 (/ (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))) (pow a 2)))) (+ (* -2 (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow a 2) (pow x-scale 2)))) (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (- (+ (* -2 (/ (+ (* (pow a 2) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2))) (pow a 2))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow a 2) (pow x-scale 2))))) (* -2 (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow a 2) (pow x-scale 2)))))) (pow a 2))))) (pow a 2)) (/ (* (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (- (+ (* -2 (/ (+ (* (pow a 2) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2))) (pow a 2))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow a 2) (pow x-scale 2))))) (* -2 (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow a 2) (pow x-scale 2)))))) (pow a 2)))))) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2)))) (* 1/2 (/ (* (pow x-scale 2) (* (+ (* -1/2 (- (+ (* -2 (/ (+ (* (pow a 2) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2))) (pow a 2))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow a 2) (pow x-scale 2))))) (* -2 (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow a 2) (pow x-scale 2)))))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))))) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow x-scale 2)))) (pow a 2))) (* 4 (/ (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))) (pow a 2)))) (+ (* -2 (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow a 2) (pow x-scale 2)))) (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (- (+ (* -2 (/ (+ (* (pow a 2) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2))) (pow a 2))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow a 2) (pow x-scale 2))))) (* -2 (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow a 2) (pow x-scale 2)))))) (pow a 2))))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/2 (- (+ (* -2 (/ (+ (* (pow a 2) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2))) (pow a 2))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow a 2) (pow x-scale 2))))) (* -2 (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow a 2) (pow x-scale 2)))))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow x-scale 2)))) (pow a 2))) (* 4 (/ (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))) (pow a 2)))) (+ (* -2 (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow a 2) (pow x-scale 2)))) (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (- (+ (* -2 (/ (+ (* (pow a 2) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2))) (pow a 2))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow a 2) (pow x-scale 2))))) (* -2 (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow a 2) (pow x-scale 2)))))) (pow a 2))))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/2 (- (+ (* -2 (/ (+ (* (pow a 2) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2))) (pow a 2))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow a 2) (pow x-scale 2))))) (* -2 (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow a 2) (pow x-scale 2)))))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))))) 2)) (* (pow b 2) (pow (sqrt 2) 2)))))))) (* b (sqrt 2))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) |
(+ (* -1/4 (* (/ (* b (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))))) (* (pow a 2) x-scale)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* b (+ (* -1/4 (* (/ (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))))) (* (pow a 2) x-scale)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* 1/8 (* (* b (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow a 2) (pow x-scale 2))))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))) (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow a 4) (* (pow x-scale 4) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* b (+ (* -1/4 (* (/ (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))))) (* (pow a 2) x-scale)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* b (+ (* 1/8 (* (* b (* x-scale (* y-scale (* (sqrt 8) (- (* -1/2 (- (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* (pow a 2) (pow x-scale 2)))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow a 4) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* -1 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -2 (pow a 3)) (* 2 (pow a 3))) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow a 2) (pow x-scale 2))))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))) (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow a 4) (* (pow x-scale 4) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (* (pow a 2) (* (pow x-scale 2) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))))) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow a 2) (pow x-scale 2))))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))) (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow a 4) (* (pow x-scale 4) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))))) |
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) |
(* b (+ (* -1/4 (* (/ (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a))))) (* b x-scale)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) |
(* b (+ (* -1/4 (* (/ (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a))))) (* b x-scale)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (pow x-scale 2)))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) (pow b 2)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) |
(* b (+ (* -1/4 (* (/ (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a))))) (* b x-scale)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/2 (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (pow x-scale 2))) (* 4 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (+ (* -2 a) (* 2 a)))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (+ (* -2 a) (* 2 a)) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (pow x-scale 2)))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* (pow x-scale 2) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow b 3)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (pow x-scale 2)))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) (pow b 2)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) |
(* -1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) |
(* -1 (* b (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* 1/4 (* (/ (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a))))) (* b x-scale)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) |
(* -1 (* b (+ (* -1 (/ (+ (* -1/4 (* (/ (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a))))) x-scale) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (pow x-scale 2)))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) b) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) b)) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) |
(* -1 (* b (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/2 (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (pow x-scale 2))) (* 4 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (+ (* -2 a) (* 2 a)))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (+ (* -2 a) (* 2 a)) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (pow x-scale 2)))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* (pow x-scale 2) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) b) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (pow x-scale 2)))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) b)) (* -1/4 (* (/ (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a))))) x-scale) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) b)) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) |
(* 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 #s(literal 1/4 binary64) (*.f64 (*.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(* a (* x-scale (* (sqrt 2) (sqrt 8)))) |
(*.f64 (*.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) |
(* a (* x-scale (* (sqrt 2) (sqrt 8)))) |
(*.f64 (*.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) |
(* a (* x-scale (* (sqrt 2) (sqrt 8)))) |
(*.f64 (*.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) |
(* a (* x-scale (* (sqrt 2) (sqrt 8)))) |
(*.f64 (*.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) |
(* a (* x-scale (* (sqrt 2) (sqrt 8)))) |
(*.f64 (*.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) |
(* a (* x-scale (* (sqrt 2) (sqrt 8)))) |
(*.f64 (*.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) |
(* a (* x-scale (* (sqrt 2) (sqrt 8)))) |
(*.f64 (*.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) |
(* a (* x-scale (* (sqrt 2) (sqrt 8)))) |
(*.f64 (*.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) |
(* a (* x-scale (* (sqrt 2) (sqrt 8)))) |
(*.f64 (*.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) |
(* a (* x-scale (* (sqrt 2) (sqrt 8)))) |
(*.f64 (*.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) |
(* a (* x-scale (* (sqrt 2) (sqrt 8)))) |
(*.f64 (*.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) |
(* a (* x-scale (* (sqrt 2) (sqrt 8)))) |
(*.f64 (*.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) |
(* a (* x-scale (* (sqrt 2) (sqrt 8)))) |
(*.f64 (*.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) |
(* a (* x-scale (* (sqrt 2) (sqrt 8)))) |
(*.f64 (*.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) |
(* a (* x-scale (* (sqrt 2) (sqrt 8)))) |
(*.f64 (*.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) |
(* a (* x-scale (* (sqrt 2) (sqrt 8)))) |
(*.f64 (*.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) |
(* a (* x-scale (* (sqrt 2) (sqrt 8)))) |
(*.f64 (*.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) |
(* a (* x-scale (* (sqrt 2) (sqrt 8)))) |
(*.f64 (*.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) |
(* a (* x-scale (* (sqrt 2) (sqrt 8)))) |
(*.f64 (*.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) |
(* a (* x-scale (* (sqrt 2) (sqrt 8)))) |
(*.f64 (*.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) |
(* a (* x-scale (* (sqrt 2) (sqrt 8)))) |
(*.f64 (*.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) |
(* a (* x-scale (* (sqrt 2) (sqrt 8)))) |
(*.f64 (*.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) |
(* a (* x-scale (* (sqrt 2) (sqrt 8)))) |
(*.f64 (*.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) |
(* a (* x-scale (* (sqrt 2) (sqrt 8)))) |
(*.f64 (*.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(/ (* (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 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 a (*.f64 a a)) (*.f64 (*.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 a (*.f64 a a)) (*.f64 (*.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 a (*.f64 a a)) (*.f64 (*.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 a (*.f64 a a)) (*.f64 (*.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 a (*.f64 a a)) (*.f64 (*.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 a (*.f64 a a)) (*.f64 (*.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 a (*.f64 a a)) (*.f64 (*.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 a (*.f64 a a)) (*.f64 (*.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 a (*.f64 a a)) (*.f64 (*.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 a (*.f64 a a)) (*.f64 (*.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 a (*.f64 a a)) (*.f64 (*.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 a (*.f64 a a)) (*.f64 (*.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 a (*.f64 a a)) (*.f64 (*.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 a (*.f64 a a)) (*.f64 (*.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 a (*.f64 a a)) (*.f64 (*.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 a (*.f64 a a)) (*.f64 (*.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 a (*.f64 a a)) (*.f64 (*.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 a (*.f64 a a)) (*.f64 (*.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 a (*.f64 a a)) (*.f64 (*.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 a (*.f64 a a)) (*.f64 (*.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 a (*.f64 a a)) (*.f64 (*.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 a (*.f64 a a)) (*.f64 (*.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 a (*.f64 a a)) (*.f64 (*.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 a (*.f64 a a)) (*.f64 (*.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 a (*.f64 a a)) (*.f64 (*.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 a (*.f64 a a)) (*.f64 (*.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 a (*.f64 a a)) (*.f64 (*.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 a (*.f64 a a)) (*.f64 (*.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 a (*.f64 a a)) (*.f64 (*.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 a (*.f64 a a)) (*.f64 (*.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 a (*.f64 a a)) (*.f64 (*.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 a (*.f64 a a)) (*.f64 (*.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 a (*.f64 a a)) (*.f64 (*.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 a (*.f64 a a)) (*.f64 (*.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 a (*.f64 a a)) (*.f64 (*.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 a (*.f64 a a)) (*.f64 (*.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 a (*.f64 a a)) (*.f64 (*.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 a (*.f64 a a)) (*.f64 (*.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 a (*.f64 a a)) (*.f64 (*.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 a (*.f64 a a)) (*.f64 (*.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 a (*.f64 a a)) (*.f64 (*.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 a (*.f64 a a)) (*.f64 (*.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 a (*.f64 a a)) (*.f64 (*.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 a (*.f64 a a)) (*.f64 (*.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 a (*.f64 a a)) (*.f64 (*.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 a (*.f64 a a)) (*.f64 (*.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 a (*.f64 a a)) (*.f64 (*.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 a (*.f64 a a)) (*.f64 (*.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 a (*.f64 a a)) (*.f64 (*.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 a (*.f64 a a)) (*.f64 (*.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 a (*.f64 a a)) (*.f64 (*.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 a (*.f64 a a)) (*.f64 (*.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 a (*.f64 a a)) (*.f64 (*.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 a (*.f64 a a)) (*.f64 (*.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 a (*.f64 a a)) (*.f64 (*.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 a (*.f64 a a)) (*.f64 (*.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 a (*.f64 a a)) (*.f64 (*.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 a (*.f64 a a)) (*.f64 (*.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 a (*.f64 a a)) (*.f64 (*.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 a (*.f64 a a)) (*.f64 (*.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 a (*.f64 a a)) (*.f64 (*.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 a (*.f64 a a)) (*.f64 (*.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 a (*.f64 a a)) (*.f64 (*.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 a (*.f64 a a)) (*.f64 (*.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 a (*.f64 a a)) (*.f64 (*.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 a (*.f64 a a)) (*.f64 (*.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 a (*.f64 a a)) (*.f64 (*.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 a (*.f64 a a)) (*.f64 (*.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 a (*.f64 a a)) (*.f64 (*.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 a (*.f64 a a)) (*.f64 (*.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 a (*.f64 a a)) (*.f64 (*.f64 b b) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(* (pow a 3) (pow b 2)) |
(*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) |
(* (pow a 3) (pow b 2)) |
(*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) |
(* (pow a 3) (pow b 2)) |
(*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) |
(* (pow a 3) (pow b 2)) |
(*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) |
(* (pow a 3) (pow b 2)) |
(*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) |
(* (pow a 3) (pow b 2)) |
(*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) |
(* (pow a 3) (pow b 2)) |
(*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) |
(* (pow a 3) (pow b 2)) |
(*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) |
(* (pow a 3) (pow b 2)) |
(*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) |
(* (pow a 3) (pow b 2)) |
(*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) |
(* (pow a 3) (pow b 2)) |
(*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) |
(* (pow a 3) (pow b 2)) |
(*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) |
(* (pow a 3) (pow b 2)) |
(*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) |
(* (pow a 3) (pow b 2)) |
(*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) |
(* (pow a 3) (pow b 2)) |
(*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) |
(* (pow a 3) (pow b 2)) |
(*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) |
(* (pow a 3) (pow b 2)) |
(*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) |
(* (pow a 3) (pow b 2)) |
(*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) |
(* (pow a 3) (pow b 2)) |
(*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) |
(* (pow a 3) (pow b 2)) |
(*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) |
(* (pow a 3) (pow b 2)) |
(*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) |
(* (pow a 3) (pow b 2)) |
(*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) |
(* (pow a 3) (pow b 2)) |
(*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) |
(* (pow a 3) (pow b 2)) |
(*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) |
(* (pow a 4) (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))))) |
(*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -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 (pow.f64 b #s(literal 6 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale)))))) |
(* (pow a 4) (+ (* -4 (* (/ (* a (* (pow b 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))))) (* (pow x-scale 4) (pow y-scale 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)))))) (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))))))) |
(*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (*.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #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 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -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 (pow.f64 b #s(literal 6 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))))))) |
(* (pow a 4) (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (+ (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* a (+ (* -4 (* (/ (* (pow b 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* (pow x-scale 4) (pow y-scale 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)))))) (* a (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 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)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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))))))))))) |
(*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -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 (pow.f64 b #s(literal 6 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))))) (*.f64 a (+.f64 (*.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #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 a (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.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 (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 #s(literal 2 binary64) (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 b b) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64)) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 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)))))))))) |
(* (pow a 4) (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (+ (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* a (+ (* -4 (* (/ (* (pow b 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* (pow x-scale 4) (pow y-scale 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)))))) (* a (+ (* -4 (* (/ (* a (* (pow b 4) (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 (pow b 3)) (* 2 (pow b 3))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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))) (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)))))) (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 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)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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)))))))))))) |
(*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -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 (pow.f64 b #s(literal 6 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))))) (*.f64 a (+.f64 (*.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #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 a (+.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a (pow.f64 b #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b #s(literal 0 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/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 b (*.f64 b b)) #s(literal 0 binary64))) (-.f64 (+.f64 (*.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 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 b b) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64)) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 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 x-scale x-scale) (*.f64 y-scale y-scale)) (+.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 (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 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.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 (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 #s(literal 2 binary64) (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 b b) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64)) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 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))))))))))) |
(* (pow a 6) (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (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 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.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))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-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)))))) |
(* (pow a 6) (+ (* -4 (* (/ (* (pow b 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (* a (* (pow x-scale 4) (pow y-scale 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)))))) (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (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 -4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b #s(literal 0 binary64)))) (*.f64 (*.f64 a (pow.f64 x-scale #s(literal 4 binary64))) (pow.f64 y-scale #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 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-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 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.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))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-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))))))) |
(* (pow a 6) (+ (* -4 (* (/ (* (pow b 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (* a (* (pow x-scale 4) (pow y-scale 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)))))) (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (+ (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/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 (/ 1 (pow y-scale 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 x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 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) (* (pow x-scale 2) (pow y-scale 2))))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) (* (pow x-scale 4) (pow y-scale 2)))))))))) |
(*.f64 (pow.f64 a #s(literal 6 binary64)) (+.f64 (*.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b #s(literal 0 binary64)))) (*.f64 (*.f64 a (pow.f64 x-scale #s(literal 4 binary64))) (pow.f64 y-scale #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 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-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 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.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))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-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 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (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 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-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 2 binary64) (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 b b) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 b #s(literal 0 binary64)) (*.f64 b #s(literal 0 binary64))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-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 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 b #s(literal 6 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 a a) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))))))))) |
(* (pow a 6) (+ (* -4 (* (/ (* (pow b 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (* a (* (pow x-scale 4) (pow y-scale 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)))))) (+ (* -4 (* (/ (* (pow b 4) (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 b) (* 2 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 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (* (pow x-scale 2) (* (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)))))))) (* (pow a 3) (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))) (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (+ (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/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 (/ 1 (pow y-scale 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 x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 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) (* (pow x-scale 2) (pow y-scale 2))))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) (* (pow x-scale 4) (pow y-scale 2))))))))))) |
(*.f64 (pow.f64 a #s(literal 6 binary64)) (+.f64 (*.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b #s(literal 0 binary64)))) (*.f64 (*.f64 a (pow.f64 x-scale #s(literal 4 binary64))) (pow.f64 y-scale #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 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-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 -4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b #s(literal 0 binary64))) (-.f64 (+.f64 (*.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 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 b b) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 b #s(literal 0 binary64)) (*.f64 b #s(literal 0 binary64))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-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 x-scale x-scale) (*.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 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale 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 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-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 (*.f64 a a)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (+.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.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))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-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 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (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 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-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 2 binary64) (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 b b) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 b #s(literal 0 binary64)) (*.f64 b #s(literal 0 binary64))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-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 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 b #s(literal 6 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 a a) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale)))))))))) |
(* (pow a 6) (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (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 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.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))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-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)))))) |
(* (pow a 6) (+ (* 4 (* (/ (* (pow b 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (* a (* (pow x-scale 4) (pow y-scale 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)))))) (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (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 4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b #s(literal 0 binary64)))) (*.f64 (*.f64 a (pow.f64 x-scale #s(literal 4 binary64))) (pow.f64 y-scale #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 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-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 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.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))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-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))))))) |
(* (pow a 6) (+ (* -1 (/ (+ (* -4 (* (/ (* (pow b 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (* (pow x-scale 4) (pow y-scale 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)))))) (* -1 (/ (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/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 (/ 1 (pow y-scale 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 x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))))) a))) a)) (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) |
(*.f64 (pow.f64 a #s(literal 6 binary64)) (+.f64 (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #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 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)))))) (neg.f64 (/.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (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 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-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 2 binary64) (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 b b) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 b #s(literal 0 binary64)) (*.f64 b #s(literal 0 binary64))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-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 (pow.f64 b #s(literal 6 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))))) a))) a)) (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.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))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-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))))))) |
(* (pow a 6) (+ (* -1 (/ (+ (* -4 (* (/ (* (pow b 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (* (pow x-scale 4) (pow y-scale 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)))))) (* -1 (/ (+ (* 4 (* (/ (* (pow b 4) (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 b) (* 2 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 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (* (pow x-scale 2) (* (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)))))))) (* a (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))) (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/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 (/ 1 (pow y-scale 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 x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))))) a))) a)) (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) |
(*.f64 (pow.f64 a #s(literal 6 binary64)) (+.f64 (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #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 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)))))) (neg.f64 (/.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b #s(literal 0 binary64))) (-.f64 (+.f64 (*.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 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 b b) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 b #s(literal 0 binary64)) (*.f64 b #s(literal 0 binary64))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-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 x-scale x-scale) (*.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 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale 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 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-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 (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (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 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-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 2 binary64) (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 b b) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 b #s(literal 0 binary64)) (*.f64 b #s(literal 0 binary64))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-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 (pow.f64 b #s(literal 6 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale)))))) a))) a)) (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.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))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-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))))))) |
(+ (* 8 (/ (* (pow a 4) (* (pow b 4) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (/ (pow b 2) (pow x-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (pow b 6)) (* (pow x-scale 4) (pow y-scale 2))))) |
(*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (-.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 a a)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 6 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))))) |
(+ (* 8 (/ (* (pow a 4) (* (pow b 4) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (/ (pow b 2) (pow x-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 8 (/ (* (pow a 4) (pow b 6)) (* (pow x-scale 4) (pow y-scale 2)))) (* (pow angle 2) (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow 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 8 binary64) (+.f64 (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (-.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 a a)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 6 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 angle angle) (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.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 b b)) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 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 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 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.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 x-scale x-scale) (*.f64 y-scale y-scale))))))) |
(+ (* 8 (/ (* (pow a 4) (* (pow b 4) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (/ (pow b 2) (pow x-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 8 (/ (* (pow a 4) (pow b 6)) (* (pow x-scale 4) (pow y-scale 2)))) (* (pow angle 2) (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))))) (* (pow x-scale 4) (pow y-scale 2)))) (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow 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 b 4) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4)))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* -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/2 (/ (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 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 8 binary64) (+.f64 (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (-.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 a a)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 6 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 angle angle) (+.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.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 b b)) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 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 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 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.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 x-scale x-scale) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 angle angle) (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (+.f64 (*.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 a a)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 #s(literal 1/3149280000 binary64) (*.f64 b b)) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (+.f64 (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 b b)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/196830000 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.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 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 (*.f64 #s(literal 1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.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 (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.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 #s(literal 1/4 binary64) (*.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.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 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.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 x-scale x-scale) (*.f64 y-scale y-scale))))))))) |
(+ (* 8 (/ (* (pow a 4) (* (pow b 4) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (/ (pow b 2) (pow x-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 8 (/ (* (pow a 4) (pow b 6)) (* (pow x-scale 4) (pow y-scale 2)))) (* (pow angle 2) (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))))) (* (pow x-scale 4) (pow y-scale 2)))) (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow 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 b 4) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4)))))) (* (pow x-scale 4) (pow y-scale 2)))) (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* -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/2 (/ (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 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)))) (* (pow angle 2) (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* -1/765275040000000 (* (pow b 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow a 2) (pow (PI) 6)))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* -1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow y-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))))) (/ (* (pow (+ a b) 2) (* (+ (* 1/31886460000000 (pow (PI) 6)) (* 1/19131876000000 (pow (PI) 6))) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (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 (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 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)))))))))))))) |
(+.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (-.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 a a)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 6 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 angle angle) (+.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.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 b b)) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 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 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 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.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 x-scale x-scale) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 angle angle) (+.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (+.f64 (*.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 a a)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 #s(literal 1/3149280000 binary64) (*.f64 b b)) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (+.f64 (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 b b)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/196830000 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.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 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 (*.f64 #s(literal 1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.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 (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.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 #s(literal 1/4 binary64) (*.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.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 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.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 x-scale x-scale) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 angle angle) (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (+.f64 (*.f64 (*.f64 #s(literal -1/765275040000000 binary64) (*.f64 b b)) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 (*.f64 #s(literal 1/765275040000000 binary64) (*.f64 a a)) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (+.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 (*.f64 #s(literal 1/765275040000000 binary64) (*.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 (*.f64 #s(literal 2 binary64) (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.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 (/.f64 (*.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.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 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 (*.f64 #s(literal 1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/765275040000000 binary64) (*.f64 b b)) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/765275040000000 binary64) (*.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 (*.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 (+.f64 a b) (+.f64 a b)) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/11957422500000 binary64)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.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/196830000 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.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 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 (*.f64 #s(literal 1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.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 (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.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 #s(literal 1/4 binary64) (*.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.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 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))))))) |
(+ (* 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)))))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 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))) (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-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 8 binary64) (+.f64 (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.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))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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))))) |
(+ (* 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)))))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 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))) (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-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 8 binary64) (+.f64 (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.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))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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))))) |
(+ (* 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)))))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 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))) (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-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 8 binary64) (+.f64 (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.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))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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))))) |
(+ (* 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)))))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 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))) (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-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 8 binary64) (+.f64 (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.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))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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))))) |
(+ (* 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)))))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 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))) (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-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 8 binary64) (+.f64 (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.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))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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))))) |
(+ (* 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)))))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 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))) (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-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 8 binary64) (+.f64 (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.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))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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))))) |
(+ (* 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)))))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 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))) (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-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 8 binary64) (+.f64 (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.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))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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))))) |
(+ (* 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)))))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 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))) (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-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 8 binary64) (+.f64 (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.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))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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))))) |
(* (pow b 4) (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))))) |
(*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 y-scale y-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 (*.f64 (pow.f64 a #s(literal 6 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale)))))) |
(* (pow b 4) (+ (* -4 (* (/ (* (pow a 4) (* b (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))))) (* (pow x-scale 4) (pow y-scale 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)))))) (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))))))) |
(*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (*.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #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 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 y-scale y-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 (*.f64 (pow.f64 a #s(literal 6 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))))))) |
(* (pow b 4) (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (+ (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* b (+ (* -4 (* (/ (* (pow a 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* (pow x-scale 4) (pow y-scale 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)))))) (* b (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 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)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (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 x-scale 2) (pow y-scale 2))))))))))) |
(*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 y-scale y-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 (*.f64 (pow.f64 a #s(literal 6 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))))) (*.f64 b (+.f64 (*.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #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 b (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.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 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64)) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 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 x-scale x-scale) (*.f64 y-scale y-scale)))))))))) |
(* (pow b 4) (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (+ (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* b (+ (* -4 (* (/ (* (pow a 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* (pow x-scale 4) (pow y-scale 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)))))) (* b (+ (* -4 (* (/ (* (pow a 4) (* b (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 (pow a 3)) (* 2 (pow a 3))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* 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) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* 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))) (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)))))) (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 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)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (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 x-scale 2) (pow y-scale 2)))))))))))) |
(*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 y-scale y-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 (*.f64 (pow.f64 a #s(literal 6 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))))) (*.f64 b (+.f64 (*.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #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 b (+.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) b) (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a #s(literal 0 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/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 a (*.f64 a a)) #s(literal 0 binary64))) (-.f64 (+.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64)) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 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 x-scale x-scale) (*.f64 y-scale y-scale)) (+.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 (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 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.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 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64)) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 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 x-scale x-scale) (*.f64 y-scale y-scale))))))))))) |
(* (pow b 6) (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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)))))) |
(*.f64 (pow.f64 b #s(literal 6 binary64)) (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 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) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) |
(* (pow b 6) (+ (* -4 (* (/ (* (pow a 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (* b (* (pow x-scale 4) (pow y-scale 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)))))) (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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))))))) |
(*.f64 (pow.f64 b #s(literal 6 binary64)) (+.f64 (*.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 (*.f64 b (pow.f64 x-scale #s(literal 4 binary64))) (pow.f64 y-scale #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 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 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) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) |
(* (pow b 6) (+ (* -4 (* (/ (* (pow a 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (* b (* (pow x-scale 4) (pow y-scale 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)))))) (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (+ (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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)))) (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/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)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (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) (* (pow x-scale 2) (pow y-scale 2))))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (* (pow x-scale 4) (pow y-scale 2)))))))))) |
(*.f64 (pow.f64 b #s(literal 6 binary64)) (+.f64 (*.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 (*.f64 b (pow.f64 x-scale #s(literal 4 binary64))) (pow.f64 y-scale #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 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 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) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 y-scale y-scale)) (*.f64 #s(literal -1/2 binary64) (*.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 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 a #s(literal 0 binary64)) (*.f64 a #s(literal 0 binary64))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 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 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 a #s(literal 6 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))))))))) |
(* (pow b 6) (+ (* -4 (* (/ (* (pow a 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (* b (* (pow x-scale 4) (pow y-scale 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)))))) (+ (* -4 (* (/ (* (pow a 4) (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 a) (* 2 a)) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (* (pow x-scale 2) (* (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)))))))) (* (pow b 3) (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (+ (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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)))) (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/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)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (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) (* (pow x-scale 2) (pow y-scale 2))))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (* (pow x-scale 4) (pow y-scale 2))))))))))) |
(*.f64 (pow.f64 b #s(literal 6 binary64)) (+.f64 (*.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 (*.f64 b (pow.f64 x-scale #s(literal 4 binary64))) (pow.f64 y-scale #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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a #s(literal 0 binary64))) (-.f64 (+.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 a #s(literal 0 binary64)) (*.f64 a #s(literal 0 binary64))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 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 x-scale x-scale) (*.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 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.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)))))) (*.f64 (*.f64 b (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (+.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 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) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 y-scale y-scale)) (*.f64 #s(literal -1/2 binary64) (*.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 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 a #s(literal 0 binary64)) (*.f64 a #s(literal 0 binary64))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 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 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 a #s(literal 6 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale)))))))))) |
(* (pow b 6) (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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)))))) |
(*.f64 (pow.f64 b #s(literal 6 binary64)) (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 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) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) |
(* (pow b 6) (+ (* 4 (* (/ (* (pow a 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (* b (* (pow x-scale 4) (pow y-scale 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)))))) (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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))))))) |
(*.f64 (pow.f64 b #s(literal 6 binary64)) (+.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 (*.f64 b (pow.f64 x-scale #s(literal 4 binary64))) (pow.f64 y-scale #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 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 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) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) |
(* (pow b 6) (+ (* -1 (/ (+ (* -4 (* (/ (* (pow a 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (* (pow x-scale 4) (pow y-scale 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)))))) (* -1 (/ (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/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)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))))) b))) b)) (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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))))))) |
(*.f64 (pow.f64 b #s(literal 6 binary64)) (+.f64 (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #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)))))) (neg.f64 (/.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 y-scale y-scale)) (*.f64 #s(literal -1/2 binary64) (*.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 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 a #s(literal 0 binary64)) (*.f64 a #s(literal 0 binary64))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 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 (pow.f64 a #s(literal 6 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))))) b))) b)) (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 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) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) |
(* (pow b 6) (+ (* -1 (/ (+ (* -4 (* (/ (* (pow a 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (* (pow x-scale 4) (pow y-scale 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)))))) (* -1 (/ (+ (* 4 (* (/ (* (pow a 4) (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 a) (* 2 a)) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (* (pow x-scale 2) (* (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)))))))) (* b (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/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)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))))) b))) b)) (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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))))))) |
(*.f64 (pow.f64 b #s(literal 6 binary64)) (+.f64 (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #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)))))) (neg.f64 (/.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a #s(literal 0 binary64))) (-.f64 (+.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 a #s(literal 0 binary64)) (*.f64 a #s(literal 0 binary64))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 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 x-scale x-scale) (*.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 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.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)))))) (*.f64 (*.f64 b (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 y-scale y-scale)) (*.f64 #s(literal -1/2 binary64) (*.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 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 a #s(literal 0 binary64)) (*.f64 a #s(literal 0 binary64))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 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 (pow.f64 a #s(literal 6 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale)))))) b))) b)) (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 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) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) |
(/ (+ (* -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)))))))))) (pow y-scale 2))) (* 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)))))))))) (pow y-scale 2)))) (pow x-scale 4)) |
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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 y-scale y-scale)) #s(literal 0 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) |
(/ (+ (* -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)))))))))) (pow y-scale 2))) (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (* (pow x-scale 2) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (pow 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))) (* 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)))))))))) (pow y-scale 2))))) (pow x-scale 4)) |
(/.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 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.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 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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 y-scale y-scale))))) (pow.f64 x-scale #s(literal 4 binary64))) |
(/ (+ (* -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)))))))))) (pow y-scale 2))) (+ (* 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)))))))))) (pow y-scale 2))) (* (pow x-scale 2) (+ (* -4 (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))))) (* (pow y-scale 2) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (pow y-scale 2))))))) (pow x-scale 4)) |
(/.f64 (+.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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 y-scale y-scale)) #s(literal 0 binary64)) (*.f64 (*.f64 x-scale x-scale) (+.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) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 y-scale) (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(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 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 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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))))) (pow.f64 x-scale #s(literal 4 binary64))) |
(/ (+ (* -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)))))))))) (pow y-scale 2))) (+ (* 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)))))))))) (pow y-scale 2))) (* (pow x-scale 2) (+ (* 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (pow y-scale 2))) (* (pow x-scale 2) (+ (* -4 (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))))) (* (pow y-scale 2) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 2 (/ (* (pow a 4) (* (pow b 4) (* (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)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 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)))))))) 3)))))))))) (pow x-scale 4)) |
(/.f64 (+.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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 y-scale y-scale)) #s(literal 0 binary64)) (*.f64 (*.f64 x-scale x-scale) (+.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 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 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) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 y-scale) (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(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 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 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 y-scale) (pow.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(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 x-scale #s(literal 4 binary64))) |
(/ (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (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 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 y-scale y-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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 y-scale y-scale))) (pow.f64 x-scale #s(literal 4 binary64))) |
(/ (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (+ (* -4 (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))) (* 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)))))))))) (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 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 y-scale y-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 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 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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 y-scale y-scale)))) (pow.f64 x-scale #s(literal 4 binary64))) |
(/ (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (+ (* -4 (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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 4) (* (pow b 4) (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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 4) (* (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))) 3))))) (* 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)))))))))) (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 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 y-scale y-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 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 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 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 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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 y-scale y-scale)))) (pow.f64 x-scale #s(literal 4 binary64))) |
(/ (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (+ (* -4 (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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 4) (* (pow b 4) (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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 4) (* (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))) 3))))) (+ (* 4 (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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 x-scale 6) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))) (* 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)))))))))) (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 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 y-scale y-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))) (+.f64 (+.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 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 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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) (*.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 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 #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 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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 y-scale y-scale))))) (pow.f64 x-scale #s(literal 4 binary64))) |
(/ (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (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 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 y-scale y-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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 y-scale y-scale))) (pow.f64 x-scale #s(literal 4 binary64))) |
(/ (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (+ (* -4 (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))) (* 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)))))))))) (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 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 y-scale y-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 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 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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 y-scale y-scale)))) (pow.f64 x-scale #s(literal 4 binary64))) |
(/ (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (+ (* -4 (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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 4) (* (pow b 4) (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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 4) (* (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))) 3))))) (* 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)))))))))) (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 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 y-scale y-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 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 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 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 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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 y-scale y-scale)))) (pow.f64 x-scale #s(literal 4 binary64))) |
(/ (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (+ (* -4 (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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 4) (* (pow b 4) (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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 4) (* (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))) 3))))) (+ (* 4 (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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 x-scale 6) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))) (* 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)))))))))) (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 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 y-scale y-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))) (+.f64 (+.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 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 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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) (*.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 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 #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 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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 y-scale y-scale))))) (pow.f64 x-scale #s(literal 4 binary64))) |
(/ (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))))) (* (pow x-scale 2) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 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)))))))))) (pow x-scale 4)))) (pow y-scale 2)) |
(/.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 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 x-scale x-scale) (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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)))))))))) (pow.f64 x-scale #s(literal 4 binary64)))) (*.f64 y-scale y-scale)) |
(/ (+ (* -4 (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))))) (* (pow x-scale 2) (+ (* (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 a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))))) (* (pow x-scale 2) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 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)))))))))) (pow x-scale 4))))) (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) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 x-scale) (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.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 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 x-scale x-scale) (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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)))))))))) (pow.f64 x-scale #s(literal 4 binary64))))) (*.f64 y-scale y-scale)) |
(/ (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))))) (* (pow x-scale 2) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (+ (* 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)))))))))) (pow x-scale 4))) (* (pow y-scale 2) (+ (* -4 (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))))) (* (pow x-scale 2) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 2 (/ (* (pow a 4) (* (pow b 4) (* (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)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 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)))))))) 3)))))))) (pow y-scale 2)) |
(/.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 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 x-scale x-scale) (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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)))))))))) (pow.f64 x-scale #s(literal 4 binary64)))) (*.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) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 x-scale) (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(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 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 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 x-scale) (pow.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(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 y-scale y-scale)) |
(/ (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))))) (* (pow x-scale 2) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (+ (* 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)))))))))) (pow x-scale 4))) (* (pow y-scale 2) (+ (* -4 (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))))) (* (pow x-scale 2) (+ (* (pow 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 4) (* (pow b 4) (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 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)))))))) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow 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 x-scale 2) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))))))) (pow y-scale 2)) |
(/.f64 (+.f64 (+.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 x-scale x-scale) (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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)))))))))) (pow.f64 x-scale #s(literal 4 binary64)))) (*.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) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 x-scale) (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(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 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 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 x-scale) (pow.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) #s(literal 3 binary64)))) (/.f64 (*.f64 #s(literal 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 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 x-scale x-scale) (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))))))) (*.f64 y-scale y-scale)) |
(/ (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4)))) (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 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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)))))))))) (pow.f64 x-scale #s(literal 4 binary64)))) (*.f64 y-scale y-scale)) |
(/ (+ (* -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))))) (pow x-scale 2))) (+ (* 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)))))))))) (pow x-scale 4))) (* 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (pow y-scale 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 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 8 binary64) (+.f64 (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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))))))))) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (*.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 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 x-scale) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) |
(/ (+ (* -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))))) (pow x-scale 2))) (+ (* -4 (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 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))))))) (+ (* 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)))))))))) (pow x-scale 4))) (* 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (pow y-scale 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 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 (*.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) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 x-scale x-scale) (pow.f64 y-scale #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 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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))))))))) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (*.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 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 x-scale) (*.f64 y-scale y-scale))))))) (*.f64 y-scale y-scale)) |
(/ (+ (* -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))))) (pow x-scale 2))) (+ (* -4 (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 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))))))) (+ (* 2 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))))) (* (pow x-scale 2) (* (pow y-scale 6) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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))))) (+ (* 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)))))))))) (pow x-scale 4))) (* 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (pow y-scale 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 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 (/.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) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 x-scale x-scale) (pow.f64 y-scale #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 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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) (*.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 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 x-scale x-scale) (pow.f64 y-scale #s(literal 6 binary64))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 8 binary64) (+.f64 (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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))))))))) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (*.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 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 x-scale) (*.f64 y-scale y-scale))))))) (*.f64 y-scale y-scale)) |
(/ (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4)))) (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 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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)))))))))) (pow.f64 x-scale #s(literal 4 binary64)))) (*.f64 y-scale y-scale)) |
(/ (+ (* -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))))) (pow x-scale 2))) (+ (* 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)))))))))) (pow x-scale 4))) (* 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (pow y-scale 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 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 8 binary64) (+.f64 (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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))))))))) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (*.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 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 x-scale) (*.f64 y-scale y-scale)))))) (*.f64 y-scale y-scale)) |
(/ (+ (* -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))))) (pow x-scale 2))) (+ (* -4 (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 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))))))) (+ (* 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)))))))))) (pow x-scale 4))) (* 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (pow y-scale 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 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 (*.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) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 x-scale x-scale) (pow.f64 y-scale #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 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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))))))))) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (*.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 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 x-scale) (*.f64 y-scale y-scale))))))) (*.f64 y-scale y-scale)) |
(/ (+ (* -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))))) (pow x-scale 2))) (+ (* -4 (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 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))))))) (+ (* 2 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2))))))) (* (pow x-scale 2) (* (pow y-scale 6) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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))))) (+ (* 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)))))))))) (pow x-scale 4))) (* 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (pow y-scale 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 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 (/.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) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 x-scale x-scale) (pow.f64 y-scale #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 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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) (*.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 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 x-scale x-scale) (pow.f64 y-scale #s(literal 6 binary64))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 8 binary64) (+.f64 (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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))))))))) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (*.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 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 x-scale) (*.f64 y-scale y-scale))))))) (*.f64 y-scale y-scale)) |
(* 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/4 (* (/ (* (pow x-scale 2) (pow y-scale 2)) (pow b 2)) (sqrt (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 b b))) (sqrt.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -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 (pow.f64 b #s(literal 6 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))))))) |
(+ (* -1/2 (* (/ (* a (* (pow b 2) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (* (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (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 x-scale 2) (pow y-scale 2)) (pow b 2)) (sqrt (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))))))))) |
(+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a (*.f64 b b)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -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 (pow.f64 b #s(literal 6 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))))) (+.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/4 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 b b))) (sqrt.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -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 (pow.f64 b #s(literal 6 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale)))))))) |
(+ (* 1/4 (* (/ (* (pow x-scale 2) (pow y-scale 2)) (pow b 2)) (sqrt (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))))))) (* a (+ (* -1/2 (* (/ (* (pow b 2) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (* (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (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/8 (* (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (- (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 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)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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 (/ (* (pow b 8) (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2))) (* (pow x-scale 8) (* (pow y-scale 8) (* (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (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))))))))))) (pow b 2)) (sqrt (/ 1 (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))))))))))) |
(+.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 b b))) (sqrt.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -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 (pow.f64 b #s(literal 6 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))))))) (*.f64 a (+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -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 (pow.f64 b #s(literal 6 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))))) (+.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 a (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (-.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.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 (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 #s(literal 2 binary64) (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 b b) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64)) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 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) (*.f64 (pow.f64 b #s(literal 8 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64)) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 8 binary64)) (*.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -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 (pow.f64 b #s(literal 6 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale)))))) (+.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 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -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 (pow.f64 b #s(literal 6 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale)))))))) (*.f64 b b)))))) |
(+ (* 1/4 (* (/ (* (pow x-scale 2) (pow y-scale 2)) (pow b 2)) (sqrt (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))))))) (* a (+ (* -1/2 (* (/ (* (pow b 2) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (* (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (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))))))) (* a (+ (* 1/8 (* (/ (* a (* (pow x-scale 2) (* (pow y-scale 2) (- (* -4 (* (/ (* (pow b 4) (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 (pow b 3)) (* 2 (pow b 3))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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))) (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)))))) (* -2 (* (/ (* (pow b 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 (pow b 3)) (* 2 (pow b 3))) (- (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 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)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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 (/ (* (pow b 8) (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2))) (* (pow x-scale 8) (* (pow y-scale 8) (* (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (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))))))))))) (* (pow x-scale 4) (* (pow y-scale 4) (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (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)))))))))) (pow b 2)) (sqrt (/ 1 (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))))))))) (* 1/8 (* (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 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)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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 (/ (* (pow b 8) (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2))) (* (pow x-scale 8) (* (pow y-scale 8) (* (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (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)))))))))) (pow b 2)) (sqrt (/ 1 (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))))))))))))) |
(+.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 b b))) (sqrt.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -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 (pow.f64 b #s(literal 6 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))))))) (*.f64 a (+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -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 (pow.f64 b #s(literal 6 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))))) (+.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 a (*.f64 #s(literal 1/8 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (+.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b #s(literal 0 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/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 b (*.f64 b b)) #s(literal 0 binary64))) (-.f64 (+.f64 (*.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 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 b b) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64)) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 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 x-scale x-scale) (*.f64 y-scale y-scale)) (+.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 (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 2 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64))) (-.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.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 (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 #s(literal 2 binary64) (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 b b) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64)) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 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) (*.f64 (pow.f64 b #s(literal 8 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64)) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 8 binary64)) (*.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -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 (pow.f64 b #s(literal 6 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale)))))) (+.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 (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 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -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 (pow.f64 b #s(literal 6 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -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 (pow.f64 b #s(literal 6 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale)))))))) (*.f64 b b)) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (-.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.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 (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 #s(literal 2 binary64) (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 b b) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64)) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 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) (*.f64 (pow.f64 b #s(literal 8 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64)) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 8 binary64)) (*.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -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 (pow.f64 b #s(literal 6 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale)))))) (+.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 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -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 (pow.f64 b #s(literal 6 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale)))))))) (*.f64 b b)))))))) |
(* 1/4 (* (/ (* a (* (pow x-scale 2) (pow y-scale 2))) (pow b 2)) (sqrt (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 a (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) (*.f64 b b))) (sqrt.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.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))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-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))))))) |
(* a (+ (* -1/2 (* (/ (* (pow b 2) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (* a (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (* (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (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 x-scale 2) (pow y-scale 2)) (pow b 2)) (sqrt (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))))))) |
(*.f64 a (+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b #s(literal 0 binary64)))) (*.f64 (*.f64 a (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.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))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-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/4 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 b b))) (sqrt.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.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))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-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))))))))) |
(* a (+ (* -1/2 (* (/ (* (pow b 2) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (* a (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (* (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (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/8 (* (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/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 (/ 1 (pow y-scale 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 x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))))) (* 4 (/ (* (pow b 8) (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 8) (* (pow y-scale 8) (* (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (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)))))))))) (* (pow a 2) (pow b 2))) (sqrt (/ 1 (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 1/4 (* (/ (* (pow x-scale 2) (pow y-scale 2)) (pow b 2)) (sqrt (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))))))) |
(*.f64 a (+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b #s(literal 0 binary64)))) (*.f64 (*.f64 a (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.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))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-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/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (-.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (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 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-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 2 binary64) (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 b b) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 b #s(literal 0 binary64)) (*.f64 b #s(literal 0 binary64))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-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 (pow.f64 b #s(literal 6 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 b #s(literal 8 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 b #s(literal 0 binary64)) (*.f64 b #s(literal 0 binary64)))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 8 binary64)) (pow.f64 y-scale #s(literal 8 binary64))) (*.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.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))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale 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 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.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))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-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 a a) (*.f64 b b)))) (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 b b))) (sqrt.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.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))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-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)))))))))) |
(* a (+ (* -1/2 (* (/ (* (pow b 2) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (* a (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (* (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (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/8 (* (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* -4 (* (/ (* (pow b 4) (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 b) (* 2 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 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (* (pow x-scale 2) (* (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)))))))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 b 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 b) (* 2 b)) (- (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/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 (/ 1 (pow y-scale 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 x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))))) (* 4 (/ (* (pow b 8) (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 8) (* (pow y-scale 8) (* (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (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))))))))))) (* (pow x-scale 4) (* (pow y-scale 4) (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 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 3) (pow b 2))) (sqrt (/ 1 (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (+ (* 1/8 (* (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/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 (/ 1 (pow y-scale 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 x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))))) (* 4 (/ (* (pow b 8) (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 8) (* (pow y-scale 8) (* (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (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)))))))))) (* (pow a 2) (pow b 2))) (sqrt (/ 1 (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 1/4 (* (/ (* (pow x-scale 2) (pow y-scale 2)) (pow b 2)) (sqrt (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))))))))) |
(*.f64 a (+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b #s(literal 0 binary64)))) (*.f64 (*.f64 a (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.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))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-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/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (+.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b #s(literal 0 binary64))) (-.f64 (+.f64 (*.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 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 b b) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 b #s(literal 0 binary64)) (*.f64 b #s(literal 0 binary64))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-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 x-scale x-scale) (*.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 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale 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 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-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 2 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b #s(literal 0 binary64))) (-.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (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 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-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 2 binary64) (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 b b) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 b #s(literal 0 binary64)) (*.f64 b #s(literal 0 binary64))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-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 (pow.f64 b #s(literal 6 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 b #s(literal 8 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 b #s(literal 0 binary64)) (*.f64 b #s(literal 0 binary64)))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 8 binary64)) (pow.f64 y-scale #s(literal 8 binary64))) (*.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.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))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale 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 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-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 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.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))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-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)))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.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))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-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 a (*.f64 a a)) (*.f64 b b)))) (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (-.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (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 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-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 2 binary64) (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 b b) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 b #s(literal 0 binary64)) (*.f64 b #s(literal 0 binary64))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-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 (pow.f64 b #s(literal 6 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 b #s(literal 8 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 b #s(literal 0 binary64)) (*.f64 b #s(literal 0 binary64)))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 8 binary64)) (pow.f64 y-scale #s(literal 8 binary64))) (*.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.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))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale 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 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.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))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-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 a a) (*.f64 b b)))) (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 b b))) (sqrt.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.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))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-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))))))))))) |
(* -1/4 (* (/ (* a (* (pow x-scale 2) (pow y-scale 2))) (pow b 2)) (sqrt (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))))) |
(*.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 a (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) (*.f64 b b))) (sqrt.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.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))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-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))))))) |
(* -1 (* a (+ (* 1/4 (* (/ (* (pow x-scale 2) (pow y-scale 2)) (pow b 2)) (sqrt (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (* (/ (* (pow b 2) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (* a (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (* (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (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)))))))))) |
(*.f64 (*.f64 #s(literal -1 binary64) a) (+.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 b b))) (sqrt.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.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))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-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 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b #s(literal 0 binary64)))) (*.f64 (*.f64 a (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.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))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale 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 (/ (+ (* -1/2 (* (/ (* (pow b 2) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (* (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (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/8 (* (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/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 (/ 1 (pow y-scale 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 x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))))) (* 4 (/ (* (pow b 8) (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 8) (* (pow y-scale 8) (* (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (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)))))))))) (* a (pow b 2))) (sqrt (/ 1 (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))))))) a)) (* 1/4 (* (/ (* (pow x-scale 2) (pow y-scale 2)) (pow b 2)) (sqrt (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))))))) |
(*.f64 (*.f64 #s(literal -1 binary64) a) (+.f64 (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b #s(literal 0 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.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))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (-.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (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 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-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 2 binary64) (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 b b) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 b #s(literal 0 binary64)) (*.f64 b #s(literal 0 binary64))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-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 (pow.f64 b #s(literal 6 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 b #s(literal 8 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 b #s(literal 0 binary64)) (*.f64 b #s(literal 0 binary64)))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 8 binary64)) (pow.f64 y-scale #s(literal 8 binary64))) (*.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.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))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale 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 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.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))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-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 a (*.f64 b b))))) a)) (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 b b))) (sqrt.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.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))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-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))))))))) |
(* -1 (* a (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (* (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* -4 (* (/ (* (pow b 4) (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 b) (* 2 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 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (* (pow x-scale 2) (* (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)))))))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 b 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 b) (* 2 b)) (- (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/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 (/ 1 (pow y-scale 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 x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))))) (* 4 (/ (* (pow b 8) (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 8) (* (pow y-scale 8) (* (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (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))))))))))) (* (pow x-scale 4) (* (pow y-scale 4) (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (* a (pow b 2))) (sqrt (/ 1 (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 1/8 (* (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/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 (/ 1 (pow y-scale 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 x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))))) (* 4 (/ (* (pow b 8) (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 8) (* (pow y-scale 8) (* (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (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)))))))))) (pow b 2)) (sqrt (/ 1 (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))))))) a)) (* -1/2 (* (/ (* (pow b 2) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (* (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (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)))))))) a)) (* 1/4 (* (/ (* (pow x-scale 2) (pow y-scale 2)) (pow b 2)) (sqrt (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))))))) |
(*.f64 (*.f64 #s(literal -1 binary64) a) (+.f64 (/.f64 (*.f64 #s(literal -1 binary64) (+.f64 (/.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (+.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b #s(literal 0 binary64))) (-.f64 (+.f64 (*.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 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 b b) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 b #s(literal 0 binary64)) (*.f64 b #s(literal 0 binary64))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-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 x-scale x-scale) (*.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 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale 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 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-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 2 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b #s(literal 0 binary64))) (-.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (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 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-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 2 binary64) (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 b b) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 b #s(literal 0 binary64)) (*.f64 b #s(literal 0 binary64))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-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 (pow.f64 b #s(literal 6 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 b #s(literal 8 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 b #s(literal 0 binary64)) (*.f64 b #s(literal 0 binary64)))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 8 binary64)) (pow.f64 y-scale #s(literal 8 binary64))) (*.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.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))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale 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 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-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 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.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))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-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)))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.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))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-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 a (*.f64 b b)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (-.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (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 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-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 2 binary64) (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 b b) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 b #s(literal 0 binary64)) (*.f64 b #s(literal 0 binary64))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-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 (pow.f64 b #s(literal 6 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 b #s(literal 8 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 b #s(literal 0 binary64)) (*.f64 b #s(literal 0 binary64)))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 8 binary64)) (pow.f64 y-scale #s(literal 8 binary64))) (*.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.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))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale 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 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.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))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-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 b b))))) a) (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b #s(literal 0 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.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))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale 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) (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 b b))) (sqrt.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.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))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-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))))))))) |
(* 1/4 (* (/ (* (pow x-scale 2) (pow y-scale 2)) (* (pow a 2) (pow b 2))) (sqrt (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (/ (pow b 2) (pow x-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (pow b 6)) (* (pow x-scale 4) (pow y-scale 2)))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (*.f64 a a) (*.f64 b b)))) (sqrt.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (-.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 a a)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 6 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))))))) |
(+ (* 1/8 (* (/ (* (pow angle 2) (* (pow x-scale 2) (* (pow y-scale 2) (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow 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 a 2) (pow b 2))) (sqrt (/ 1 (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (/ (pow b 2) (pow x-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (pow b 6)) (* (pow x-scale 4) (pow y-scale 2))))))))) (* 1/4 (* (/ (* (pow x-scale 2) (pow y-scale 2)) (* (pow a 2) (pow b 2))) (sqrt (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (/ (pow b 2) (pow x-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (pow b 6)) (* (pow x-scale 4) (pow y-scale 2))))))))) |
(+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 angle angle) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.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 b b)) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 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 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 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.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 x-scale x-scale) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (-.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 a a)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 6 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale)))))))) (*.f64 (*.f64 a a) (*.f64 b b)))) (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (*.f64 a a) (*.f64 b b)))) (sqrt.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (-.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 a a)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 6 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale)))))))) |
(+ (* 1/4 (* (/ (* (pow x-scale 2) (pow y-scale 2)) (* (pow a 2) (pow b 2))) (sqrt (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (/ (pow b 2) (pow x-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (pow b 6)) (* (pow x-scale 4) (pow y-scale 2)))))))) (* (pow angle 2) (+ (* 1/8 (* (/ (* (pow angle 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4)))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* -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/2 (/ (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 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))))) (* 1/4 (/ (pow (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow 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))))) 2) (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (/ (pow b 2) (pow x-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (pow b 6)) (* (pow x-scale 4) (pow y-scale 2))))))))))) (* (pow a 2) (pow b 2))) (sqrt (/ 1 (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (/ (pow b 2) (pow x-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (pow b 6)) (* (pow x-scale 4) (pow y-scale 2))))))))) (* 1/8 (* (/ (* (pow x-scale 2) (* (pow y-scale 2) (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow 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 a 2) (pow b 2))) (sqrt (/ 1 (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (/ (pow b 2) (pow x-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (pow b 6)) (* (pow x-scale 4) (pow y-scale 2)))))))))))) |
(+.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (*.f64 a a) (*.f64 b b)))) (sqrt.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (-.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 a a)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 6 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 angle angle) (*.f64 #s(literal 1/8 binary64) (+.f64 (/.f64 (*.f64 (*.f64 (*.f64 angle angle) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (+.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (+.f64 (*.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 a a)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 #s(literal 1/3149280000 binary64) (*.f64 b b)) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (+.f64 (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 b b)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/196830000 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.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 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 (*.f64 #s(literal 1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.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 (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.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 #s(literal 1/4 binary64) (*.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.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 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.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 x-scale x-scale) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.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 b b)) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 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 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 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.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 x-scale x-scale) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)) (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (-.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 a a)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 6 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale)))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (-.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 a a)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 6 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale)))))))) (*.f64 (*.f64 a a) (*.f64 b b))) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.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 b b)) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 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 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 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.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 x-scale x-scale) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (-.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 a a)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 6 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale)))))))) (*.f64 (*.f64 a a) (*.f64 b b))))))) |
(+ (* 1/4 (* (/ (* (pow x-scale 2) (pow y-scale 2)) (* (pow a 2) (pow b 2))) (sqrt (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (/ (pow b 2) (pow x-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (pow b 6)) (* (pow x-scale 4) (pow y-scale 2)))))))) (* (pow angle 2) (+ (* 1/8 (* (/ (* (pow x-scale 2) (* (pow y-scale 2) (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow 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 a 2) (pow b 2))) (sqrt (/ 1 (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (/ (pow b 2) (pow x-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (pow b 6)) (* (pow x-scale 4) (pow y-scale 2))))))))) (* (pow angle 2) (+ (* 1/8 (* (/ (* (pow angle 2) (* (pow x-scale 2) (* (pow y-scale 2) (- (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* -1/765275040000000 (* (pow b 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow a 2) (pow (PI) 6)))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* -1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow y-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))))) (/ (* (pow (+ a b) 2) (* (+ (* 1/31886460000000 (pow (PI) 6)) (* 1/19131876000000 (pow (PI) 6))) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (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 (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 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))))) (* 1/2 (/ (* (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow 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))))) (- (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4)))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* -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/2 (/ (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 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))))) (* 1/4 (/ (pow (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow 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))))) 2) (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (/ (pow b 2) (pow x-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (pow b 6)) (* (pow x-scale 4) (pow y-scale 2))))))))) (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (/ (pow b 2) (pow x-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (pow b 6)) (* (pow x-scale 4) (pow y-scale 2))))))))))) (* (pow a 2) (pow b 2))) (sqrt (/ 1 (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (/ (pow b 2) (pow x-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (pow b 6)) (* (pow x-scale 4) (pow y-scale 2))))))))) (* 1/8 (* (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4)))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* -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/2 (/ (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 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))))) (* 1/4 (/ (pow (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow 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))))) 2) (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (/ (pow b 2) (pow x-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (pow b 6)) (* (pow x-scale 4) (pow y-scale 2)))))))))) (* (pow a 2) (pow b 2))) (sqrt (/ 1 (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (/ (pow b 2) (pow x-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (pow b 6)) (* (pow x-scale 4) (pow y-scale 2)))))))))))))) |
(+.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (*.f64 a a) (*.f64 b b)))) (sqrt.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (-.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 a a)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 6 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 angle angle) (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.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 b b)) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 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 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 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.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 x-scale x-scale) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (-.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 a a)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 6 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale)))))))) (*.f64 (*.f64 a a) (*.f64 b b)))) (*.f64 (*.f64 angle angle) (*.f64 #s(literal 1/8 binary64) (+.f64 (/.f64 (*.f64 (*.f64 (*.f64 angle angle) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (+.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (+.f64 (*.f64 (*.f64 #s(literal -1/765275040000000 binary64) (*.f64 b b)) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 (*.f64 #s(literal 1/765275040000000 binary64) (*.f64 a a)) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (+.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 (*.f64 #s(literal 1/765275040000000 binary64) (*.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 (*.f64 #s(literal 2 binary64) (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.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 (/.f64 (*.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.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 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 (*.f64 #s(literal 1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/765275040000000 binary64) (*.f64 b b)) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/765275040000000 binary64) (*.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 (*.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 (+.f64 a b) (+.f64 a b)) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/11957422500000 binary64)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.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/196830000 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.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 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 (*.f64 #s(literal 1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.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 (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.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 #s(literal 1/4 binary64) (*.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.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 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.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 b b)) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 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 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 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.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 x-scale x-scale) (*.f64 y-scale y-scale))))) (+.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (+.f64 (*.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 a a)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 #s(literal 1/3149280000 binary64) (*.f64 b b)) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (+.f64 (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 b b)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/196830000 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.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 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 (*.f64 #s(literal 1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.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 (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.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 #s(literal 1/4 binary64) (*.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.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 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.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 x-scale x-scale) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.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 b b)) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 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 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 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.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 x-scale x-scale) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)) (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (-.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 a a)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 6 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))))))))) (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (-.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 a a)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 6 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale)))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (-.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 a a)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 6 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale)))))))) (*.f64 (*.f64 a a) (*.f64 b b))) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (+.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (+.f64 (*.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 a a)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 #s(literal 1/3149280000 binary64) (*.f64 b b)) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (+.f64 (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 b b)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/196830000 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.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 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 (*.f64 #s(literal 1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.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 (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.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 #s(literal 1/4 binary64) (*.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.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 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.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 x-scale x-scale) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.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 b b)) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 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 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 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.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 x-scale x-scale) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)) (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (-.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 a a)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 6 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (-.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 a a)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 6 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale)))))))) (*.f64 (*.f64 a a) (*.f64 b b))))))))) |
(* 1/4 (* (/ (* (pow x-scale 2) (pow y-scale 2)) (* (pow a 2) (pow b 2))) (sqrt (+ (* 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)))))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 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))) (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-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 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (*.f64 a a) (*.f64 b b)))) (sqrt.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.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))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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/4 (* (/ (* (pow x-scale 2) (pow y-scale 2)) (* (pow a 2) (pow b 2))) (sqrt (+ (* 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)))))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 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))) (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-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 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (*.f64 a a) (*.f64 b b)))) (sqrt.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.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))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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/4 (* (/ (* (pow x-scale 2) (pow y-scale 2)) (* (pow a 2) (pow b 2))) (sqrt (+ (* 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)))))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 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))) (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-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 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (*.f64 a a) (*.f64 b b)))) (sqrt.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.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))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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/4 (* (/ (* (pow x-scale 2) (pow y-scale 2)) (* (pow a 2) (pow b 2))) (sqrt (+ (* 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)))))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 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))) (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-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 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (*.f64 a a) (*.f64 b b)))) (sqrt.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.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))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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/4 (* (/ (* (pow x-scale 2) (pow y-scale 2)) (* (pow a 2) (pow b 2))) (sqrt (+ (* 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)))))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 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))) (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-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 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (*.f64 a a) (*.f64 b b)))) (sqrt.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.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))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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/4 (* (/ (* (pow x-scale 2) (pow y-scale 2)) (* (pow a 2) (pow b 2))) (sqrt (+ (* 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)))))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 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))) (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-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 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (*.f64 a a) (*.f64 b b)))) (sqrt.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.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))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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/4 (* (/ (* (pow x-scale 2) (pow y-scale 2)) (* (pow a 2) (pow b 2))) (sqrt (+ (* 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)))))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 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))) (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-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 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (*.f64 a a) (*.f64 b b)))) (sqrt.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.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))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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/4 (* (/ (* (pow x-scale 2) (pow y-scale 2)) (* (pow a 2) (pow b 2))) (sqrt (+ (* 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)))))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 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))) (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-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 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 (*.f64 a a) (*.f64 b b)))) (sqrt.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.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))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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/4 (* (/ (* (pow x-scale 2) (pow y-scale 2)) (pow a 2)) (sqrt (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 a a))) (sqrt.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 y-scale y-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 (*.f64 (pow.f64 a #s(literal 6 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))))))) |
(+ (* -1/2 (* (/ (* (pow a 2) (* b (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (* (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (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 x-scale 2) (pow y-scale 2)) (pow a 2)) (sqrt (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))))))))) |
(+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 y-scale y-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 (*.f64 (pow.f64 a #s(literal 6 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))))) (+.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/4 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 a a))) (sqrt.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 y-scale y-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 (*.f64 (pow.f64 a #s(literal 6 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale)))))))) |
(+ (* 1/4 (* (/ (* (pow x-scale 2) (pow y-scale 2)) (pow a 2)) (sqrt (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))))))) (* b (+ (* -1/2 (* (/ (* (pow a 2) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (* (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (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/8 (* (/ (* b (* (pow x-scale 2) (* (pow y-scale 2) (- (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 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)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (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 x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow a 8) (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2))) (* (pow x-scale 8) (* (pow y-scale 8) (* (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (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))))))))))) (pow a 2)) (sqrt (/ 1 (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))))))))))) |
(+.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 a a))) (sqrt.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 y-scale y-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 (*.f64 (pow.f64 a #s(literal 6 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))))))) (*.f64 b (+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 y-scale y-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 (*.f64 (pow.f64 a #s(literal 6 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))))) (+.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 b (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (+.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.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 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64)) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 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 x-scale x-scale) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 8 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64)) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 8 binary64)) (pow.f64 y-scale #s(literal 8 binary64))) (*.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 y-scale y-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 (*.f64 (pow.f64 a #s(literal 6 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))))) (+.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 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 y-scale y-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 (*.f64 (pow.f64 a #s(literal 6 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale)))))))) (*.f64 a a)))))) |
(+ (* 1/4 (* (/ (* (pow x-scale 2) (pow y-scale 2)) (pow a 2)) (sqrt (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))))))) (* b (+ (* -1/2 (* (/ (* (pow a 2) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (* (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (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))))))) (* b (+ (* 1/8 (* (/ (* b (* (pow x-scale 2) (* (pow y-scale 2) (- (* -4 (* (/ (* (pow a 4) (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 (pow a 3)) (* 2 (pow a 3))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* 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) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* 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))) (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)))))) (* -2 (* (/ (* (pow a 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 (pow a 3)) (* 2 (pow a 3))) (- (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 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)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (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 x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow a 8) (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2))) (* (pow x-scale 8) (* (pow y-scale 8) (* (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (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))))))))))) (* (pow x-scale 4) (* (pow y-scale 4) (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (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)))))))))) (pow a 2)) (sqrt (/ 1 (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))))))))) (* 1/8 (* (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 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)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (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 x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow a 8) (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2))) (* (pow x-scale 8) (* (pow y-scale 8) (* (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (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)))))))))) (pow a 2)) (sqrt (/ 1 (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))))))))))))) |
(+.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 a a))) (sqrt.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 y-scale y-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 (*.f64 (pow.f64 a #s(literal 6 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))))))) (*.f64 b (+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 y-scale y-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 (*.f64 (pow.f64 a #s(literal 6 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))))) (+.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 b (*.f64 #s(literal 1/8 binary64) (+.f64 (/.f64 (*.f64 (*.f64 b (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (+.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a #s(literal 0 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/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 a (*.f64 a a)) #s(literal 0 binary64))) (-.f64 (+.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64)) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 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 x-scale x-scale) (*.f64 y-scale y-scale)) (+.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 (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 2 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64))) (+.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.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 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64)) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 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 x-scale x-scale) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 8 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64)) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 8 binary64)) (pow.f64 y-scale #s(literal 8 binary64))) (*.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 y-scale y-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 (*.f64 (pow.f64 a #s(literal 6 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))))) (+.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 (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 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 y-scale y-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 (*.f64 (pow.f64 a #s(literal 6 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 y-scale y-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 (*.f64 (pow.f64 a #s(literal 6 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale)))))))) (*.f64 a a)) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (+.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.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 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64)) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 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 x-scale x-scale) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 8 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64)) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 8 binary64)) (pow.f64 y-scale #s(literal 8 binary64))) (*.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 y-scale y-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 (*.f64 (pow.f64 a #s(literal 6 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))))) (+.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 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 y-scale y-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 (*.f64 (pow.f64 a #s(literal 6 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale)))))))) (*.f64 a a)))))))) |
(* 1/4 (* (/ (* b (* (pow x-scale 2) (pow y-scale 2))) (pow a 2)) (sqrt (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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)))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 b (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) (*.f64 a a))) (sqrt.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 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) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) |
(* b (+ (* -1/2 (* (/ (* (pow a 2) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (* b (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (* (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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))))) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (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 x-scale 2) (pow y-scale 2)) (pow a 2)) (sqrt (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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)))))))))) |
(*.f64 b (+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 (*.f64 b (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 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) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 x-scale x-scale) (*.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 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 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/4 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 a a))) (sqrt.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 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) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))))) |
(* b (+ (* -1/2 (* (/ (* (pow a 2) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (* b (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (* (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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))))) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) (+ (* 1/8 (* (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/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)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))))) (* 4 (/ (* (pow a 8) (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 8) (* (pow y-scale 8) (* (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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))))) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (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) (pow b 2))) (sqrt (/ 1 (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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))))))))) (* 1/4 (* (/ (* (pow x-scale 2) (pow y-scale 2)) (pow a 2)) (sqrt (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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))))))))))) |
(*.f64 b (+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 (*.f64 b (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 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) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 x-scale x-scale) (*.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 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 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/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (-.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 y-scale y-scale)) (*.f64 #s(literal -1/2 binary64) (*.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 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 a #s(literal 0 binary64)) (*.f64 a #s(literal 0 binary64))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 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 (pow.f64 a #s(literal 6 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 a #s(literal 8 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 a #s(literal 0 binary64)) (*.f64 a #s(literal 0 binary64)))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 8 binary64)) (pow.f64 y-scale #s(literal 8 binary64))) (*.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 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) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 x-scale x-scale) (*.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 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.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 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 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) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))) (*.f64 (*.f64 a a) (*.f64 b b)))) (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 a a))) (sqrt.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 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) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))))) |
(* b (+ (* -1/2 (* (/ (* (pow a 2) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (* b (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (* (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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))))) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) (+ (* 1/8 (* (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* -4 (* (/ (* (pow a 4) (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 a) (* 2 a)) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (* (pow x-scale 2) (* (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)))))))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 a 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 a) (* 2 a)) (- (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/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)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))))) (* 4 (/ (* (pow a 8) (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 8) (* (pow y-scale 8) (* (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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))))) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))))) (* (pow x-scale 4) (* (pow y-scale 4) (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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)))))))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (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) (pow b 3))) (sqrt (/ 1 (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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))))))))) (+ (* 1/8 (* (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/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)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))))) (* 4 (/ (* (pow a 8) (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 8) (* (pow y-scale 8) (* (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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))))) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (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) (pow b 2))) (sqrt (/ 1 (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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))))))))) (* 1/4 (* (/ (* (pow x-scale 2) (pow y-scale 2)) (pow a 2)) (sqrt (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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)))))))))))) |
(*.f64 b (+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 (*.f64 b (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 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) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 x-scale x-scale) (*.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 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 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/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (+.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a #s(literal 0 binary64))) (-.f64 (+.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 a #s(literal 0 binary64)) (*.f64 a #s(literal 0 binary64))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 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 x-scale x-scale) (*.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 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.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)))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a #s(literal 0 binary64))) (-.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 y-scale y-scale)) (*.f64 #s(literal -1/2 binary64) (*.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 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 a #s(literal 0 binary64)) (*.f64 a #s(literal 0 binary64))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 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 (pow.f64 a #s(literal 6 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 a #s(literal 8 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 a #s(literal 0 binary64)) (*.f64 a #s(literal 0 binary64)))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 8 binary64)) (pow.f64 y-scale #s(literal 8 binary64))) (*.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 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) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 x-scale x-scale) (*.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 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.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)))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 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) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 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) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))) (*.f64 (*.f64 a a) (*.f64 b (*.f64 b b))))) (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (-.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 y-scale y-scale)) (*.f64 #s(literal -1/2 binary64) (*.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 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 a #s(literal 0 binary64)) (*.f64 a #s(literal 0 binary64))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 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 (pow.f64 a #s(literal 6 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 a #s(literal 8 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 a #s(literal 0 binary64)) (*.f64 a #s(literal 0 binary64)))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 8 binary64)) (pow.f64 y-scale #s(literal 8 binary64))) (*.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 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) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 x-scale x-scale) (*.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 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.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 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 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) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))) (*.f64 (*.f64 a a) (*.f64 b b)))) (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 a a))) (sqrt.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 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) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))))))) |
(* -1/4 (* (/ (* b (* (pow x-scale 2) (pow y-scale 2))) (pow a 2)) (sqrt (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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)))))))) |
(*.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 b (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) (*.f64 a a))) (sqrt.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 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) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) |
(* -1 (* b (+ (* 1/4 (* (/ (* (pow x-scale 2) (pow y-scale 2)) (pow a 2)) (sqrt (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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)))))))) (* 1/2 (* (/ (* (pow a 2) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (* b (* (pow x-scale 2) (pow y-scale 2)))) (sqrt (/ 1 (* (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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))))) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 #s(literal -1 binary64) b) (+.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 a a))) (sqrt.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 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) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 (*.f64 b (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 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) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 x-scale x-scale) (*.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 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (/ (+ (* -1/2 (* (/ (* (pow a 2) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (* (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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))))) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) (* -1/8 (* (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/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)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))))) (* 4 (/ (* (pow a 8) (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 8) (* (pow y-scale 8) (* (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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))))) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (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) b)) (sqrt (/ 1 (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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)))))))))) b)) (* 1/4 (* (/ (* (pow x-scale 2) (pow y-scale 2)) (pow a 2)) (sqrt (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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))))))))))) |
(*.f64 (*.f64 #s(literal -1 binary64) b) (+.f64 (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 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) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 x-scale x-scale) (*.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 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (-.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 y-scale y-scale)) (*.f64 #s(literal -1/2 binary64) (*.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 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 a #s(literal 0 binary64)) (*.f64 a #s(literal 0 binary64))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 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 (pow.f64 a #s(literal 6 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 a #s(literal 8 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 a #s(literal 0 binary64)) (*.f64 a #s(literal 0 binary64)))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 8 binary64)) (pow.f64 y-scale #s(literal 8 binary64))) (*.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 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) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 x-scale x-scale) (*.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 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.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 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 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) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))) (*.f64 (*.f64 a a) b)))) b)) (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 a a))) (sqrt.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 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) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))))) |
(* -1 (* b (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (* (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* -4 (* (/ (* (pow a 4) (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 a) (* 2 a)) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (* (pow x-scale 2) (* (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)))))))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 a 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 a) (* 2 a)) (- (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/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)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))))) (* 4 (/ (* (pow a 8) (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 8) (* (pow y-scale 8) (* (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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))))) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))))) (* (pow x-scale 4) (* (pow y-scale 4) (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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)))))))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (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) b)) (sqrt (/ 1 (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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))))))))) (* 1/8 (* (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/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)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))))) (* 4 (/ (* (pow a 8) (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 8) (* (pow y-scale 8) (* (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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))))) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (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)) (sqrt (/ 1 (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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)))))))))) b)) (* -1/2 (* (/ (* (pow a 2) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (* (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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))))) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))))) b)) (* 1/4 (* (/ (* (pow x-scale 2) (pow y-scale 2)) (pow a 2)) (sqrt (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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))))))))))) |
(*.f64 (*.f64 #s(literal -1 binary64) b) (+.f64 (neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (+.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a #s(literal 0 binary64))) (-.f64 (+.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 a #s(literal 0 binary64)) (*.f64 a #s(literal 0 binary64))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 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 x-scale x-scale) (*.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 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.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)))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a #s(literal 0 binary64))) (-.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 y-scale y-scale)) (*.f64 #s(literal -1/2 binary64) (*.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 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 a #s(literal 0 binary64)) (*.f64 a #s(literal 0 binary64))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 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 (pow.f64 a #s(literal 6 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 a #s(literal 8 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 a #s(literal 0 binary64)) (*.f64 a #s(literal 0 binary64)))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 8 binary64)) (pow.f64 y-scale #s(literal 8 binary64))) (*.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 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) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 x-scale x-scale) (*.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 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.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)))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 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) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 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) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))) (*.f64 (*.f64 a a) b))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (-.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 y-scale y-scale)) (*.f64 #s(literal -1/2 binary64) (*.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 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 a #s(literal 0 binary64)) (*.f64 a #s(literal 0 binary64))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 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 (pow.f64 a #s(literal 6 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 a #s(literal 8 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 a #s(literal 0 binary64)) (*.f64 a #s(literal 0 binary64)))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 8 binary64)) (pow.f64 y-scale #s(literal 8 binary64))) (*.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 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) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 x-scale x-scale) (*.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 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.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 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 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) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))) (*.f64 a a)))) b)) (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 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) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 x-scale x-scale) (*.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 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.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)) (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 a a))) (sqrt.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 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) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))))) |
(* 1/4 (* (/ (pow y-scale 2) (* (pow a 2) (pow b 2))) (sqrt (+ (* -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)))))))))) (pow y-scale 2))) (* 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)))))))))) (pow y-scale 2))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 b b)))) (sqrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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 y-scale y-scale)) #s(literal 0 binary64)))) |
(+ (* 1/4 (* (/ (pow y-scale 2) (* (pow a 2) (pow b 2))) (sqrt (+ (* -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)))))))))) (pow y-scale 2))) (* 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)))))))))) (pow y-scale 2))))))) (* (* (pow a 2) (* (pow b 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (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 (+ (* -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)))))))))) (pow y-scale 2))) (* 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)))))))))) (pow y-scale 2)))))))) |
(+.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 b b)))) (sqrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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 y-scale y-scale)) #s(literal 0 binary64)))) (*.f64 (*.f64 a a) (*.f64 (*.f64 (*.f64 (*.f64 b b) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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 y-scale y-scale)) #s(literal 0 binary64))))))) |
(+ (* 1/4 (* (/ (pow y-scale 2) (* (pow a 2) (pow b 2))) (sqrt (+ (* -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)))))))))) (pow y-scale 2))) (* 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)))))))))) (pow y-scale 2))))))) (* (pow x-scale 2) (+ (* 1/8 (* (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* -4 (/ (* (pow a 4) (* (pow b 4) (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))))) (* (pow y-scale 2) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 16 (/ (* (pow a 8) (* (pow b 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) 2))) (* (pow y-scale 4) (+ (* -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)))))))))) (pow y-scale 2))) (* 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)))))))))) (pow y-scale 2)))))))))) (* (pow a 2) (pow b 2))) (sqrt (/ 1 (+ (* -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)))))))))) (pow y-scale 2))) (* 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)))))))))) (pow y-scale 2)))))))) (* (* (pow a 2) (* (pow b 2) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (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 (+ (* -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)))))))))) (pow y-scale 2))) (* 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)))))))))) (pow y-scale 2)))))))))) |
(+.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 b b)))) (sqrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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 y-scale y-scale)) #s(literal 0 binary64)))) (*.f64 (*.f64 x-scale x-scale) (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.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) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 y-scale) (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 #s(literal -16 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 b #s(literal 8 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 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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 y-scale y-scale)) #s(literal 0 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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 y-scale y-scale)) #s(literal 0 binary64))))) (*.f64 (*.f64 a a) (*.f64 b b)))) (*.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (+.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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 y-scale y-scale)) #s(literal 0 binary64)))))))) |
(+ (* 1/4 (* (/ (pow y-scale 2) (* (pow a 2) (pow b 2))) (sqrt (+ (* -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)))))))))) (pow y-scale 2))) (* 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)))))))))) (pow y-scale 2))))))) (* (pow x-scale 2) (+ (* (* (pow a 2) (* (pow b 2) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (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 (+ (* -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)))))))))) (pow y-scale 2))) (* 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)))))))))) (pow y-scale 2))))))) (* (pow x-scale 2) (+ (* 1/8 (* (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 2 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 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)))))))) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (- (* -4 (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))))) (* (pow y-scale 2) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 16 (/ (* (pow a 8) (* (pow b 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) 2))) (* (pow y-scale 4) (+ (* -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)))))))))) (pow y-scale 2))) (* 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)))))))))) (pow y-scale 2)))))))) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (pow 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) (+ (* -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)))))))))) (pow y-scale 2))) (* 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)))))))))) (pow y-scale 2)))))))))) (* (pow a 2) (pow b 2))) (sqrt (/ 1 (+ (* -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)))))))))) (pow y-scale 2))) (* 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)))))))))) (pow y-scale 2)))))))) (* 1/8 (* (/ (* (pow y-scale 2) (- (* -4 (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))))) (* (pow y-scale 2) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 16 (/ (* (pow a 8) (* (pow b 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) 2))) (* (pow y-scale 4) (+ (* -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)))))))))) (pow y-scale 2))) (* 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)))))))))) (pow y-scale 2))))))))) (* (pow a 2) (pow b 2))) (sqrt (/ 1 (+ (* -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)))))))))) (pow y-scale 2))) (* 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)))))))))) (pow y-scale 2))))))))))))) |
(+.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 b b)))) (sqrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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 y-scale y-scale)) #s(literal 0 binary64)))) (*.f64 (*.f64 x-scale x-scale) (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (+.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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 y-scale y-scale)) #s(literal 0 binary64))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 #s(literal 1/8 binary64) (+.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.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 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 y-scale) (pow.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(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 -4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.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 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 y-scale) (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 #s(literal -16 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 b #s(literal 8 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 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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 y-scale y-scale)) #s(literal 0 binary64)))))) (+.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 y-scale) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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 y-scale y-scale)) #s(literal 0 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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 y-scale y-scale)) #s(literal 0 binary64))))) (*.f64 (*.f64 a a) (*.f64 b b))) (/.f64 (*.f64 (*.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) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 y-scale) (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 #s(literal -16 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 b #s(literal 8 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 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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 y-scale y-scale)) #s(literal 0 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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 y-scale y-scale)) #s(literal 0 binary64))))) (*.f64 (*.f64 a a) (*.f64 b b))))))))) |
(* 1/4 (* (/ (pow y-scale 2) (* (pow a 2) (pow b 2))) (sqrt (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (pow y-scale 2))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 b b)))) (sqrt.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 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 y-scale y-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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 y-scale y-scale))))) |
(+ (* -1/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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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 (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (pow y-scale 2)))))))) (* 1/4 (* (/ (pow y-scale 2) (* (pow a 2) (pow b 2))) (sqrt (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (pow y-scale 2)))))))) |
(+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.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 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 y-scale y-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 b b)))) (sqrt.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 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 y-scale y-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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 y-scale y-scale)))))) |
(+ (* -1/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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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 (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* (pow y-scale 2) (- (* 2 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 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))) 3)))) (* 4 (/ (* (pow a 8) (* (pow b 8) (pow (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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 y-scale 4) (* (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (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))))))) (* (pow a 2) (* (pow b 2) (pow x-scale 4)))) (sqrt (/ 1 (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (pow y-scale 2)))))))) (* 1/4 (* (/ (pow y-scale 2) (* (pow a 2) (pow b 2))) (sqrt (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (pow y-scale 2))))))))) |
(+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.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 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 y-scale y-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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 y-scale y-scale)))))) (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.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 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 y-scale y-scale) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 -4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 b #s(literal 8 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 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 y-scale #s(literal 4 binary64)) (*.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 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 y-scale y-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -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 #s(literal -4 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 y-scale y-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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 y-scale y-scale)))))) (*.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (pow.f64 x-scale #s(literal 4 binary64))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 b b)))) (sqrt.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 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 y-scale y-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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 y-scale y-scale))))))) |
(+ (* -1/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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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 (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* (pow y-scale 2) (- (* 2 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 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))) 3)))) (* 4 (/ (* (pow a 8) (* (pow b 8) (pow (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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 y-scale 4) (* (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (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))))))) (* (pow a 2) (* (pow b 2) (pow x-scale 4)))) (sqrt (/ 1 (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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 y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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 4) (* (pow b 4) (* (- (* 2 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 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))) 3)))) (* 4 (/ (* (pow a 8) (* (pow b 8) (pow (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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 y-scale 4) (* (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (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)))))) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* (pow y-scale 2) (* (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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) (pow x-scale 6)))) (sqrt (/ 1 (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (pow y-scale 2)))))))) (* 1/4 (* (/ (pow y-scale 2) (* (pow a 2) (pow b 2))) (sqrt (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (pow y-scale 2)))))))))) |
(+.f64 (+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.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 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 y-scale y-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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 y-scale y-scale)))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.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 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 y-scale y-scale) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 -4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 b #s(literal 8 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 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 y-scale #s(literal 4 binary64)) (*.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 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 y-scale y-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -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 #s(literal -4 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 y-scale y-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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 y-scale y-scale)))))) (*.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (pow.f64 x-scale #s(literal 4 binary64)))))) (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.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 (/.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 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 y-scale y-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (+.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 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 y-scale y-scale) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 -4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 b #s(literal 8 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 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 y-scale #s(literal 4 binary64)) (*.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 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 y-scale y-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 y-scale y-scale) (*.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 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 y-scale y-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 y-scale y-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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 y-scale y-scale)))))) (*.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (pow.f64 x-scale #s(literal 6 binary64))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 b b)))) (sqrt.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 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 y-scale y-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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 y-scale y-scale))))))) |
(* 1/4 (* (/ (pow y-scale 2) (* (pow a 2) (pow b 2))) (sqrt (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (pow y-scale 2))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 b b)))) (sqrt.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 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 y-scale y-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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 y-scale y-scale))))) |
(+ (* -1/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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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 (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (pow y-scale 2)))))))) (* 1/4 (* (/ (pow y-scale 2) (* (pow a 2) (pow b 2))) (sqrt (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (pow y-scale 2)))))))) |
(+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.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 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 y-scale y-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 b b)))) (sqrt.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 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 y-scale y-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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 y-scale y-scale)))))) |
(+ (* -1/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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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 (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* (pow y-scale 2) (- (* 2 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 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))) 3)))) (* 4 (/ (* (pow a 8) (* (pow b 8) (pow (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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 y-scale 4) (* (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (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))))))) (* (pow a 2) (* (pow b 2) (pow x-scale 4)))) (sqrt (/ 1 (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (pow y-scale 2)))))))) (* 1/4 (* (/ (pow y-scale 2) (* (pow a 2) (pow b 2))) (sqrt (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (pow y-scale 2))))))))) |
(+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.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 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 y-scale y-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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 y-scale y-scale)))))) (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.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 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 y-scale y-scale) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 -4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 b #s(literal 8 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 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 y-scale #s(literal 4 binary64)) (*.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 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 y-scale y-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -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 #s(literal -4 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 y-scale y-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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 y-scale y-scale)))))) (*.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (pow.f64 x-scale #s(literal 4 binary64))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 b b)))) (sqrt.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 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 y-scale y-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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 y-scale y-scale))))))) |
(+ (* -1/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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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 (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* (pow y-scale 2) (- (* 2 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 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))) 3)))) (* 4 (/ (* (pow a 8) (* (pow b 8) (pow (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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 y-scale 4) (* (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (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))))))) (* (pow a 2) (* (pow b 2) (pow x-scale 4)))) (sqrt (/ 1 (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (pow y-scale 2)))))))) (+ (* 1/8 (* (/ (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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 y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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 4) (* (pow b 4) (* (- (* 2 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 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))) 3)))) (* 4 (/ (* (pow a 8) (* (pow b 8) (pow (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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 y-scale 4) (* (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (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)))))) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* (pow y-scale 2) (* (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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) (pow x-scale 6)))) (sqrt (/ 1 (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (pow y-scale 2)))))))) (* 1/4 (* (/ (pow y-scale 2) (* (pow a 2) (pow b 2))) (sqrt (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (pow y-scale 2)))))))))) |
(+.f64 (+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.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 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 y-scale y-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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 y-scale y-scale)))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.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 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 y-scale y-scale) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 -4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 b #s(literal 8 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 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 y-scale #s(literal 4 binary64)) (*.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 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 y-scale y-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -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 #s(literal -4 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 y-scale y-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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 y-scale y-scale)))))) (*.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (pow.f64 x-scale #s(literal 4 binary64)))))) (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.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 (/.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 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 y-scale y-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (+.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 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 y-scale y-scale) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 -4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 b #s(literal 8 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 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 y-scale #s(literal 4 binary64)) (*.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 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 y-scale y-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 y-scale y-scale) (*.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 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 y-scale y-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 y-scale y-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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 y-scale y-scale)))))) (*.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (pow.f64 x-scale #s(literal 6 binary64))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 a a) (*.f64 b b)))) (sqrt.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 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 y-scale y-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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 y-scale y-scale))))))) |
(* 1/4 (* (/ (* (pow x-scale 2) y-scale) (* (pow a 2) (pow b 2))) (sqrt (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))))) (* (pow x-scale 2) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 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)))))))))) (pow x-scale 4))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) y-scale) (*.f64 (*.f64 a a) (*.f64 b b)))) (sqrt.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 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 x-scale x-scale) (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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)))))))))) (pow.f64 x-scale #s(literal 4 binary64)))))) |
(* y-scale (+ (* -1/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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 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 (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))))) (* (pow x-scale 2) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 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)))))))))) (pow x-scale 4)))))))) (* 1/4 (* (/ (pow x-scale 2) (* (pow a 2) (pow b 2))) (sqrt (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))))) (* (pow x-scale 2) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 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)))))))))) (pow x-scale 4))))))))) |
(*.f64 y-scale (+.f64 (*.f64 #s(literal -1/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 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 #s(literal -4 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 x-scale x-scale) (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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)))))))))) (pow.f64 x-scale #s(literal 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 #s(literal 1/4 binary64) (/.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 a a) (*.f64 b b)))) (sqrt.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 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 x-scale x-scale) (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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)))))))))) (pow.f64 x-scale #s(literal 4 binary64)))))))) |
(* y-scale (+ (* 1/4 (* (/ (pow x-scale 2) (* (pow a 2) (pow b 2))) (sqrt (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))))) (* (pow x-scale 2) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 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)))))))))) (pow x-scale 4))))))) (* (pow y-scale 2) (+ (* -1/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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 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 (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))))) (* (pow x-scale 2) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 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)))))))))) (pow x-scale 4)))))))) (* 1/8 (* (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 2 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 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)))))))) 3)))) (* 4 (/ (* (pow a 8) (* (pow b 8) (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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow 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 x-scale 4) (* (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))))) (* (pow x-scale 2) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 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)))))))))) (pow x-scale 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)))))))) (* (pow a 2) (pow b 2))) (sqrt (/ 1 (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))))) (* (pow x-scale 2) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 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)))))))))) (pow x-scale 4)))))))))))) |
(*.f64 y-scale (+.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 a a) (*.f64 b b)))) (sqrt.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 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 x-scale x-scale) (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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)))))))))) (pow.f64 x-scale #s(literal 4 binary64)))))) (*.f64 (*.f64 y-scale y-scale) (+.f64 (*.f64 #s(literal -1/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 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 #s(literal -4 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 x-scale x-scale) (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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)))))))))) (pow.f64 x-scale #s(literal 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 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.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 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 x-scale) (pow.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(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 -4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 b #s(literal 8 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 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 x-scale #s(literal 4 binary64)) (*.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 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 x-scale x-scale) (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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)))))))))) (pow.f64 x-scale #s(literal 4 binary64)))) (pow.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/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 #s(literal -4 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 x-scale x-scale) (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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)))))))))) (pow.f64 x-scale #s(literal 4 binary64))))))) (*.f64 (*.f64 a a) (*.f64 b b)))))))) |
(* y-scale (+ (* 1/4 (* (/ (pow x-scale 2) (* (pow a 2) (pow b 2))) (sqrt (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))))) (* (pow x-scale 2) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 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)))))))))) (pow x-scale 4))))))) (* (pow y-scale 2) (+ (* -1/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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 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 (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))))) (* (pow x-scale 2) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 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)))))))))) (pow x-scale 4)))))))) (* (pow y-scale 2) (+ (* 1/8 (* (/ (* (pow x-scale 2) (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow 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 x-scale 2) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* -2 (/ (* (pow a 4) (* (pow b 4) (* (- (* 2 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 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)))))))) 3)))) (* 4 (/ (* (pow a 8) (* (pow b 8) (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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow 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 x-scale 4) (* (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))))) (* (pow x-scale 2) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 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)))))))))) (pow x-scale 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)))))) (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))))) (* (pow x-scale 2) (* (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))))) (* (pow x-scale 2) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 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)))))))))) (pow x-scale 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))))))))))))))) (* (pow a 2) (pow b 2))) (sqrt (/ 1 (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))))) (* (pow x-scale 2) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 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)))))))))) (pow x-scale 4)))))))) (* 1/8 (* (/ (* (pow x-scale 2) (- (* 2 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 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)))))))) 3)))) (* 4 (/ (* (pow a 8) (* (pow b 8) (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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow 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 x-scale 4) (* (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))))) (* (pow x-scale 2) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 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)))))))))) (pow x-scale 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))))))) (* (pow a 2) (pow b 2))) (sqrt (/ 1 (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))))) (* (pow x-scale 2) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 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)))))))))) (pow x-scale 4)))))))))))))) |
(*.f64 y-scale (+.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 a a) (*.f64 b b)))) (sqrt.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 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 x-scale x-scale) (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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)))))))))) (pow.f64 x-scale #s(literal 4 binary64)))))) (*.f64 (*.f64 y-scale y-scale) (+.f64 (*.f64 #s(literal -1/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 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 #s(literal -4 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 x-scale x-scale) (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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)))))))))) (pow.f64 x-scale #s(literal 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 y-scale y-scale) (*.f64 #s(literal 1/8 binary64) (+.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.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 (/.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 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 x-scale x-scale) (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (+.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 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 x-scale) (pow.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(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 -4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 b #s(literal 8 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 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 x-scale #s(literal 4 binary64)) (*.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 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 x-scale x-scale) (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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)))))))))) (pow.f64 x-scale #s(literal 4 binary64)))) (pow.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 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 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 x-scale) (*.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 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 x-scale x-scale) (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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)))))))))) (pow.f64 x-scale #s(literal 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)))))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 x-scale x-scale) (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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)))))))))) (pow.f64 x-scale #s(literal 4 binary64))))))) (*.f64 (*.f64 a a) (*.f64 b b))) (/.f64 (*.f64 (*.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 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 x-scale) (pow.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(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 -4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 b #s(literal 8 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 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 x-scale #s(literal 4 binary64)) (*.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 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 x-scale x-scale) (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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)))))))))) (pow.f64 x-scale #s(literal 4 binary64)))) (pow.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/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 #s(literal -4 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 x-scale x-scale) (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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)))))))))) (pow.f64 x-scale #s(literal 4 binary64))))))) (*.f64 (*.f64 a a) (*.f64 b b)))))))))) |
(* 1/4 (* (/ (* (pow x-scale 2) y-scale) (* (pow a 2) (pow b 2))) (sqrt (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) y-scale) (*.f64 (*.f64 a a) (*.f64 b b)))) (sqrt.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 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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)))))))))) (pow.f64 x-scale #s(literal 4 binary64)))))) |
(* y-scale (+ (* 1/4 (* (/ (pow x-scale 2) (* (pow a 2) (pow b 2))) (sqrt (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4))))))) (* (/ (* (pow a 2) (* (pow b 2) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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)) (sqrt (/ 1 (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4))))))))) |
(*.f64 y-scale (+.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 a a) (*.f64 b b)))) (sqrt.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 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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)))))))))) (pow.f64 x-scale #s(literal 4 binary64)))))) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b 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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 #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 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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)))))))))) (pow.f64 x-scale #s(literal 4 binary64))))))) (*.f64 y-scale y-scale)))) |
(* y-scale (+ (* 1/8 (* (/ (* (pow x-scale 2) (- (* -4 (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) (* 16 (/ (* (pow a 8) (* (pow b 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)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) 2))) (* (pow x-scale 4) (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4))))))))) (* (pow a 2) (* (pow b 2) (pow y-scale 4)))) (sqrt (/ 1 (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4)))))))) (+ (* 1/4 (* (/ (pow x-scale 2) (* (pow a 2) (pow b 2))) (sqrt (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4))))))) (* (/ (* (pow a 2) (* (pow b 2) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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)) (sqrt (/ 1 (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4)))))))))) |
(*.f64 y-scale (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.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 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 x-scale x-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (*.f64 #s(literal -16 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 b #s(literal 8 binary64))) (pow.f64 (+.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 (pow.f64 x-scale #s(literal 4 binary64)) (+.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 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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)))))))))) (pow.f64 x-scale #s(literal 4 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.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 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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)))))))))) (pow.f64 x-scale #s(literal 4 binary64))))))) (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 y-scale #s(literal 4 binary64)))))) (+.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 a a) (*.f64 b b)))) (sqrt.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 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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)))))))))) (pow.f64 x-scale #s(literal 4 binary64)))))) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b 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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 #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 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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)))))))))) (pow.f64 x-scale #s(literal 4 binary64))))))) (*.f64 y-scale y-scale))))) |
(* y-scale (+ (* 1/8 (* (/ (* (pow x-scale 2) (- (* -4 (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) (* 16 (/ (* (pow a 8) (* (pow b 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)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) 2))) (* (pow x-scale 4) (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4))))))))) (* (pow a 2) (* (pow b 2) (pow y-scale 4)))) (sqrt (/ 1 (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4)))))))) (+ (* 1/8 (* (/ (* (pow x-scale 2) (- (* 2 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 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))) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (- (* -4 (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) (* 16 (/ (* (pow a 8) (* (pow b 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)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) 2))) (* (pow x-scale 4) (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4))))))))) (* (pow a 2) (* (pow b 2) (pow y-scale 6)))) (sqrt (/ 1 (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4)))))))) (+ (* 1/4 (* (/ (pow x-scale 2) (* (pow a 2) (pow b 2))) (sqrt (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4))))))) (* (/ (* (pow a 2) (* (pow b 2) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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)) (sqrt (/ 1 (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4))))))))))) |
(*.f64 y-scale (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.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 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 x-scale x-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (*.f64 #s(literal -16 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 b #s(literal 8 binary64))) (pow.f64 (+.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 (pow.f64 x-scale #s(literal 4 binary64)) (+.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 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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)))))))))) (pow.f64 x-scale #s(literal 4 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.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 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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)))))))))) (pow.f64 x-scale #s(literal 4 binary64))))))) (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 y-scale #s(literal 4 binary64)))))) (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.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 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 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 3 binary64)))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.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) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 x-scale x-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (*.f64 #s(literal -16 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 b #s(literal 8 binary64))) (pow.f64 (+.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 (pow.f64 x-scale #s(literal 4 binary64)) (+.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 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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)))))))))) (pow.f64 x-scale #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 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 x-scale) (+.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 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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)))))))))) (pow.f64 x-scale #s(literal 4 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.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 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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)))))))))) (pow.f64 x-scale #s(literal 4 binary64))))))) (*.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (pow.f64 y-scale #s(literal 6 binary64))))) (+.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 a a) (*.f64 b b)))) (sqrt.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 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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)))))))))) (pow.f64 x-scale #s(literal 4 binary64)))))) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b 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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 #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 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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)))))))))) (pow.f64 x-scale #s(literal 4 binary64))))))) (*.f64 y-scale y-scale)))))) |
(* -1/4 (* (/ (* (pow x-scale 2) y-scale) (* (pow a 2) (pow b 2))) (sqrt (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4))))))) |
(*.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) y-scale) (*.f64 (*.f64 a a) (*.f64 b b)))) (sqrt.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 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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)))))))))) (pow.f64 x-scale #s(literal 4 binary64)))))) |
(* -1 (* y-scale (+ (* 1/4 (* (/ (pow x-scale 2) (* (pow a 2) (pow b 2))) (sqrt (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4))))))) (* (/ (* (pow a 2) (* (pow b 2) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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)) (sqrt (/ 1 (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4)))))))))) |
(*.f64 (*.f64 #s(literal -1 binary64) y-scale) (+.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 a a) (*.f64 b b)))) (sqrt.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 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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)))))))))) (pow.f64 x-scale #s(literal 4 binary64)))))) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b 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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 #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 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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)))))))))) (pow.f64 x-scale #s(literal 4 binary64))))))) (*.f64 y-scale y-scale)))) |
(* -1 (* y-scale (+ (* 1/8 (* (/ (* (pow x-scale 2) (- (* -4 (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) (* 16 (/ (* (pow a 8) (* (pow b 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)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) 2))) (* (pow x-scale 4) (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4))))))))) (* (pow a 2) (* (pow b 2) (pow y-scale 4)))) (sqrt (/ 1 (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4)))))))) (+ (* 1/4 (* (/ (pow x-scale 2) (* (pow a 2) (pow b 2))) (sqrt (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4))))))) (* (/ (* (pow a 2) (* (pow b 2) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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)) (sqrt (/ 1 (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4))))))))))) |
(*.f64 (*.f64 #s(literal -1 binary64) y-scale) (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.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 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 x-scale x-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (*.f64 #s(literal -16 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 b #s(literal 8 binary64))) (pow.f64 (+.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 (pow.f64 x-scale #s(literal 4 binary64)) (+.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 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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)))))))))) (pow.f64 x-scale #s(literal 4 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.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 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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)))))))))) (pow.f64 x-scale #s(literal 4 binary64))))))) (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 y-scale #s(literal 4 binary64)))))) (+.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 a a) (*.f64 b b)))) (sqrt.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 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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)))))))))) (pow.f64 x-scale #s(literal 4 binary64)))))) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b 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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 #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 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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)))))))))) (pow.f64 x-scale #s(literal 4 binary64))))))) (*.f64 y-scale y-scale))))) |
(* -1 (* y-scale (+ (* 1/8 (* (/ (* (pow x-scale 2) (- (* -4 (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) (* 16 (/ (* (pow a 8) (* (pow b 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)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) 2))) (* (pow x-scale 4) (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4))))))))) (* (pow a 2) (* (pow b 2) (pow y-scale 4)))) (sqrt (/ 1 (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4)))))))) (+ (* 1/8 (* (/ (* (pow x-scale 2) (- (* 2 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 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))) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (- (* -4 (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) (* 16 (/ (* (pow a 8) (* (pow b 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)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) 2))) (* (pow x-scale 4) (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4))))))))) (* (pow a 2) (* (pow b 2) (pow y-scale 6)))) (sqrt (/ 1 (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4)))))))) (+ (* 1/4 (* (/ (pow x-scale 2) (* (pow a 2) (pow b 2))) (sqrt (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4))))))) (* (/ (* (pow a 2) (* (pow b 2) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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)) (sqrt (/ 1 (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4)))))))))))) |
(*.f64 (*.f64 #s(literal -1 binary64) y-scale) (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.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 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 x-scale x-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (*.f64 #s(literal -16 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 b #s(literal 8 binary64))) (pow.f64 (+.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 (pow.f64 x-scale #s(literal 4 binary64)) (+.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 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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)))))))))) (pow.f64 x-scale #s(literal 4 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.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 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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)))))))))) (pow.f64 x-scale #s(literal 4 binary64))))))) (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (pow.f64 y-scale #s(literal 4 binary64)))))) (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.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 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 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 3 binary64)))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.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) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 x-scale x-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (*.f64 #s(literal -16 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 b #s(literal 8 binary64))) (pow.f64 (+.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 (pow.f64 x-scale #s(literal 4 binary64)) (+.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 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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)))))))))) (pow.f64 x-scale #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 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 x-scale) (+.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 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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)))))))))) (pow.f64 x-scale #s(literal 4 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.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 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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)))))))))) (pow.f64 x-scale #s(literal 4 binary64))))))) (*.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (pow.f64 y-scale #s(literal 6 binary64))))) (+.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 a a) (*.f64 b b)))) (sqrt.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 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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)))))))))) (pow.f64 x-scale #s(literal 4 binary64)))))) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b 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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 #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 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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)))))))))) (pow.f64 x-scale #s(literal 4 binary64))))))) (*.f64 y-scale y-scale)))))) |
(* (pow a 2) (sqrt (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))))))) |
(*.f64 (*.f64 a a) (sqrt.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -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 (pow.f64 b #s(literal 6 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))))))) |
(* (pow a 2) (+ (sqrt (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))))) (* -2 (* (/ (* a (* (pow b 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))))) (* (pow x-scale 4) (pow y-scale 4))) (sqrt (/ 1 (* (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (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))))))))) |
(*.f64 (*.f64 a a) (+.f64 (sqrt.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -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 (pow.f64 b #s(literal 6 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 a (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -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 (pow.f64 b #s(literal 6 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))))) (+.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) (+ (sqrt (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))))) (* a (+ (* -2 (* (/ (* (pow b 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* (pow x-scale 4) (pow y-scale 4))) (sqrt (/ 1 (* (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (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/2 (* (* a (- (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 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)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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 (/ (* (pow b 8) (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2))) (* (pow x-scale 8) (* (pow y-scale 8) (* (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (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))))))))) (sqrt (/ 1 (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))))))))))))) |
(*.f64 (*.f64 a a) (+.f64 (sqrt.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -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 (pow.f64 b #s(literal 6 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale)))))) (*.f64 a (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -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 (pow.f64 b #s(literal 6 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))))) (+.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 a (*.f64 (-.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.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 (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 #s(literal 2 binary64) (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 b b) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64)) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 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) (*.f64 (pow.f64 b #s(literal 8 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64)) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 8 binary64)) (*.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -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 (pow.f64 b #s(literal 6 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale)))))) (+.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 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -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 (pow.f64 b #s(literal 6 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale)))))))))))))) |
(* (pow a 2) (+ (sqrt (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))))) (* a (+ (* -2 (* (/ (* (pow b 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (* (pow x-scale 4) (pow y-scale 4))) (sqrt (/ 1 (* (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (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))))))) (* a (+ (* 1/2 (* (sqrt (/ 1 (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))))))) (- (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 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)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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 (/ (* (pow b 8) (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2))) (* (pow x-scale 8) (* (pow y-scale 8) (* (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (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/2 (* (* a (- (* -4 (* (/ (* (pow b 4) (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 (pow b 3)) (* 2 (pow b 3))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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))) (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)))))) (* -2 (* (/ (* (pow b 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 (pow b 3)) (* 2 (pow b 3))) (- (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 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)))) (- (+ (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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 (/ (* (pow b 8) (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2))) (* (pow x-scale 8) (* (pow y-scale 8) (* (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (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))))))))))) (* (pow x-scale 4) (* (pow y-scale 4) (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (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)))))))) (sqrt (/ 1 (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))))))))))))))) |
(*.f64 (*.f64 a a) (+.f64 (sqrt.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -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 (pow.f64 b #s(literal 6 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale)))))) (*.f64 a (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -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 (pow.f64 b #s(literal 6 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))))) (+.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 a (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -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 (pow.f64 b #s(literal 6 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))))))) (-.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.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 (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 #s(literal 2 binary64) (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 b b) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64)) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 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) (*.f64 (pow.f64 b #s(literal 8 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64)) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 8 binary64)) (*.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -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 (pow.f64 b #s(literal 6 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale)))))) (+.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 a (*.f64 (+.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b #s(literal 0 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/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 b (*.f64 b b)) #s(literal 0 binary64))) (-.f64 (+.f64 (*.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 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 b b) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64)) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 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 x-scale x-scale) (*.f64 y-scale y-scale)) (+.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 (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 2 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64))) (-.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.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 (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 #s(literal 2 binary64) (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 b b) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64)) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 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) (*.f64 (pow.f64 b #s(literal 8 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64)) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64)))))) (*.f64 (pow.f64 x-scale #s(literal 8 binary64)) (*.f64 (*.f64 (pow.f64 y-scale #s(literal 8 binary64)) (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -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 (pow.f64 b #s(literal 6 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale)))))) (+.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 (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 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -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 (pow.f64 b #s(literal 6 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -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 (pow.f64 b #s(literal 6 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale)))))))))))))))) |
(* (pow a 3) (sqrt (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) |
(*.f64 (*.f64 a (*.f64 a a)) (sqrt.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.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))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-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))))))) |
(* (pow a 3) (+ (sqrt (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (* -2 (* (/ (* (pow b 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (* a (* (pow x-scale 4) (pow y-scale 4)))) (sqrt (/ 1 (* (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (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))))))))) |
(*.f64 (*.f64 a (*.f64 a a)) (+.f64 (sqrt.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.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))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-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 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b #s(literal 0 binary64)))) (*.f64 (*.f64 a (pow.f64 x-scale #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.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))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale 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) (+ (sqrt (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (+ (* -2 (* (/ (* (pow b 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (* a (* (pow x-scale 4) (pow y-scale 4)))) (sqrt (/ 1 (* (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (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/2 (* (/ (- (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/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 (/ 1 (pow y-scale 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 x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))))) (* 4 (/ (* (pow b 8) (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 8) (* (pow y-scale 8) (* (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (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)))))))) (pow a 2)) (sqrt (/ 1 (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))))))))) |
(*.f64 (*.f64 a (*.f64 a a)) (+.f64 (+.f64 (sqrt.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.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))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-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 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b #s(literal 0 binary64)))) (*.f64 (*.f64 a (pow.f64 x-scale #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.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))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-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 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (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 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-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 2 binary64) (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 b b) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 b #s(literal 0 binary64)) (*.f64 b #s(literal 0 binary64))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-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 (pow.f64 b #s(literal 6 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 b #s(literal 8 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 b #s(literal 0 binary64)) (*.f64 b #s(literal 0 binary64)))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 8 binary64)) (pow.f64 y-scale #s(literal 8 binary64))) (*.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.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))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale 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 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.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))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-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 a a))))) |
(* (pow a 3) (+ (sqrt (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (+ (* -2 (* (/ (* (pow b 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (* a (* (pow x-scale 4) (pow y-scale 4)))) (sqrt (/ 1 (* (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (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/2 (* (/ (- (* -4 (* (/ (* (pow b 4) (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 b) (* 2 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 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (* (pow x-scale 2) (* (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)))))))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 b 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 b) (* 2 b)) (- (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/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 (/ 1 (pow y-scale 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 x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))))) (* 4 (/ (* (pow b 8) (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 8) (* (pow y-scale 8) (* (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (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))))))))))) (* (pow x-scale 4) (* (pow y-scale 4) (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 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 3)) (sqrt (/ 1 (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 1/2 (* (/ (- (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/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 (/ 1 (pow y-scale 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 x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))))) (* 4 (/ (* (pow b 8) (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 8) (* (pow y-scale 8) (* (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (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)))))))) (pow a 2)) (sqrt (/ 1 (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))))))))) |
(*.f64 (*.f64 a (*.f64 a a)) (+.f64 (+.f64 (sqrt.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.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))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-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 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b #s(literal 0 binary64)))) (*.f64 (*.f64 a (pow.f64 x-scale #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.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))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b #s(literal 0 binary64))) (-.f64 (+.f64 (*.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 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 b b) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 b #s(literal 0 binary64)) (*.f64 b #s(literal 0 binary64))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-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 x-scale x-scale) (*.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 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale 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 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-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 2 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b #s(literal 0 binary64))) (-.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (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 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-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 2 binary64) (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 b b) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 b #s(literal 0 binary64)) (*.f64 b #s(literal 0 binary64))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-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 (pow.f64 b #s(literal 6 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 b #s(literal 8 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 b #s(literal 0 binary64)) (*.f64 b #s(literal 0 binary64)))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 8 binary64)) (pow.f64 y-scale #s(literal 8 binary64))) (*.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.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))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale 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 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-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 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.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))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-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))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.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))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-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 a (*.f64 a a))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (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 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-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 2 binary64) (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 b b) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 b #s(literal 0 binary64)) (*.f64 b #s(literal 0 binary64))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-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 (pow.f64 b #s(literal 6 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 b #s(literal 8 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 b #s(literal 0 binary64)) (*.f64 b #s(literal 0 binary64)))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 8 binary64)) (pow.f64 y-scale #s(literal 8 binary64))) (*.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.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))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale 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 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.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))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-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 a a)))))) |
(* -1 (* (pow a 3) (sqrt (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))))) |
(*.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (*.f64 a a))) (sqrt.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.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))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-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))))))) |
(* -1 (* (pow a 3) (+ (sqrt (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (* 2 (* (/ (* (pow b 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (* a (* (pow x-scale 4) (pow y-scale 4)))) (sqrt (/ 1 (* (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (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)))))))))) |
(*.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (*.f64 a a))) (+.f64 (sqrt.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.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))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-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 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b #s(literal 0 binary64)))) (*.f64 (*.f64 a (pow.f64 x-scale #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.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))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale 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) (+ (sqrt (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (* -1 (/ (+ (* -2 (* (/ (* (pow b 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (* (pow x-scale 4) (pow y-scale 4))) (sqrt (/ 1 (* (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (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/2 (* (/ (- (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/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 (/ 1 (pow y-scale 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 x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))))) (* 4 (/ (* (pow b 8) (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 8) (* (pow y-scale 8) (* (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (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)))))))) a) (sqrt (/ 1 (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))))))) a))))) |
(*.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (*.f64 a a))) (+.f64 (sqrt.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.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))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-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)))))) (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.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))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-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 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (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 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-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 2 binary64) (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 b b) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 b #s(literal 0 binary64)) (*.f64 b #s(literal 0 binary64))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-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 (pow.f64 b #s(literal 6 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 b #s(literal 8 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 b #s(literal 0 binary64)) (*.f64 b #s(literal 0 binary64)))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 8 binary64)) (pow.f64 y-scale #s(literal 8 binary64))) (*.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.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))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale 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 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.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))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-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)))))))) a))) a)))) |
(* -1 (* (pow a 3) (+ (sqrt (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (* -1 (/ (+ (* -2 (* (/ (* (pow b 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (* (pow x-scale 4) (pow y-scale 4))) (sqrt (/ 1 (* (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (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 (/ (+ (* -1/2 (* (/ (- (* -4 (* (/ (* (pow b 4) (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 b) (* 2 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 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))) (* (pow x-scale 2) (* (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)))))))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 b 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 b) (* 2 b)) (- (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/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 (/ 1 (pow y-scale 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 x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))))) (* 4 (/ (* (pow b 8) (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 8) (* (pow y-scale 8) (* (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (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))))))))))) (* (pow x-scale 4) (* (pow y-scale 4) (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))) a) (sqrt (/ 1 (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 1/2 (* (sqrt (/ 1 (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (- (+ (* 8 (/ (* (pow b 4) (- (/ (* (pow b 2) (- 1/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 (/ 1 (pow y-scale 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 x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow b 6) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))))) (* 4 (/ (* (pow b 8) (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2))) (* (pow x-scale 8) (* (pow y-scale 8) (* (+ (* 8 (/ (* (pow b 4) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))) (* (pow x-scale 2) (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))))))))))) a))) a))))) |
(*.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (*.f64 a a))) (+.f64 (sqrt.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.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))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-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)))))) (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.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))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64))))))) (neg.f64 (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b #s(literal 0 binary64))) (-.f64 (+.f64 (*.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 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 b b) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 b #s(literal 0 binary64)) (*.f64 b #s(literal 0 binary64))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-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 x-scale x-scale) (*.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 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale 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 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-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 2 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b #s(literal 0 binary64))) (-.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (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 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-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 2 binary64) (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 b b) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 b #s(literal 0 binary64)) (*.f64 b #s(literal 0 binary64))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-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 (pow.f64 b #s(literal 6 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 b #s(literal 8 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 b #s(literal 0 binary64)) (*.f64 b #s(literal 0 binary64)))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 8 binary64)) (pow.f64 y-scale #s(literal 8 binary64))) (*.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.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))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale 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 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-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 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.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))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-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))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.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))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-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)))))))) a)) (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.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))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-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 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (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 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-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 2 binary64) (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 b b) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 b #s(literal 0 binary64)) (*.f64 b #s(literal 0 binary64))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-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 (pow.f64 b #s(literal 6 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 b #s(literal 8 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 b #s(literal 0 binary64)) (*.f64 b #s(literal 0 binary64)))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 8 binary64)) (pow.f64 y-scale #s(literal 8 binary64))) (*.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.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))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale 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))) a)))) |
(sqrt (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (/ (pow b 2) (pow x-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (pow b 6)) (* (pow x-scale 4) (pow y-scale 2)))))) |
(sqrt.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (-.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 a a)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 6 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale)))))) |
(+ (sqrt (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (/ (pow b 2) (pow x-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (pow b 6)) (* (pow x-scale 4) (pow y-scale 2)))))) (* 1/2 (* (* (pow angle 2) (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow 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)))))) (sqrt (/ 1 (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (/ (pow b 2) (pow x-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (pow b 6)) (* (pow x-scale 4) (pow y-scale 2)))))))))) |
(+.f64 (sqrt.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (-.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 a a)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 6 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 angle angle) (*.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.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 b b)) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 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 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 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.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 x-scale x-scale) (*.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (-.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 a a)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 6 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))))))))))) |
(+ (sqrt (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (/ (pow b 2) (pow x-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (pow b 6)) (* (pow x-scale 4) (pow y-scale 2)))))) (* (pow angle 2) (+ (* 1/2 (* (* (pow angle 2) (- (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4)))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* -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/2 (/ (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 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))))) (* 1/4 (/ (pow (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow 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))))) 2) (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (/ (pow b 2) (pow x-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (pow b 6)) (* (pow x-scale 4) (pow y-scale 2))))))))) (sqrt (/ 1 (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (/ (pow b 2) (pow x-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (pow b 6)) (* (pow x-scale 4) (pow y-scale 2))))))))) (* 1/2 (* (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow 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))))) (sqrt (/ 1 (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (/ (pow b 2) (pow x-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (pow b 6)) (* (pow x-scale 4) (pow y-scale 2)))))))))))) |
(+.f64 (sqrt.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (-.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 a a)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 6 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 angle angle) (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (*.f64 angle angle) (*.f64 (+.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (+.f64 (*.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 a a)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 #s(literal 1/3149280000 binary64) (*.f64 b b)) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (+.f64 (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 b b)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/196830000 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.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 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 (*.f64 #s(literal 1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.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 (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.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 #s(literal 1/4 binary64) (*.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.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 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.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 x-scale x-scale) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.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 b b)) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 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 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 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.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 x-scale x-scale) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)) (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (-.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 a a)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 6 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (-.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 a a)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 6 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))))))))) (*.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.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 b b)) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 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 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 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.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 x-scale x-scale) (*.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (-.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 a a)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 6 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale)))))))))))) |
(+ (sqrt (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (/ (pow b 2) (pow x-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (pow b 6)) (* (pow x-scale 4) (pow y-scale 2)))))) (* (pow angle 2) (+ (* 1/2 (* (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow 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))))) (sqrt (/ 1 (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (/ (pow b 2) (pow x-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (pow b 6)) (* (pow x-scale 4) (pow y-scale 2))))))))) (* (pow angle 2) (+ (* 1/2 (* (sqrt (/ 1 (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (/ (pow b 2) (pow x-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (pow b 6)) (* (pow x-scale 4) (pow y-scale 2))))))) (- (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4)))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* -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/2 (/ (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 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))))) (* 1/4 (/ (pow (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow 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))))) 2) (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (/ (pow b 2) (pow x-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (pow b 6)) (* (pow x-scale 4) (pow y-scale 2)))))))))) (* 1/2 (* (* (pow angle 2) (- (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* -1/765275040000000 (* (pow b 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow a 2) (pow (PI) 6)))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* -1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) (pow y-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))))) (/ (* (pow (+ a b) 2) (* (+ (* 1/31886460000000 (pow (PI) 6)) (* 1/19131876000000 (pow (PI) 6))) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (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 (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 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))))) (* 1/2 (/ (* (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow 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))))) (- (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4)))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* -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/2 (/ (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 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))))) (* 1/4 (/ (pow (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow 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))))) 2) (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (/ (pow b 2) (pow x-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (pow b 6)) (* (pow x-scale 4) (pow y-scale 2))))))))) (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (/ (pow b 2) (pow x-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (pow b 6)) (* (pow x-scale 4) (pow y-scale 2))))))))) (sqrt (/ 1 (+ (* 8 (/ (* (pow a 4) (* (pow b 4) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (/ (pow b 2) (pow x-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (pow b 6)) (* (pow x-scale 4) (pow y-scale 2)))))))))))))) |
(+.f64 (sqrt.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (-.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 a a)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 6 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 angle angle) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.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 b b)) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 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 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 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.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 x-scale x-scale) (*.f64 y-scale y-scale))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (-.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 a a)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 6 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))))))))) (*.f64 (*.f64 angle angle) (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (-.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 a a)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 6 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))))))) (+.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (+.f64 (*.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 a a)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 #s(literal 1/3149280000 binary64) (*.f64 b b)) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (+.f64 (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 b b)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/196830000 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.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 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 (*.f64 #s(literal 1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.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 (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.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 #s(literal 1/4 binary64) (*.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.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 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.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 x-scale x-scale) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.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 b b)) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 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 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 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.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 x-scale x-scale) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)) (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (-.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 a a)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 6 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))))))))) (*.f64 (*.f64 angle angle) (*.f64 (+.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (+.f64 (*.f64 (*.f64 #s(literal -1/765275040000000 binary64) (*.f64 b b)) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 (*.f64 #s(literal 1/765275040000000 binary64) (*.f64 a a)) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (+.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 (*.f64 #s(literal 1/765275040000000 binary64) (*.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 (*.f64 #s(literal 2 binary64) (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.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 (/.f64 (*.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.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 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 (*.f64 #s(literal 1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/765275040000000 binary64) (*.f64 b b)) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/765275040000000 binary64) (*.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 (*.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 (+.f64 a b) (+.f64 a b)) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/11957422500000 binary64)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.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/196830000 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.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 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 (*.f64 #s(literal 1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.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 (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.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 #s(literal 1/4 binary64) (*.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.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 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.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 b b)) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 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 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 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.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 x-scale x-scale) (*.f64 y-scale y-scale))))) (+.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (+.f64 (*.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 a a)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 #s(literal 1/3149280000 binary64) (*.f64 b b)) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (+.f64 (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 b b)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/196830000 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.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 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 (*.f64 #s(literal 1/3149280000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.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 (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.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 #s(literal 1/4 binary64) (*.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.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 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.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 x-scale x-scale) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.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 b b)) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 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 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 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.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 x-scale x-scale) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)) (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (-.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 a a)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 6 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))))))))) (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (-.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 a a)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 6 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (-.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 a a)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 6 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))))))))))))))) |
(sqrt (+ (* 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)))))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 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))) (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-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)))))) |
(sqrt.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.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))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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)))))) |
(sqrt (+ (* 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)))))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 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))) (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-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)))))) |
(sqrt.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.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))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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)))))) |
(sqrt (+ (* 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)))))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 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))) (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-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)))))) |
(sqrt.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.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))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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)))))) |
(sqrt (+ (* 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)))))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 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))) (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-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)))))) |
(sqrt.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.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))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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)))))) |
(sqrt (+ (* 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)))))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 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))) (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-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)))))) |
(sqrt.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.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))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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)))))) |
(sqrt (+ (* 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)))))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 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))) (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-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)))))) |
(sqrt.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.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))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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)))))) |
(sqrt (+ (* 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)))))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 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))) (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-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)))))) |
(sqrt.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.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))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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)))))) |
(sqrt (+ (* 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)))))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 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))) (sqrt (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-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)))))) |
(sqrt.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.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))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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)))))) |
(* (pow b 2) (sqrt (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))))))) |
(*.f64 (*.f64 b b) (sqrt.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 y-scale y-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 (*.f64 (pow.f64 a #s(literal 6 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))))))) |
(* (pow b 2) (+ (sqrt (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))))) (* -2 (* (/ (* (pow a 4) (* b (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))))) (* (pow x-scale 4) (pow y-scale 4))) (sqrt (/ 1 (* (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (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))))))))) |
(*.f64 (*.f64 b b) (+.f64 (sqrt.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 y-scale y-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 (*.f64 (pow.f64 a #s(literal 6 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 y-scale y-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 (*.f64 (pow.f64 a #s(literal 6 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))))) (+.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) (+ (sqrt (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))))) (* b (+ (* -2 (* (/ (* (pow a 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* (pow x-scale 4) (pow y-scale 4))) (sqrt (/ 1 (* (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (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/2 (* (* b (- (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 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)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (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 x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow a 8) (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2))) (* (pow x-scale 8) (* (pow y-scale 8) (* (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (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))))))))) (sqrt (/ 1 (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))))))))))))) |
(*.f64 (*.f64 b b) (+.f64 (sqrt.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 y-scale y-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 (*.f64 (pow.f64 a #s(literal 6 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale)))))) (*.f64 b (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 y-scale y-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 (*.f64 (pow.f64 a #s(literal 6 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))))) (+.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 b (*.f64 (+.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.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 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64)) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 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 x-scale x-scale) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 8 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64)) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 8 binary64)) (pow.f64 y-scale #s(literal 8 binary64))) (*.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 y-scale y-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 (*.f64 (pow.f64 a #s(literal 6 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))))) (+.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 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 y-scale y-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 (*.f64 (pow.f64 a #s(literal 6 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale)))))))))))))) |
(* (pow b 2) (+ (sqrt (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))))) (* b (+ (* -2 (* (/ (* (pow a 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (* (pow x-scale 4) (pow y-scale 4))) (sqrt (/ 1 (* (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (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))))))) (* b (+ (* 1/2 (* (sqrt (/ 1 (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))))))) (- (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 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)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (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 x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow a 8) (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2))) (* (pow x-scale 8) (* (pow y-scale 8) (* (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (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/2 (* (* b (- (* -4 (* (/ (* (pow a 4) (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 (pow a 3)) (* 2 (pow a 3))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* 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) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* 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))) (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)))))) (* -2 (* (/ (* (pow a 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 (pow a 3)) (* 2 (pow a 3))) (- (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 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)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (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 x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow a 8) (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2))) (* (pow x-scale 8) (* (pow y-scale 8) (* (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (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))))))))))) (* (pow x-scale 4) (* (pow y-scale 4) (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (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)))))))) (sqrt (/ 1 (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* 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)))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))))))))))))))) |
(*.f64 (*.f64 b b) (+.f64 (sqrt.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 y-scale y-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 (*.f64 (pow.f64 a #s(literal 6 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale)))))) (*.f64 b (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 y-scale y-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 (*.f64 (pow.f64 a #s(literal 6 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))))) (+.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 b (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 y-scale y-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 (*.f64 (pow.f64 a #s(literal 6 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))))))) (+.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.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 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64)) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 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 x-scale x-scale) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 8 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64)) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 8 binary64)) (pow.f64 y-scale #s(literal 8 binary64))) (*.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 y-scale y-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 (*.f64 (pow.f64 a #s(literal 6 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))))) (+.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 b (*.f64 (+.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a #s(literal 0 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/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 a (*.f64 a a)) #s(literal 0 binary64))) (-.f64 (+.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64)) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 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 x-scale x-scale) (*.f64 y-scale y-scale)) (+.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 (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 2 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64))) (+.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.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 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64)) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 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 x-scale x-scale) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 8 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64)) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 8 binary64)) (pow.f64 y-scale #s(literal 8 binary64))) (*.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 y-scale y-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 (*.f64 (pow.f64 a #s(literal 6 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))))) (+.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 (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 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 y-scale y-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 (*.f64 (pow.f64 a #s(literal 6 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 y-scale y-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 (*.f64 (pow.f64 a #s(literal 6 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale)))))))))))))))) |
(* (pow b 3) (sqrt (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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))))))) |
(*.f64 (*.f64 b (*.f64 b b)) (sqrt.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 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) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) |
(* (pow b 3) (+ (sqrt (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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)))))) (* -2 (* (/ (* (pow a 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (* b (* (pow x-scale 4) (pow y-scale 4)))) (sqrt (/ 1 (* (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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))))) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 b (*.f64 b b)) (+.f64 (sqrt.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 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) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 (*.f64 b (pow.f64 x-scale #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 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) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 x-scale x-scale) (*.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 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.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) (+ (sqrt (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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)))))) (+ (* -2 (* (/ (* (pow a 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (* b (* (pow x-scale 4) (pow y-scale 4)))) (sqrt (/ 1 (* (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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))))) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) (* 1/2 (* (/ (- (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/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)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))))) (* 4 (/ (* (pow a 8) (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 8) (* (pow y-scale 8) (* (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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))))) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (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 (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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)))))))))))) |
(*.f64 (*.f64 b (*.f64 b b)) (+.f64 (sqrt.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 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) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 (*.f64 b (pow.f64 x-scale #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 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) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 x-scale x-scale) (*.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 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 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 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 y-scale y-scale)) (*.f64 #s(literal -1/2 binary64) (*.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 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 a #s(literal 0 binary64)) (*.f64 a #s(literal 0 binary64))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 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 (pow.f64 a #s(literal 6 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 a #s(literal 8 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 a #s(literal 0 binary64)) (*.f64 a #s(literal 0 binary64)))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 8 binary64)) (pow.f64 y-scale #s(literal 8 binary64))) (*.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 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) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 x-scale x-scale) (*.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 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.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 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 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) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))) (*.f64 b b)))))) |
(* (pow b 3) (+ (sqrt (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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)))))) (+ (* -2 (* (/ (* (pow a 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (* b (* (pow x-scale 4) (pow y-scale 4)))) (sqrt (/ 1 (* (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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))))) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) (+ (* 1/2 (* (/ (- (* -4 (* (/ (* (pow a 4) (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 a) (* 2 a)) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (* (pow x-scale 2) (* (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)))))))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 a 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 a) (* 2 a)) (- (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/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)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))))) (* 4 (/ (* (pow a 8) (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 8) (* (pow y-scale 8) (* (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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))))) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))))) (* (pow x-scale 4) (* (pow y-scale 4) (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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)))))))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (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 3)) (sqrt (/ 1 (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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))))))))) (* 1/2 (* (/ (- (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/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)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))))) (* 4 (/ (* (pow a 8) (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 8) (* (pow y-scale 8) (* (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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))))) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (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 (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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))))))))))))) |
(*.f64 (*.f64 b (*.f64 b b)) (+.f64 (sqrt.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 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) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 (*.f64 b (pow.f64 x-scale #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 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) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 x-scale x-scale) (*.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 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 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 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a #s(literal 0 binary64))) (-.f64 (+.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 a #s(literal 0 binary64)) (*.f64 a #s(literal 0 binary64))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 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 x-scale x-scale) (*.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 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.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)))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a #s(literal 0 binary64))) (-.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 y-scale y-scale)) (*.f64 #s(literal -1/2 binary64) (*.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 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 a #s(literal 0 binary64)) (*.f64 a #s(literal 0 binary64))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 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 (pow.f64 a #s(literal 6 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 a #s(literal 8 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 a #s(literal 0 binary64)) (*.f64 a #s(literal 0 binary64)))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 8 binary64)) (pow.f64 y-scale #s(literal 8 binary64))) (*.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 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) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 x-scale x-scale) (*.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 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.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)))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 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) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 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) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))) (*.f64 b (*.f64 b b))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 y-scale y-scale)) (*.f64 #s(literal -1/2 binary64) (*.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 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 a #s(literal 0 binary64)) (*.f64 a #s(literal 0 binary64))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 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 (pow.f64 a #s(literal 6 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 a #s(literal 8 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 a #s(literal 0 binary64)) (*.f64 a #s(literal 0 binary64)))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 8 binary64)) (pow.f64 y-scale #s(literal 8 binary64))) (*.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 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) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 x-scale x-scale) (*.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 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.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 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 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) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))) (*.f64 b b))))))) |
(* -1 (* (pow b 3) (sqrt (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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)))))))) |
(*.f64 (*.f64 #s(literal -1 binary64) (*.f64 b (*.f64 b b))) (sqrt.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 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) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) |
(* -1 (* (pow b 3) (+ (sqrt (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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)))))) (* 2 (* (/ (* (pow a 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (* b (* (pow x-scale 4) (pow y-scale 4)))) (sqrt (/ 1 (* (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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))))) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 #s(literal -1 binary64) (*.f64 b (*.f64 b b))) (+.f64 (sqrt.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 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) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 (*.f64 b (pow.f64 x-scale #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 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) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 x-scale x-scale) (*.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 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.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) (+ (sqrt (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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)))))) (* -1 (/ (+ (* -2 (* (/ (* (pow a 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (* (pow x-scale 4) (pow y-scale 4))) (sqrt (/ 1 (* (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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))))) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) (* -1/2 (* (/ (- (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/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)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))))) (* 4 (/ (* (pow a 8) (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 8) (* (pow y-scale 8) (* (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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))))) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))))) b) (sqrt (/ 1 (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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)))))))))) b))))) |
(*.f64 (*.f64 #s(literal -1 binary64) (*.f64 b (*.f64 b b))) (+.f64 (sqrt.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 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) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 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) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 x-scale x-scale) (*.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 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 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 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 y-scale y-scale)) (*.f64 #s(literal -1/2 binary64) (*.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 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 a #s(literal 0 binary64)) (*.f64 a #s(literal 0 binary64))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 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 (pow.f64 a #s(literal 6 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 a #s(literal 8 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 a #s(literal 0 binary64)) (*.f64 a #s(literal 0 binary64)))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 8 binary64)) (pow.f64 y-scale #s(literal 8 binary64))) (*.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 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) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 x-scale x-scale) (*.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 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.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 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 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) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))) b))) b)))) |
(* -1 (* (pow b 3) (+ (sqrt (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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)))))) (* -1 (/ (+ (* -2 (* (/ (* (pow a 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (* (pow x-scale 4) (pow y-scale 4))) (sqrt (/ 1 (* (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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))))) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) (* -1 (/ (+ (* -1/2 (* (/ (- (* -4 (* (/ (* (pow a 4) (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow x-scale 2) (pow y-scale 2))) (* 1/2 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 a) (* 2 a)) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))) (* (pow x-scale 2) (* (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)))))))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 a 4) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (+ (* -2 a) (* 2 a)) (- (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/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)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))))) (* 4 (/ (* (pow a 8) (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 8) (* (pow y-scale 8) (* (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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))))) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))))) (* (pow x-scale 4) (* (pow y-scale 4) (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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)))))))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) b) (sqrt (/ 1 (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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))))))))) (* 1/2 (* (sqrt (/ 1 (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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))))))) (- (+ (* 8 (/ (* (pow a 4) (- (/ (* (pow a 2) (+ 1/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)))) (- (+ (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (* (pow y-scale 4) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 8 (/ (* (pow a 6) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))))) (* 4 (/ (* (pow a 8) (* (pow (sin (* 1/90 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2))) (* (pow x-scale 8) (* (pow y-scale 8) (* (+ (* 8 (/ (* (pow a 4) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2)))) (* 8 (/ (* (pow a 4) (- (* 1/2 (/ 1 (pow y-scale 2))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (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))))) (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))))))) b))) b))))) |
(*.f64 (*.f64 #s(literal -1 binary64) (*.f64 b (*.f64 b b))) (+.f64 (sqrt.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 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) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 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) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 x-scale x-scale) (*.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 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))))) (neg.f64 (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a #s(literal 0 binary64))) (-.f64 (+.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 a #s(literal 0 binary64)) (*.f64 a #s(literal 0 binary64))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 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 x-scale x-scale) (*.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 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.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)))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a #s(literal 0 binary64))) (-.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 y-scale y-scale)) (*.f64 #s(literal -1/2 binary64) (*.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 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 a #s(literal 0 binary64)) (*.f64 a #s(literal 0 binary64))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 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 (pow.f64 a #s(literal 6 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 a #s(literal 8 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 a #s(literal 0 binary64)) (*.f64 a #s(literal 0 binary64)))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 8 binary64)) (pow.f64 y-scale #s(literal 8 binary64))) (*.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 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) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 x-scale x-scale) (*.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 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.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)))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 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) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 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) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))) b)) (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 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) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))) (-.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 y-scale y-scale)) (*.f64 #s(literal -1/2 binary64) (*.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 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 a #s(literal 0 binary64)) (*.f64 a #s(literal 0 binary64))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 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 (pow.f64 a #s(literal 6 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 a #s(literal 8 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 a #s(literal 0 binary64)) (*.f64 a #s(literal 0 binary64)))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 8 binary64)) (pow.f64 y-scale #s(literal 8 binary64))) (*.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 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) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 x-scale x-scale) (*.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 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.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))) b)))) |
(* (/ 1 (pow x-scale 2)) (sqrt (+ (* -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)))))))))) (pow y-scale 2))) (* 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)))))))))) (pow y-scale 2)))))) |
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (sqrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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 y-scale y-scale)) #s(literal 0 binary64)))) |
(/ (+ (sqrt (+ (* -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)))))))))) (pow y-scale 2))) (* 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)))))))))) (pow y-scale 2))))) (* 4 (* (/ (* (pow a 4) (* (pow b 4) (* (pow x-scale 2) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (pow 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)) (sqrt (/ 1 (+ (* -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)))))))))) (pow y-scale 2))) (* 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)))))))))) (pow y-scale 2))))))))) (pow x-scale 2)) |
(/.f64 (+.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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 y-scale y-scale)) #s(literal 0 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.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 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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 y-scale y-scale)) #s(literal 0 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) |
(/ (+ (sqrt (+ (* -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)))))))))) (pow y-scale 2))) (* 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)))))))))) (pow y-scale 2))))) (* (pow x-scale 2) (+ (* 1/2 (* (* (pow x-scale 2) (- (* -4 (/ (* (pow a 4) (* (pow b 4) (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))))) (* (pow y-scale 2) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 16 (/ (* (pow a 8) (* (pow b 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) 2))) (* (pow y-scale 4) (+ (* -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)))))))))) (pow y-scale 2))) (* 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)))))))))) (pow y-scale 2))))))))) (sqrt (/ 1 (+ (* -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)))))))))) (pow y-scale 2))) (* 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)))))))))) (pow y-scale 2)))))))) (* 4 (* (/ (* (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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (pow 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)) (sqrt (/ 1 (+ (* -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)))))))))) (pow y-scale 2))) (* 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)))))))))) (pow y-scale 2))))))))))) (pow x-scale 2)) |
(/.f64 (+.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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 y-scale y-scale)) #s(literal 0 binary64))) (*.f64 (*.f64 x-scale x-scale) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x-scale x-scale) (*.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 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 y-scale) (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 #s(literal -16 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 b #s(literal 8 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 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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 y-scale y-scale)) #s(literal 0 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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 y-scale y-scale)) #s(literal 0 binary64))))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.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 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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 y-scale y-scale)) #s(literal 0 binary64))))) (*.f64 y-scale y-scale)))))) (*.f64 x-scale x-scale)) |
(/ (+ (sqrt (+ (* -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)))))))))) (pow y-scale 2))) (* 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)))))))))) (pow y-scale 2))))) (* (pow x-scale 2) (+ (* 4 (* (/ (* (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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (pow 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)) (sqrt (/ 1 (+ (* -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)))))))))) (pow y-scale 2))) (* 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)))))))))) (pow y-scale 2)))))))) (* (pow x-scale 2) (+ (* 1/2 (* (sqrt (/ 1 (+ (* -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)))))))))) (pow y-scale 2))) (* 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)))))))))) (pow y-scale 2)))))) (- (* -4 (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))))) (* (pow y-scale 2) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 16 (/ (* (pow a 8) (* (pow b 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) 2))) (* (pow y-scale 4) (+ (* -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)))))))))) (pow y-scale 2))) (* 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)))))))))) (pow y-scale 2)))))))))) (* 1/2 (* (* (pow x-scale 2) (- (* 2 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 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)))))))) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (- (* -4 (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))))) (* (pow y-scale 2) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 16 (/ (* (pow a 8) (* (pow b 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))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) 2))) (* (pow y-scale 4) (+ (* -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)))))))))) (pow y-scale 2))) (* 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)))))))))) (pow y-scale 2)))))))) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) (+ (* (pow 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) (+ (* -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)))))))))) (pow y-scale 2))) (* 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)))))))))) (pow y-scale 2))))))))) (sqrt (/ 1 (+ (* -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)))))))))) (pow y-scale 2))) (* 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)))))))))) (pow y-scale 2))))))))))))) (pow x-scale 2)) |
(/.f64 (+.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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 y-scale y-scale)) #s(literal 0 binary64))) (*.f64 (*.f64 x-scale x-scale) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.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 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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 y-scale y-scale)) #s(literal 0 binary64))))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 x-scale x-scale) (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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 y-scale y-scale)) #s(literal 0 binary64)))) (+.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) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 y-scale) (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 #s(literal -16 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 b #s(literal 8 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 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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 y-scale y-scale)) #s(literal 0 binary64))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 (+.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 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 y-scale) (pow.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(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 -4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.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 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 y-scale) (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 #s(literal -16 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 b #s(literal 8 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 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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 y-scale y-scale)) #s(literal 0 binary64)))))) (+.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 y-scale) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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 y-scale y-scale)) #s(literal 0 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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 y-scale y-scale)) #s(literal 0 binary64)))))))))))) (*.f64 x-scale x-scale)) |
(* (/ 1 (pow x-scale 2)) (sqrt (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (pow y-scale 2)))))) |
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 y-scale y-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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 y-scale y-scale))))) |
(/ (+ (sqrt (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (pow y-scale 2))))) (* -2 (* (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (pow y-scale 2))))))))) (pow x-scale 2)) |
(/.f64 (+.f64 (sqrt.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 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 y-scale y-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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 y-scale y-scale)))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 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 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 #s(literal -4 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 y-scale y-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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 y-scale y-scale)))))) (*.f64 (*.f64 (*.f64 x-scale 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 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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)) |
(/ (+ (sqrt (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (pow y-scale 2))))) (+ (* -2 (* (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (pow y-scale 2)))))))) (* 1/2 (* (/ (- (* 2 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 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))) 3)))) (* 4 (/ (* (pow a 8) (* (pow b 8) (pow (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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 y-scale 4) (* (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (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)))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (pow y-scale 2)))))))))) (pow x-scale 2)) |
(/.f64 (+.f64 (+.f64 (sqrt.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 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 y-scale y-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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 y-scale y-scale)))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 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 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 #s(literal -4 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 y-scale y-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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 y-scale y-scale)))))) (*.f64 (*.f64 (*.f64 x-scale 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 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 #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 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 y-scale y-scale) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 -4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 b #s(literal 8 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 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 y-scale #s(literal 4 binary64)) (*.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 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 y-scale y-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -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 x-scale #s(literal 4 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 y-scale y-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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 y-scale y-scale))))))) (*.f64 x-scale x-scale)) |
(/ (+ (sqrt (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (pow y-scale 2))))) (+ (* -2 (* (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (pow y-scale 2)))))))) (+ (* 1/2 (* (/ (- (* 2 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 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))) 3)))) (* 4 (/ (* (pow a 8) (* (pow b 8) (pow (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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 y-scale 4) (* (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (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)))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (pow y-scale 2)))))))) (* 1/2 (* (/ (- (* 4 (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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 y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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 4) (* (pow b 4) (* (- (* 2 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 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))) 3)))) (* 4 (/ (* (pow a 8) (* (pow b 8) (pow (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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 y-scale 4) (* (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (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)))))) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* (pow y-scale 2) (* (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (pow y-scale 2))))))))))) (pow x-scale 2)) |
(/.f64 (+.f64 (sqrt.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 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 y-scale y-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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 y-scale y-scale)))) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 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 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 #s(literal -4 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 y-scale y-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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 y-scale y-scale)))))) (*.f64 (*.f64 (*.f64 x-scale 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 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (*.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 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 y-scale y-scale) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 -4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 b #s(literal 8 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 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 y-scale #s(literal 4 binary64)) (*.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 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 y-scale y-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -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 #s(literal -4 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 y-scale y-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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 y-scale y-scale)))))) (pow.f64 x-scale #s(literal 4 binary64))) (/.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 (/.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 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 y-scale y-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (+.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 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 y-scale y-scale) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 -4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 b #s(literal 8 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 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 y-scale #s(literal 4 binary64)) (*.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 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 y-scale y-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 y-scale y-scale) (*.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 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 y-scale y-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 y-scale y-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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 y-scale y-scale)))))) (pow.f64 x-scale #s(literal 6 binary64))))))) (*.f64 x-scale x-scale)) |
(* (/ 1 (pow x-scale 2)) (sqrt (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (pow y-scale 2)))))) |
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 y-scale y-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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 y-scale y-scale))))) |
(/ (+ (sqrt (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (pow y-scale 2))))) (* -2 (* (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (pow y-scale 2))))))))) (pow x-scale 2)) |
(/.f64 (+.f64 (sqrt.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 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 y-scale y-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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 y-scale y-scale)))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 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 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 #s(literal -4 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 y-scale y-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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 y-scale y-scale)))))) (*.f64 (*.f64 (*.f64 x-scale 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 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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)) |
(/ (+ (sqrt (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (pow y-scale 2))))) (+ (* -2 (* (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (pow y-scale 2)))))))) (* 1/2 (* (/ (- (* 2 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 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))) 3)))) (* 4 (/ (* (pow a 8) (* (pow b 8) (pow (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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 y-scale 4) (* (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (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)))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (pow y-scale 2)))))))))) (pow x-scale 2)) |
(/.f64 (+.f64 (+.f64 (sqrt.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 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 y-scale y-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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 y-scale y-scale)))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 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 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 #s(literal -4 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 y-scale y-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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 y-scale y-scale)))))) (*.f64 (*.f64 (*.f64 x-scale 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 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 #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 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 y-scale y-scale) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 -4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 b #s(literal 8 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 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 y-scale #s(literal 4 binary64)) (*.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 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 y-scale y-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -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 x-scale #s(literal 4 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 y-scale y-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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 y-scale y-scale))))))) (*.f64 x-scale x-scale)) |
(/ (+ (sqrt (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (pow y-scale 2))))) (+ (* -2 (* (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (pow y-scale 2)))))))) (+ (* 1/2 (* (/ (- (* 2 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 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))) 3)))) (* 4 (/ (* (pow a 8) (* (pow b 8) (pow (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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 y-scale 4) (* (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (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)))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (pow y-scale 2)))))))) (* 1/2 (* (/ (- (* 4 (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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 y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* 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 4) (* (pow b 4) (* (- (* 2 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 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))) 3)))) (* 4 (/ (* (pow a 8) (* (pow b 8) (pow (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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 y-scale 4) (* (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (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)))))) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))) 2) (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* (pow y-scale 2) (* (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow y-scale 2))))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* 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)))))))))) (pow y-scale 2))))))))))) (pow x-scale 2)) |
(/.f64 (+.f64 (sqrt.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 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 y-scale y-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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 y-scale y-scale)))) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 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 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 #s(literal -4 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 y-scale y-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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 y-scale y-scale)))))) (*.f64 (*.f64 (*.f64 x-scale 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 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (*.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 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 y-scale y-scale) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 -4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 b #s(literal 8 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 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 y-scale #s(literal 4 binary64)) (*.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 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 y-scale y-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -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 #s(literal -4 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 y-scale y-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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 y-scale y-scale)))))) (pow.f64 x-scale #s(literal 4 binary64))) (/.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 (/.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 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 y-scale y-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (+.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 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 y-scale y-scale) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 -4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 b #s(literal 8 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 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 y-scale #s(literal 4 binary64)) (*.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 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 y-scale y-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 y-scale y-scale) (*.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 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 y-scale y-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 y-scale y-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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 y-scale y-scale)))))) (pow.f64 x-scale #s(literal 6 binary64))))))) (*.f64 x-scale x-scale)) |
(* (/ 1 y-scale) (sqrt (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))))) (* (pow x-scale 2) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 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)))))))))) (pow x-scale 4)))))) |
(*.f64 (/.f64 #s(literal 1 binary64) y-scale) (sqrt.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 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 x-scale x-scale) (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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)))))))))) (pow.f64 x-scale #s(literal 4 binary64)))))) |
(/ (+ (sqrt (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))))) (* (pow x-scale 2) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 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)))))))))) (pow x-scale 4))))) (* -2 (* (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))))) (* (pow x-scale 2) (+ (* (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 (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))))) (* (pow x-scale 2) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 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)))))))))) (pow x-scale 4))))))))) y-scale) |
(/.f64 (+.f64 (sqrt.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 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 x-scale x-scale) (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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)))))))))) (pow.f64 x-scale #s(literal 4 binary64))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.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) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 #s(literal -4 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 x-scale x-scale) (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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)))))))))) (pow.f64 x-scale #s(literal 4 binary64))))))) (*.f64 (*.f64 x-scale x-scale) (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.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) |
(/ (+ (sqrt (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))))) (* (pow x-scale 2) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 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)))))))))) (pow x-scale 4))))) (* (pow y-scale 2) (+ (* -2 (* (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))))) (* (pow x-scale 2) (+ (* (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 (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))))) (* (pow x-scale 2) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 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)))))))))) (pow x-scale 4)))))))) (* 1/2 (* (* (pow y-scale 2) (- (* 2 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 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)))))))) 3)))) (* 4 (/ (* (pow a 8) (* (pow b 8) (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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow 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 x-scale 4) (* (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))))) (* (pow x-scale 2) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 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)))))))))) (pow x-scale 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))))))) (sqrt (/ 1 (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))))) (* (pow x-scale 2) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 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)))))))))) (pow x-scale 4))))))))))) y-scale) |
(/.f64 (+.f64 (sqrt.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 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 x-scale x-scale) (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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)))))))))) (pow.f64 x-scale #s(literal 4 binary64))))) (*.f64 (*.f64 y-scale y-scale) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.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) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 #s(literal -4 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 x-scale x-scale) (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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)))))))))) (pow.f64 x-scale #s(literal 4 binary64))))))) (*.f64 (*.f64 x-scale x-scale) (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 y-scale y-scale) (*.f64 (+.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 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 x-scale) (pow.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(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 -4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 b #s(literal 8 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 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 x-scale #s(literal 4 binary64)) (*.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 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 x-scale x-scale) (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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)))))))))) (pow.f64 x-scale #s(literal 4 binary64)))) (pow.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/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 #s(literal -4 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 x-scale x-scale) (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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)))))))))) (pow.f64 x-scale #s(literal 4 binary64)))))))))))) y-scale) |
(/ (+ (sqrt (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))))) (* (pow x-scale 2) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 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)))))))))) (pow x-scale 4))))) (* (pow y-scale 2) (+ (* -2 (* (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2)))))) (* (pow x-scale 2) (+ (* (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 (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))))) (* (pow x-scale 2) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 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)))))))))) (pow x-scale 4)))))))) (* (pow y-scale 2) (+ (* 1/2 (* (sqrt (/ 1 (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))))) (* (pow x-scale 2) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 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)))))))))) (pow x-scale 4)))))) (- (* 2 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 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)))))))) 3)))) (* 4 (/ (* (pow a 8) (* (pow b 8) (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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow 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 x-scale 4) (* (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))))) (* (pow x-scale 2) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 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)))))))))) (pow x-scale 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/2 (* (* (pow y-scale 2) (- (* 4 (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow 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 x-scale 2) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* -2 (/ (* (pow a 4) (* (pow b 4) (* (- (* 2 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 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)))))))) 3)))) (* 4 (/ (* (pow a 8) (* (pow b 8) (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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow 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 x-scale 4) (* (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))))) (* (pow x-scale 2) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 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)))))))))) (pow x-scale 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)))))) (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2))))))) (* (pow x-scale 2) (* (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))))) (* (pow x-scale 2) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 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)))))))))) (pow x-scale 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)))))))))))))) (sqrt (/ 1 (+ (* -4 (/ (* (pow a 4) (* (pow b 4) (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))))) (* (pow x-scale 2) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 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)))))))))) (pow x-scale 4))))))))))))) y-scale) |
(/.f64 (+.f64 (sqrt.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 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 x-scale x-scale) (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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)))))))))) (pow.f64 x-scale #s(literal 4 binary64))))) (*.f64 (*.f64 y-scale y-scale) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.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) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 #s(literal -4 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 x-scale x-scale) (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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)))))))))) (pow.f64 x-scale #s(literal 4 binary64))))))) (*.f64 (*.f64 x-scale x-scale) (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 x-scale x-scale) (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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)))))))))) (pow.f64 x-scale #s(literal 4 binary64)))))) (+.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 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 x-scale) (pow.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(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 -4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 b #s(literal 8 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 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 x-scale #s(literal 4 binary64)) (*.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 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 x-scale x-scale) (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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)))))))))) (pow.f64 x-scale #s(literal 4 binary64)))) (pow.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 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 y-scale) (*.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 (/.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 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 x-scale x-scale) (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.f64 (+.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 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 x-scale) (pow.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(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 -4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 b #s(literal 8 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 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 x-scale #s(literal 4 binary64)) (*.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 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 x-scale x-scale) (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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)))))))))) (pow.f64 x-scale #s(literal 4 binary64)))) (pow.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 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 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 x-scale) (*.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 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 x-scale x-scale) (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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)))))))))) (pow.f64 x-scale #s(literal 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))))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 x-scale x-scale) (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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)))))))))) (pow.f64 x-scale #s(literal 4 binary64)))))))))))))) y-scale) |
(* (/ 1 y-scale) (sqrt (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4)))))) |
(*.f64 (/.f64 #s(literal 1 binary64) y-scale) (sqrt.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 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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)))))))))) (pow.f64 x-scale #s(literal 4 binary64)))))) |
(/ (+ (sqrt (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4))))) (* 4 (* (/ (* (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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (pow y-scale 2))) (sqrt (/ 1 (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4))))))))) y-scale) |
(/.f64 (+.f64 (sqrt.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 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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)))))))))) (pow.f64 x-scale #s(literal 4 binary64))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.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 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 x-scale) (*.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.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 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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)))))))))) (pow.f64 x-scale #s(literal 4 binary64)))))))) y-scale) |
(/ (+ (sqrt (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4))))) (+ (* 1/2 (* (/ (- (* -4 (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) (* 16 (/ (* (pow a 8) (* (pow b 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)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) 2))) (* (pow x-scale 4) (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4)))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4)))))))) (* 4 (* (/ (* (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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (pow y-scale 2))) (sqrt (/ 1 (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4)))))))))) y-scale) |
(/.f64 (+.f64 (sqrt.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 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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)))))))))) (pow.f64 x-scale #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.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) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 x-scale x-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (*.f64 #s(literal -16 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 b #s(literal 8 binary64))) (pow.f64 (+.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 (pow.f64 x-scale #s(literal 4 binary64)) (+.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 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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)))))))))) (pow.f64 x-scale #s(literal 4 binary64)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.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 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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)))))))))) (pow.f64 x-scale #s(literal 4 binary64))))))) (pow.f64 y-scale #s(literal 4 binary64)))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.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 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 x-scale) (*.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.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 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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)))))))))) (pow.f64 x-scale #s(literal 4 binary64))))))))) y-scale) |
(/ (+ (sqrt (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4))))) (+ (* 1/2 (* (/ (- (* -4 (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) (* 16 (/ (* (pow a 8) (* (pow b 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)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) 2))) (* (pow x-scale 4) (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4)))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4)))))))) (+ (* 1/2 (* (/ (- (* 2 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 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))) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (- (* -4 (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) (* 16 (/ (* (pow a 8) (* (pow b 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)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) 2))) (* (pow x-scale 4) (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4)))))))) (pow y-scale 6)) (sqrt (/ 1 (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4)))))))) (* 4 (* (/ (* (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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (pow y-scale 2))) (sqrt (/ 1 (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4))))))))))) y-scale) |
(/.f64 (+.f64 (+.f64 (sqrt.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 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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)))))))))) (pow.f64 x-scale #s(literal 4 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.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) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 x-scale x-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (*.f64 #s(literal -16 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 b #s(literal 8 binary64))) (pow.f64 (+.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 (pow.f64 x-scale #s(literal 4 binary64)) (+.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 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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)))))))))) (pow.f64 x-scale #s(literal 4 binary64)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.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 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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)))))))))) (pow.f64 x-scale #s(literal 4 binary64))))))) (pow.f64 y-scale #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (+.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 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 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 3 binary64)))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.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) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 x-scale x-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (*.f64 #s(literal -16 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 b #s(literal 8 binary64))) (pow.f64 (+.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 (pow.f64 x-scale #s(literal 4 binary64)) (+.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 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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)))))))))) (pow.f64 x-scale #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 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 x-scale) (+.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 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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)))))))))) (pow.f64 x-scale #s(literal 4 binary64)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.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 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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)))))))))) (pow.f64 x-scale #s(literal 4 binary64))))))) (pow.f64 y-scale #s(literal 6 binary64)))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.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 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 x-scale) (*.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.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 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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)))))))))) (pow.f64 x-scale #s(literal 4 binary64))))))))) y-scale) |
(* -1 (* (/ 1 y-scale) (sqrt (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4))))))) |
(*.f64 (*.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) y-scale)) (sqrt.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 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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)))))))))) (pow.f64 x-scale #s(literal 4 binary64)))))) |
(* -1 (/ (+ (sqrt (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4))))) (* 4 (* (/ (* (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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (pow y-scale 2))) (sqrt (/ 1 (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4))))))))) y-scale)) |
(neg.f64 (/.f64 (+.f64 (sqrt.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 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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)))))))))) (pow.f64 x-scale #s(literal 4 binary64))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.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 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 x-scale) (*.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.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 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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)))))))))) (pow.f64 x-scale #s(literal 4 binary64)))))))) y-scale)) |
(* -1 (/ (+ (sqrt (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4))))) (+ (* 1/2 (* (/ (- (* -4 (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) (* 16 (/ (* (pow a 8) (* (pow b 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)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) 2))) (* (pow x-scale 4) (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4)))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4)))))))) (* 4 (* (/ (* (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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (pow y-scale 2))) (sqrt (/ 1 (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4)))))))))) y-scale)) |
(neg.f64 (/.f64 (+.f64 (sqrt.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 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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)))))))))) (pow.f64 x-scale #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.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) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 x-scale x-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (*.f64 #s(literal -16 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 b #s(literal 8 binary64))) (pow.f64 (+.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 (pow.f64 x-scale #s(literal 4 binary64)) (+.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 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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)))))))))) (pow.f64 x-scale #s(literal 4 binary64)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.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 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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)))))))))) (pow.f64 x-scale #s(literal 4 binary64))))))) (pow.f64 y-scale #s(literal 4 binary64)))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.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 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 x-scale) (*.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.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 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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)))))))))) (pow.f64 x-scale #s(literal 4 binary64))))))))) y-scale)) |
(* -1 (/ (+ (sqrt (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4))))) (+ (* 1/2 (* (/ (- (* -4 (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) (* 16 (/ (* (pow a 8) (* (pow b 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)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) 2))) (* (pow x-scale 4) (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4)))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4)))))))) (+ (* 1/2 (* (/ (- (* 2 (/ (* (pow a 4) (* (pow b 4) (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 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))) 3)))) (* 4 (/ (* (pow a 4) (* (pow b 4) (* (- (* -4 (/ (* (pow a 4) (* (pow b 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) 2) (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) 2)))))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) (* 16 (/ (* (pow a 8) (* (pow b 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)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))) 2))) (* (pow x-scale 4) (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4)))))))) (pow y-scale 6)) (sqrt (/ 1 (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4)))))))) (* 4 (* (/ (* (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 (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (pow y-scale 2))) (sqrt (/ 1 (+ (* -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))))) (pow x-scale 2))) (* 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)))))))))) (pow x-scale 4))))))))))) y-scale)) |
(neg.f64 (/.f64 (+.f64 (+.f64 (sqrt.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 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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)))))))))) (pow.f64 x-scale #s(literal 4 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.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) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 x-scale x-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (*.f64 #s(literal -16 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 b #s(literal 8 binary64))) (pow.f64 (+.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 (pow.f64 x-scale #s(literal 4 binary64)) (+.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 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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)))))))))) (pow.f64 x-scale #s(literal 4 binary64)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.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 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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)))))))))) (pow.f64 x-scale #s(literal 4 binary64))))))) (pow.f64 y-scale #s(literal 4 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (+.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 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 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 3 binary64)))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (*.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) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 x-scale x-scale) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (*.f64 #s(literal -16 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 a #s(literal 8 binary64)) (pow.f64 b #s(literal 8 binary64))) (pow.f64 (+.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 (pow.f64 x-scale #s(literal 4 binary64)) (+.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 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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)))))))))) (pow.f64 x-scale #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 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 x-scale) (+.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 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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)))))))))) (pow.f64 x-scale #s(literal 4 binary64)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.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 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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)))))))))) (pow.f64 x-scale #s(literal 4 binary64))))))) (pow.f64 y-scale #s(literal 6 binary64)))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.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 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b 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 x-scale) (*.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.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 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 8 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 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)))))))))) (pow.f64 x-scale #s(literal 4 binary64))))))))) y-scale)) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) |
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.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 y-scale y-scale)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) |
(* x-scale (+ (* -1/16 (* (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (sqrt (/ 1 (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (* (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 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) #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 (*.f64 b b) (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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 b b) (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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #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)))))))))) |
(* x-scale (+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (* (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 b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 6) (pow (cos (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (pow (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) 2) (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))))) (sqrt (/ 1 (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))) (* -1/16 (* (/ (* y-scale (* (sqrt 8) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (sqrt (/ 1 (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (* (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 b b) (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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #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 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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 b #s(literal 6 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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) #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 (pow.f64 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 (*.f64 (*.f64 b b) (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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #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 (*.f64 b b) (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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #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/16 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 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 (*.f64 b b) (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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) |
(* x-scale (+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* (pow x-scale 2) (+ (* -1/16 (* (/ (* y-scale (* (sqrt 8) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (sqrt (/ 1 (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))) (* (pow x-scale 2) (+ (* -1/8 (* (* y-scale (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 6) (pow (cos (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (pow (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) 2) (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))))) (sqrt (/ 1 (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (* (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 b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 8) (pow (cos (* 1/180 (* angle (PI)))) 8)))) (* 1/4 (/ (pow (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) 2) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* 1/4 (/ (* (+ (* -1/4 (/ (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 6) (pow (cos (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (pow (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) 2) (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))))) (sqrt (/ 1 (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (* (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 b b) (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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #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 x-scale x-scale) (+.f64 (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 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 (*.f64 b b) (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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (*.f64 (*.f64 b b) (pow.f64 (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 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) #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 (pow.f64 b #s(literal 6 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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) #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 (pow.f64 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 (*.f64 (*.f64 b b) (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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #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 (*.f64 b b) (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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #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 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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 b #s(literal 8 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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) #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 (pow.f64 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 #s(literal 1/4 binary64) (*.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) #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 (pow.f64 b #s(literal 6 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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) #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 (pow.f64 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 (*.f64 (*.f64 b b) (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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #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 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) #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 (*.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 b b) (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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #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 (*.f64 b b) (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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))))))))))) |
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (*.f64 (*.f64 b b) (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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) |
(+ (* -1/16 (* (/ (* (pow y-scale 3) (* (sqrt 8) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 2) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (sqrt (/ 1 (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) |
(+.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 y-scale (*.f64 y-scale y-scale)) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (*.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (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 b b) (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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.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 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) |
(+ (* -1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* -1/4 (/ (* (pow y-scale 6) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (* (pow y-scale 4) (pow (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) 2)) (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))))) (pow x-scale 4)) (sqrt (/ 1 (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (+ (* -1/16 (* (/ (* (pow y-scale 3) (* (sqrt 8) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 2) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (sqrt (/ 1 (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) |
(+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 b #s(literal 6 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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) #s(literal 2 binary64)))) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (+.f64 (*.f64 (*.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/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 b b) (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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (pow.f64 x-scale #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 y-scale (*.f64 y-scale y-scale)) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (*.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (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 b b) (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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.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 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))))) |
(+ (* -1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* -1/2 (/ (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow y-scale 8) (* (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 8) (pow (sin (* 1/180 (* angle (PI)))) 8)))) (* 1/4 (/ (* (pow y-scale 4) (pow (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* 1/4 (/ (* (pow y-scale 2) (* (+ (* -1/4 (/ (* (pow y-scale 6) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (* (pow y-scale 4) (pow (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) 2)) (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))))) (pow x-scale 6)) (sqrt (/ 1 (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (+ (* -1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* -1/4 (/ (* (pow y-scale 6) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (* (pow y-scale 4) (pow (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) 2)) (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))))) (pow x-scale 4)) (sqrt (/ 1 (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (+ (* -1/16 (* (/ (* (pow y-scale 3) (* (sqrt 8) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 2) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (sqrt (/ 1 (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))) |
(+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) #s(literal 2 binary64))) (+.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 b #s(literal 8 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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 #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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (+.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 b #s(literal 6 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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) #s(literal 2 binary64)))) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (+.f64 (*.f64 (*.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/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 b b) (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)) (pow.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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))))) (*.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (+.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 b b) (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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (pow.f64 x-scale #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 b #s(literal 6 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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) #s(literal 2 binary64)))) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (+.f64 (*.f64 (*.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/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 b b) (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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (pow.f64 x-scale #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 y-scale (*.f64 y-scale y-scale)) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (*.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (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 b b) (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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.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 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))))) |
(* -1/4 (* (* y-scale (sqrt 8)) (sqrt (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) |
(*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (*.f64 (*.f64 b b) (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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) |
(+ (* -1/4 (* (* y-scale (sqrt 8)) (sqrt (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/16 (* (/ (* (pow y-scale 3) (* (sqrt 8) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 2) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (sqrt (/ 1 (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) |
(+.f64 (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.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 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 b b) (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 (*.f64 (*.f64 y-scale (*.f64 y-scale y-scale)) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (*.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (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 b b) (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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))))) |
(+ (* -1/4 (* (* y-scale (sqrt 8)) (sqrt (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (+ (* 1/16 (* (/ (* (pow y-scale 3) (* (sqrt 8) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 2) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (sqrt (/ 1 (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* -1/4 (/ (* (pow y-scale 6) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (* (pow y-scale 4) (pow (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) 2)) (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))))) (pow x-scale 4)) (sqrt (/ 1 (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))) |
(+.f64 (+.f64 (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.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 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 b b) (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 (*.f64 (*.f64 y-scale (*.f64 y-scale y-scale)) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (*.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (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 b b) (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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #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/8 binary64) (/.f64 (*.f64 (*.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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (+.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 b #s(literal 6 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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) #s(literal 2 binary64)))) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (+.f64 (*.f64 (*.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/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 b b) (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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (pow.f64 x-scale #s(literal 4 binary64))))) |
(+ (* -1/4 (* (* y-scale (sqrt 8)) (sqrt (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (+ (* 1/16 (* (/ (* (pow y-scale 3) (* (sqrt 8) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 2) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (sqrt (/ 1 (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* -1/2 (/ (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow y-scale 8) (* (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 8) (pow (sin (* 1/180 (* angle (PI)))) 8)))) (* 1/4 (/ (* (pow y-scale 4) (pow (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* 1/4 (/ (* (pow y-scale 2) (* (+ (* -1/4 (/ (* (pow y-scale 6) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (* (pow y-scale 4) (pow (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) 2)) (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))))) (pow x-scale 6)) (sqrt (/ 1 (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* -1/4 (/ (* (pow y-scale 6) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (* (pow y-scale 4) (pow (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) 2)) (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))))) (pow x-scale 4)) (sqrt (/ 1 (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))))) |
(+.f64 (+.f64 (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.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 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 b b) (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 (*.f64 (*.f64 y-scale (*.f64 y-scale y-scale)) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (*.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (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 b b) (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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #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/8 binary64) (+.f64 (/.f64 (*.f64 (*.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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) #s(literal 2 binary64))) (+.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 b #s(literal 8 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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 #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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (+.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 b #s(literal 6 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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) #s(literal 2 binary64)))) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (+.f64 (*.f64 (*.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/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 b b) (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)) (pow.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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))))) (*.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (+.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 b b) (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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (pow.f64 x-scale #s(literal 6 binary64))) (/.f64 (*.f64 (*.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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (+.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 b #s(literal 6 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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) #s(literal 2 binary64)))) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (+.f64 (*.f64 (*.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/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 b b) (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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (pow.f64 x-scale #s(literal 4 binary64)))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) |
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.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 x-scale x-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) |
(* y-scale (+ (* -1/16 (* (/ (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (/ 1 (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) |
(*.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 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (sqrt.f64 (/.f64 #s(literal 1 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 x-scale x-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) |
(* y-scale (+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* (pow y-scale 2) (+ (* -1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (pow (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) 2) (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))))) (sqrt (/ 1 (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (* -1/16 (* (/ (* x-scale (* (sqrt 8) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (/ 1 (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))))) |
(*.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 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 (*.f64 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 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))))) (sqrt.f64 (/.f64 #s(literal 1 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 x-scale x-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))))) (*.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.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 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 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 x-scale x-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))))))) |
(* y-scale (+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* (pow y-scale 2) (+ (* -1/16 (* (/ (* x-scale (* (sqrt 8) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (/ 1 (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (* (pow y-scale 2) (+ (* -1/8 (* (* x-scale (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (pow (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) 2) (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))))) (sqrt (/ 1 (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (* -1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (+ (* -1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 8) (pow (sin (* 1/180 (* angle (PI)))) 8)))) (* 1/4 (/ (pow (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) 2) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* 1/4 (/ (* (+ (* -1/4 (/ (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (pow (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) 2) (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))))) (sqrt (/ 1 (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))))))) |
(*.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 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 (*.f64 y-scale y-scale) (+.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.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 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 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 x-scale x-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (*.f64 (*.f64 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 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))))) (sqrt.f64 (/.f64 #s(literal 1 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 x-scale x-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 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 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.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 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 b #s(literal 8 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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (*.f64 (*.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 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 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 x-scale x-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))))))))))) |
(* 1/4 (* (* x-scale (sqrt 8)) (sqrt (- (* (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)))))))) |
(*.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 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #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/16 (* (/ (* (pow x-scale 3) (* (sqrt 8) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 2) (* (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (sqrt (/ 1 (- (* (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))))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (- (* (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))))))))) |
(+.f64 (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 x-scale (*.f64 x-scale x-scale)) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.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 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 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #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) (*.f64 y-scale y-scale)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 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 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #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 (* (/ (* x-scale (* (sqrt 8) (+ (* -1/4 (/ (* (pow x-scale 6) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 6) (pow (cos (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 4) (pow (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) 2)) (* (pow b 4) (* (pow (cos (* 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 b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))))) (pow y-scale 4)) (sqrt (/ 1 (- (* (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))))))))) (+ (* -1/16 (* (/ (* (pow x-scale 3) (* (sqrt 8) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 2) (* (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (sqrt (/ 1 (- (* (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))))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (- (* (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)))))))))) |
(+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (+.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.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 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 b #s(literal 6 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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.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 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 (pow.f64 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 (*.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 x-scale x-scale) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #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 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #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))))))))) (pow.f64 y-scale #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 x-scale (*.f64 x-scale x-scale)) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.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 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 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #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) (*.f64 y-scale y-scale)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 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 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #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 (* (/ (* x-scale (* (sqrt 8) (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 8) (* (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 8) (pow (cos (* 1/180 (* angle (PI)))) 8)))) (* 1/4 (/ (* (pow x-scale 4) (pow (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* 1/4 (/ (* (pow x-scale 2) (* (+ (* -1/4 (/ (* (pow x-scale 6) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 6) (pow (cos (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 4) (pow (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) 2)) (* (pow b 4) (* (pow (cos (* 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 b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 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 (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 y-scale 6)) (sqrt (/ 1 (- (* (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))))))))) (+ (* -1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* -1/4 (/ (* (pow x-scale 6) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 6) (pow (cos (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 4) (pow (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) 2)) (* (pow b 4) (* (pow (cos (* 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 b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))))) (pow y-scale 4)) (sqrt (/ 1 (- (* (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))))))))) (+ (* -1/16 (* (/ (* (pow x-scale 3) (* (sqrt 8) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 2) (* (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (sqrt (/ 1 (- (* (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))))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (- (* (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))))))))))) |
(+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x-scale x-scale) (+.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 8 binary64)) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 2 binary64))) (+.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.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 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 b #s(literal 8 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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.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 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 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 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (+.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.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 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 b #s(literal 6 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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.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 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 (pow.f64 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 (*.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 x-scale x-scale) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #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 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.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 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 (*.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 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #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 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #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))))))))) (pow.f64 y-scale #s(literal 6 binary64)))) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (+.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.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 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 b #s(literal 6 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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.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 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 (pow.f64 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 (*.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 x-scale x-scale) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #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 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #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))))))))) (pow.f64 y-scale #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 x-scale (*.f64 x-scale x-scale)) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.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 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 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #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) (*.f64 y-scale y-scale)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 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 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #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 (- (* (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)))))))) |
(*.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 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #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 (- (* (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)))))))) (* 1/16 (* (/ (* (pow x-scale 3) (* (sqrt 8) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 2) (* (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (sqrt (/ 1 (- (* (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)))))))))) |
(+.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 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #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/16 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 x-scale (*.f64 x-scale x-scale)) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.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 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 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #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) (*.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 (* (* x-scale (sqrt 8)) (sqrt (- (* (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)))))))) (+ (* 1/16 (* (/ (* (pow x-scale 3) (* (sqrt 8) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 2) (* (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (sqrt (/ 1 (- (* (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))))))))) (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* -1/4 (/ (* (pow x-scale 6) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 6) (pow (cos (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 4) (pow (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) 2)) (* (pow b 4) (* (pow (cos (* 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 b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))))) (pow y-scale 4)) (sqrt (/ 1 (- (* (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))))))))))) |
(+.f64 (+.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 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #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/16 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 x-scale (*.f64 x-scale x-scale)) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.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 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 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #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) (*.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 x-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (+.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.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 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 b #s(literal 6 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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.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 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 (pow.f64 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 (*.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 x-scale x-scale) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #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 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #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))))))))) (pow.f64 y-scale #s(literal 4 binary64))))) |
(+ (* -1/4 (* (* x-scale (sqrt 8)) (sqrt (- (* (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)))))))) (+ (* 1/16 (* (/ (* (pow x-scale 3) (* (sqrt 8) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 2) (* (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (sqrt (/ 1 (- (* (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))))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 8) (* (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 8) (pow (cos (* 1/180 (* angle (PI)))) 8)))) (* 1/4 (/ (* (pow x-scale 4) (pow (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* 1/4 (/ (* (pow x-scale 2) (* (+ (* -1/4 (/ (* (pow x-scale 6) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 6) (pow (cos (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 4) (pow (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) 2)) (* (pow b 4) (* (pow (cos (* 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 b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 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 (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 y-scale 6)) (sqrt (/ 1 (- (* (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))))))))) (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* -1/4 (/ (* (pow x-scale 6) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 6) (pow (cos (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 4) (pow (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) 2)) (* (pow b 4) (* (pow (cos (* 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 b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))))) (pow y-scale 4)) (sqrt (/ 1 (- (* (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)))))))))))) |
(+.f64 (+.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 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #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/16 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 x-scale (*.f64 x-scale x-scale)) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.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 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 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #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) (*.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 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x-scale x-scale) (+.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 8 binary64)) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 2 binary64))) (+.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.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 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 b #s(literal 8 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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.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 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 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 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (+.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.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 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 b #s(literal 6 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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.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 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 (pow.f64 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 (*.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 x-scale x-scale) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #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 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.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 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 (*.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 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #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 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #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))))))))) (pow.f64 y-scale #s(literal 6 binary64))) (/.f64 (*.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (+.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.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 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 b #s(literal 6 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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.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 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 (pow.f64 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 (*.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 x-scale x-scale) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #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 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #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))))))))) (pow.f64 y-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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (* (* angle (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (* (pow b 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/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 angle x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (*.f64 (*.f64 b b) (+.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 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (+.f64 (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (pow.f64 b #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 #s(literal -1/16200 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))) (*.f64 b b)))))) |
(* angle (+ (* 1/8 (* (* (pow angle 2) (* x-scale (* y-scale (* (sqrt 8) (- (* (pow b 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) (- (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))) 2)) (pow b 4))))) (pow b 2)))))))) (sqrt (/ 1 (- (* (pow b 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/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (* (pow b 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/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2))))))))) |
(*.f64 angle (+.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (*.f64 (*.f64 angle angle) x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (*.f64 (*.f64 b b) (+.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 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (+.f64 (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/787320000 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.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 (/.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 #s(literal 1/1574640000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (pow.f64 b #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 #s(literal -1/16200 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64)))))) (*.f64 b b)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 b b) (+.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 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (+.f64 (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (pow.f64 b #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 #s(literal -1/16200 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))) (*.f64 b b)))))))) (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (*.f64 (*.f64 b b) (+.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 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (+.f64 (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (pow.f64 b #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 #s(literal -1/16200 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))) (*.f64 b b)))))))) |
(* angle (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (* (pow b 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/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2))))))) (* (pow angle 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (* (pow b 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) (- (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))) 2)) (pow b 4))))) (pow b 2))))))) (sqrt (/ 1 (- (* (pow b 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/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)))))))) (* 1/8 (* (* (pow angle 2) (* x-scale (* y-scale (* (sqrt 8) (- (* (pow b 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 (- (* (pow b 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) (- (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))) 2)) (pow b 4))))) (pow b 2)))) 2) (- (* (pow b 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/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)))))) (* 1/2 (/ (* (pow x-scale 2) (- (+ (* 4 (/ (* (pow b 4) (+ (* 1/2040733440000000 (pow (PI) 6)) (+ (* 1/1224440064000000 (pow (PI) 6)) (+ (* 1/102036672000000 (pow (PI) 6)) (* 1/32400 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (+ (* -1/408146688000000 (/ (pow (PI) 6) (pow x-scale 4))) (+ (* -1/6122200320000000 (/ (pow (PI) 6) (pow x-scale 4))) (* 2 (* (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (- (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2)))))))) (+ (* 1/1020366720000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/612220032000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (pow x-scale 4) (* (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))) (- (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))) 2)) (pow b 4)))))) (pow b 4))))) (pow b 2))))))))) (sqrt (/ 1 (- (* (pow b 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/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)))))))))))) |
(*.f64 angle (+.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (*.f64 (*.f64 b b) (+.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 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (+.f64 (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (pow.f64 b #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 #s(literal -1/16200 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))) (*.f64 b b)))))) (*.f64 (*.f64 angle angle) (*.f64 #s(literal 1/8 binary64) (+.f64 (*.f64 x-scale (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (*.f64 (*.f64 b b) (+.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 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (+.f64 (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/787320000 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.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 (/.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 #s(literal 1/1574640000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (pow.f64 b #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 #s(literal -1/16200 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64)))))) (*.f64 b b))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 b b) (+.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 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (+.f64 (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (pow.f64 b #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 #s(literal -1/16200 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))) (*.f64 b b)))))))) (*.f64 (*.f64 (*.f64 (*.f64 angle angle) x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (-.f64 (-.f64 (*.f64 (*.f64 b b) (+.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 1/4 binary64) (pow.f64 (+.f64 (*.f64 (*.f64 b b) (+.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 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (+.f64 (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/787320000 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.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 (/.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 #s(literal 1/1574640000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (pow.f64 b #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 #s(literal -1/16200 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64)))))) (*.f64 b b)))) #s(literal 2 binary64))) (+.f64 (*.f64 (*.f64 b b) (+.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 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (+.f64 (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (pow.f64 b #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 #s(literal -1/16200 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))) (*.f64 b b)))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x-scale x-scale) (+.f64 (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (+.f64 (*.f64 #s(literal 1/102036672000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.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 (pow.f64 b #s(literal 4 binary64)) (-.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 #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 (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal 1/382637520000000 binary64))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (pow.f64 b #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 #s(literal -1/16200 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))) (+.f64 (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/787320000 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.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 (/.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 #s(literal 1/1574640000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (pow.f64 b #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 #s(literal -1/16200 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64)))))) (pow.f64 b #s(literal 4 binary64))))))) (*.f64 b b))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 b b) (+.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 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (+.f64 (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (pow.f64 b #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 #s(literal -1/16200 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))) (*.f64 b b)))))))))))) |
(* angle (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (* (pow b 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/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2))))))) (* (pow angle 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (* (pow b 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) (- (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))) 2)) (pow b 4))))) (pow b 2))))))) (sqrt (/ 1 (- (* (pow b 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/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)))))))) (* (pow angle 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (* (pow b 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 (- (* (pow b 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) (- (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))) 2)) (pow b 4))))) (pow b 2)))) 2) (- (* (pow b 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/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)))))) (* 1/2 (/ (* (pow x-scale 2) (- (+ (* 4 (/ (* (pow b 4) (+ (* 1/2040733440000000 (pow (PI) 6)) (+ (* 1/1224440064000000 (pow (PI) 6)) (+ (* 1/102036672000000 (pow (PI) 6)) (* 1/32400 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (+ (* -1/408146688000000 (/ (pow (PI) 6) (pow x-scale 4))) (+ (* -1/6122200320000000 (/ (pow (PI) 6) (pow x-scale 4))) (* 2 (* (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (- (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2)))))))) (+ (* 1/1020366720000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/612220032000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (pow x-scale 4) (* (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))) (- (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))) 2)) (pow b 4)))))) (pow b 4))))) (pow b 2)))))))) (sqrt (/ 1 (- (* (pow b 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/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)))))))) (* 1/8 (* (* (pow angle 2) (* x-scale (* y-scale (* (sqrt 8) (- (* (pow b 2) (+ (* -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 b 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) (- (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))) 2)) (pow b 4))))) (pow b 2)))) (- (* (pow b 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 (- (* (pow b 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) (- (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))) 2)) (pow b 4))))) (pow b 2)))) 2) (- (* (pow b 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/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)))))) (* 1/2 (/ (* (pow x-scale 2) (- (+ (* 4 (/ (* (pow b 4) (+ (* 1/2040733440000000 (pow (PI) 6)) (+ (* 1/1224440064000000 (pow (PI) 6)) (+ (* 1/102036672000000 (pow (PI) 6)) (* 1/32400 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (+ (* -1/408146688000000 (/ (pow (PI) 6) (pow x-scale 4))) (+ (* -1/6122200320000000 (/ (pow (PI) 6) (pow x-scale 4))) (* 2 (* (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (- (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2)))))))) (+ (* 1/1020366720000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/612220032000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (pow x-scale 4) (* (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))) (- (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))) 2)) (pow b 4)))))) (pow b 4))))) (pow b 2)))))) (- (* (pow b 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/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)))))) (* 1/2 (/ (* (pow x-scale 2) (- (+ (* 4 (/ (* (pow b 4) (+ (* -1/32400 (* (pow (PI) 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))) (+ (* -1/3149280000 (* (pow (PI) 4) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (+ (* -1/396718580736000000000 (pow (PI) 8)) (+ (* -1/2777030065152000000000 (pow (PI) 8)) (* 1/32400 (* (pow (PI) 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (+ (* 1/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))))))) (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 (- (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))) 2)) (pow b 4)))) 2)) (pow b 4))) (* 1/2 (/ (* (pow x-scale 4) (* (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))) (- (+ (* 4 (/ (* (pow b 4) (+ (* 1/2040733440000000 (pow (PI) 6)) (+ (* 1/1224440064000000 (pow (PI) 6)) (+ (* 1/102036672000000 (pow (PI) 6)) (* 1/32400 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (+ (* -1/408146688000000 (/ (pow (PI) 6) (pow x-scale 4))) (+ (* -1/6122200320000000 (/ (pow (PI) 6) (pow x-scale 4))) (* 2 (* (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (- (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2)))))))) (+ (* 1/1020366720000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/612220032000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (pow x-scale 4) (* (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))) (- (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))) 2)) (pow b 4)))))) (pow b 4)))))) (pow b 4)))))) (pow b 2))))))))) (sqrt (/ 1 (- (* (pow b 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/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)))))))))))))) |
(*.f64 angle (+.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (*.f64 (*.f64 b b) (+.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 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (+.f64 (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (pow.f64 b #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 #s(literal -1/16200 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))) (*.f64 b b)))))) (*.f64 (*.f64 angle angle) (+.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 x-scale (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (*.f64 (*.f64 b b) (+.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 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (+.f64 (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/787320000 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.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 (/.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 #s(literal 1/1574640000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (pow.f64 b #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 #s(literal -1/16200 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64)))))) (*.f64 b b))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 b b) (+.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 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (+.f64 (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (pow.f64 b #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 #s(literal -1/16200 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))) (*.f64 b b))))))))) (*.f64 (*.f64 angle angle) (*.f64 #s(literal 1/8 binary64) (+.f64 (*.f64 x-scale (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (-.f64 (-.f64 (*.f64 (*.f64 b b) (+.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 1/4 binary64) (pow.f64 (+.f64 (*.f64 (*.f64 b b) (+.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 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (+.f64 (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/787320000 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.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 (/.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 #s(literal 1/1574640000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (pow.f64 b #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 #s(literal -1/16200 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64)))))) (*.f64 b b)))) #s(literal 2 binary64))) (+.f64 (*.f64 (*.f64 b b) (+.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 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (+.f64 (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (pow.f64 b #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 #s(literal -1/16200 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))) (*.f64 b b)))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x-scale x-scale) (+.f64 (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (+.f64 (*.f64 #s(literal 1/102036672000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.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 (pow.f64 b #s(literal 4 binary64)) (-.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 #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 (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal 1/382637520000000 binary64))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (pow.f64 b #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 #s(literal -1/16200 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))) (+.f64 (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/787320000 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.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 (/.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 #s(literal 1/1574640000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (pow.f64 b #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 #s(literal -1/16200 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64)))))) (pow.f64 b #s(literal 4 binary64))))))) (*.f64 b b)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 b b) (+.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 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (+.f64 (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (pow.f64 b #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 #s(literal -1/16200 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))) (*.f64 b b)))))))) (*.f64 (*.f64 (*.f64 (*.f64 angle angle) x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (-.f64 (*.f64 (*.f64 b b) (+.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 (+.f64 (*.f64 (*.f64 b b) (+.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 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (+.f64 (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/787320000 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.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 (/.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 #s(literal 1/1574640000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (pow.f64 b #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 #s(literal -1/16200 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64)))))) (*.f64 b b)))) (-.f64 (-.f64 (*.f64 (*.f64 b b) (+.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 1/4 binary64) (pow.f64 (+.f64 (*.f64 (*.f64 b b) (+.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 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (+.f64 (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/787320000 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.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 (/.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 #s(literal 1/1574640000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (pow.f64 b #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 #s(literal -1/16200 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64)))))) (*.f64 b b)))) #s(literal 2 binary64))) (+.f64 (*.f64 (*.f64 b b) (+.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 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (+.f64 (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (pow.f64 b #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 #s(literal -1/16200 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))) (*.f64 b b)))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x-scale x-scale) (+.f64 (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (+.f64 (*.f64 #s(literal 1/102036672000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.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 (pow.f64 b #s(literal 4 binary64)) (-.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 #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 (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal 1/382637520000000 binary64))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (pow.f64 b #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 #s(literal -1/16200 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))) (+.f64 (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/787320000 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.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 (/.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 #s(literal 1/1574640000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (pow.f64 b #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 #s(literal -1/16200 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64)))))) (pow.f64 b #s(literal 4 binary64))))))) (*.f64 b b)))) (+.f64 (*.f64 (*.f64 b b) (+.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 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (+.f64 (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (pow.f64 b #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 #s(literal -1/16200 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))) (*.f64 b b))))) (/.f64 (*.f64 (*.f64 x-scale x-scale) (-.f64 (-.f64 (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (+.f64 (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (*.f64 #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 (*.f64 #s(literal -1/396718580736000000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64))) (*.f64 #s(literal -1/2777030065152000000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64)))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.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 (+.f64 (/.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 #s(literal 1/317374864588800000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64))) (pow.f64 x-scale #s(literal 4 binary64)))) (+.f64 (*.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)))) (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 (pow.f64 (PI.f64) #s(literal 8 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal -1/173564379072000000000 binary64)))))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (+.f64 (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/787320000 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.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 (/.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 #s(literal 1/1574640000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (pow.f64 b #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 #s(literal -1/16200 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))))) #s(literal 2 binary64)))) (pow.f64 b #s(literal 4 binary64)))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (pow.f64 b #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 #s(literal -1/16200 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))) (+.f64 (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (+.f64 (*.f64 #s(literal 1/102036672000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.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 (pow.f64 b #s(literal 4 binary64)) (-.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 #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 (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal 1/382637520000000 binary64))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (pow.f64 b #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 #s(literal -1/16200 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))) (+.f64 (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/787320000 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.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 (/.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 #s(literal 1/1574640000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (pow.f64 b #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 #s(literal -1/16200 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64)))))) (pow.f64 b #s(literal 4 binary64))))))) (pow.f64 b #s(literal 4 binary64))))) (*.f64 b b))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 b b) (+.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 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (+.f64 (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (pow.f64 b #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 #s(literal -1/16200 binary64) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))) (*.f64 b 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 (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (pow (- (/ (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) 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 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (pow (- (/ (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) 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 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (pow (- (/ (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) 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 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (pow (- (/ (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) 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 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (pow (- (/ (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) 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 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (pow (- (/ (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) 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 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (pow (- (/ (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) 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 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (pow (- (/ (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) 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 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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)))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) |
(* x-scale (* y-scale (sqrt 8))) |
(*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) |
(* x-scale (* y-scale (sqrt 8))) |
(*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) |
(* x-scale (* y-scale (sqrt 8))) |
(*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) |
(* x-scale (* y-scale (sqrt 8))) |
(*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) |
(* x-scale (* y-scale (sqrt 8))) |
(*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) |
(* x-scale (* y-scale (sqrt 8))) |
(*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) |
(* x-scale (* y-scale (sqrt 8))) |
(*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) |
(* x-scale (* y-scale (sqrt 8))) |
(*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) |
(* x-scale (* y-scale (sqrt 8))) |
(*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) |
(* x-scale (* y-scale (sqrt 8))) |
(*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) |
(* x-scale (* y-scale (sqrt 8))) |
(*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) |
(* x-scale (* y-scale (sqrt 8))) |
(*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) |
(* x-scale (* y-scale (sqrt 8))) |
(*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) |
(* x-scale (* y-scale (sqrt 8))) |
(*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) |
(* x-scale (* y-scale (sqrt 8))) |
(*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) |
(* x-scale (* y-scale (sqrt 8))) |
(*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) |
(* x-scale (* y-scale (sqrt 8))) |
(*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) |
(* x-scale (* y-scale (sqrt 8))) |
(*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) |
(* x-scale (* y-scale (sqrt 8))) |
(*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) |
(* x-scale (* y-scale (sqrt 8))) |
(*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) |
(* x-scale (* y-scale (sqrt 8))) |
(*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) |
(* x-scale (* y-scale (sqrt 8))) |
(*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) |
(* x-scale (* y-scale (sqrt 8))) |
(*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) |
(* x-scale (* y-scale (sqrt 8))) |
(*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) |
(* y-scale (sqrt 8)) |
(*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) |
(* y-scale (sqrt 8)) |
(*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) |
(* y-scale (sqrt 8)) |
(*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) |
(* y-scale (sqrt 8)) |
(*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) |
(* y-scale (sqrt 8)) |
(*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) |
(* y-scale (sqrt 8)) |
(*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) |
(* y-scale (sqrt 8)) |
(*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) |
(* y-scale (sqrt 8)) |
(*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) |
(* y-scale (sqrt 8)) |
(*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) |
(* y-scale (sqrt 8)) |
(*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) |
(* y-scale (sqrt 8)) |
(*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) |
(* y-scale (sqrt 8)) |
(*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) |
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))))))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) |
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))))))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) |
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))))))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) |
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))))))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) |
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))))))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) |
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))))))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) |
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))))))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) |
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))))))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) |
(* -1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) |
(*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))))))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) |
(* -1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) |
(*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))))))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) |
(* -1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) |
(*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))))))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) |
(* -1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) |
(*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))))))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))))) (*.f64 x-scale x-scale)))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))))) (*.f64 x-scale x-scale)))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))))) (*.f64 x-scale x-scale)))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))))) (*.f64 x-scale x-scale)))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))))) (*.f64 x-scale x-scale)))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))))) (*.f64 x-scale x-scale)))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))))) (*.f64 x-scale x-scale)))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))))) (*.f64 x-scale x-scale)))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))))) (*.f64 x-scale x-scale)))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))))) (*.f64 x-scale x-scale)))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))))) (*.f64 x-scale x-scale)))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))))) (*.f64 x-scale x-scale)))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) |
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))) |
(+ (* -1/4 (* (/ (* a (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))))) (* (pow b 2) x-scale)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(+.f64 (*.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 a y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64))))) (*.f64 (*.f64 b b) x-scale))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* a (+ (* -1/4 (* (/ (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))))) (* (pow b 2) x-scale)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* 1/8 (* (* a (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow b 2) (pow x-scale 2))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow b 4) (* (pow x-scale 4) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) |
(+.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))) (*.f64 a (+.f64 (*.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64))))) (*.f64 (*.f64 b b) x-scale))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (*.f64 a x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64)))) (*.f64 (*.f64 b b) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64)) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64)))) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* a (+ (* -1/4 (* (/ (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))))) (* (pow b 2) x-scale)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* a (+ (* 1/8 (* (* a (* x-scale (* y-scale (* (sqrt 8) (- (* -1/2 (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* (pow b 2) (pow x-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow b 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (+ (* -2 (pow b 3)) (* 2 (pow b 3))) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow b 2) (pow x-scale 2))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow b 4) (* (pow x-scale 4) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (* (pow b 2) (* (pow x-scale 2) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))))) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow b 2) (pow x-scale 2))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow b 4) (* (pow x-scale 4) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))))) |
(+.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))) (*.f64 a (+.f64 (*.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64))))) (*.f64 (*.f64 b b) x-scale))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 a (*.f64 #s(literal 1/8 binary64) (+.f64 (*.f64 (*.f64 (*.f64 a x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 #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 b #s(literal 0 binary64))) (*.f64 (*.f64 b b) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64))) (*.f64 (*.f64 (pow.f64 b #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 #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 (*.f64 b (*.f64 b b)) #s(literal 0 binary64))) (+.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64)))) (*.f64 (*.f64 b b) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64)) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64)))) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) (*.f64 (*.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 x-scale (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (-.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b b) #s(literal -2 binary64)))) (*.f64 (*.f64 b b) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64)) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64)))) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))))))) |
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) |
(* a (+ (* -1/4 (* (/ (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b))))) (* a x-scale)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) |
(*.f64 a (+.f64 (*.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 b #s(literal 0 binary64))))) (*.f64 a x-scale))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 #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 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))))) |
(* a (+ (* -1/4 (* (/ (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b))))) (* a x-scale)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (pow x-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) (pow a 2)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) |
(*.f64 a (+.f64 (*.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 b #s(literal 0 binary64))))) (*.f64 a x-scale))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale)))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (-.f64 (/.f64 (*.f64 #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 b b) #s(literal -2 binary64)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (-.f64 (/.f64 (*.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 b #s(literal 0 binary64)) (*.f64 b #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (*.f64 a a))) (*.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 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))))) |
(* a (+ (* -1/4 (* (/ (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b))))) (* a x-scale)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/2 (- (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (pow x-scale 2))) (* 4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (+ (* -2 b) (* 2 b)))) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* -1 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -2 b) (* 2 b)) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (pow x-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* (pow x-scale 2) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 3)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (pow x-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) (pow a 2)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) |
(*.f64 a (+.f64 (*.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 b #s(literal 0 binary64))))) (*.f64 a x-scale))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (+.f64 (*.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 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 b #s(literal 0 binary64)))) (*.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 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b #s(literal 0 binary64))) (+.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale)))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (-.f64 (/.f64 (*.f64 #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 b b) #s(literal -2 binary64)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (-.f64 (/.f64 (*.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 b #s(literal 0 binary64)) (*.f64 b #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))))) (*.f64 (*.f64 x-scale x-scale) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 a (*.f64 a a)))) (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale)))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (-.f64 (/.f64 (*.f64 #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 b b) #s(literal -2 binary64)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (-.f64 (/.f64 (*.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 b #s(literal 0 binary64)) (*.f64 b #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (*.f64 a a))) (*.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 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))))))) |
(* -1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) |
(*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 a x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) |
(* -1 (* a (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* 1/4 (* (/ (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b))))) (* a x-scale)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) |
(*.f64 (*.f64 #s(literal -1 binary64) a) (*.f64 #s(literal 1/4 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 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 b #s(literal 0 binary64))))) (*.f64 a x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))))) |
(* -1 (* a (+ (* -1 (/ (+ (* -1/4 (* (/ (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b))))) x-scale) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (pow x-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) a) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) a)) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) |
(*.f64 (*.f64 #s(literal -1 binary64) a) (+.f64 (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 b #s(literal 0 binary64))))) x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale)))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (-.f64 (/.f64 (*.f64 #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 b b) #s(literal -2 binary64)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (-.f64 (/.f64 (*.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 b #s(literal 0 binary64)) (*.f64 b #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) a))) a)) (*.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 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))))) |
(* -1 (* a (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/2 (- (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (pow x-scale 2))) (* 4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (+ (* -2 b) (* 2 b)))) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* -1 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -2 b) (* 2 b)) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (pow x-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* (pow x-scale 2) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) a) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (pow x-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) a)) (* -1/4 (* (/ (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b))))) x-scale) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) a)) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) |
(*.f64 (*.f64 #s(literal -1 binary64) a) (+.f64 (neg.f64 (/.f64 (+.f64 (neg.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 #s(literal -1/2 binary64) (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 b (*.f64 b b)) #s(literal 0 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 b #s(literal 0 binary64)))) (*.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 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b #s(literal 0 binary64))) (+.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale)))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (-.f64 (/.f64 (*.f64 #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 b b) #s(literal -2 binary64)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (-.f64 (/.f64 (*.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 b #s(literal 0 binary64)) (*.f64 b #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))))) (*.f64 (*.f64 x-scale x-scale) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) a)) (*.f64 #s(literal 1/8 binary64) (*.f64 x-scale (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale)))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (-.f64 (/.f64 (*.f64 #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 b b) #s(literal -2 binary64)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (-.f64 (/.f64 (*.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 b #s(literal 0 binary64)) (*.f64 b #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))))) a)) (*.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 b #s(literal 0 binary64))))) x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) a)) (*.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 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))))) |
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) |
(+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/2 (- (+ (* -2 (/ (+ (* (pow a 2) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2))) (pow a 2))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow a 2) (pow x-scale 2))))) (* -2 (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow a 2) (pow x-scale 2)))))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))))))))) (* b (sqrt 2)))) (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))) |
(+.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (*.f64 angle angle) (*.f64 x-scale x-scale)) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (*.f64 b b) (+.f64 (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64))))) (*.f64 x-scale x-scale)))) (*.f64 a a)) (-.f64 (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 a a) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) (+.f64 (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64)))))) (*.f64 (*.f64 a a) (*.f64 x-scale x-scale)))))) (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))))))) (*.f64 b (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))) |
(+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow x-scale 2)))) (pow a 2))) (* 4 (/ (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))) (pow a 2)))) (+ (* -2 (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow a 2) (pow x-scale 2)))) (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (- (+ (* -2 (/ (+ (* (pow a 2) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2))) (pow a 2))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow a 2) (pow x-scale 2))))) (* -2 (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow a 2) (pow x-scale 2)))))) (pow a 2))))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/2 (- (+ (* -2 (/ (+ (* (pow a 2) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2))) (pow a 2))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow a 2) (pow x-scale 2))))) (* -2 (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow a 2) (pow x-scale 2)))))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/2 (- (+ (* -2 (/ (+ (* (pow a 2) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2))) (pow a 2))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow a 2) (pow x-scale 2))))) (* -2 (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow a 2) (pow x-scale 2)))))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))))))) (* b (sqrt 2))))))) |
(+.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (*.f64 angle angle) (*.f64 #s(literal 1/8 binary64) (+.f64 (/.f64 (*.f64 (*.f64 angle angle) (*.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 (/.f64 (*.f64 #s(literal -2 binary64) (+.f64 (+.f64 (*.f64 (+.f64 (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64)))) (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 a a) (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.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 a a)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)) #s(literal -1/787320000 binary64))) (*.f64 a a))) (/.f64 (*.f64 #s(literal -2 binary64) (*.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 (*.f64 a a) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (+.f64 (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64)))) (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (*.f64 b b) (+.f64 (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64))))) (*.f64 x-scale x-scale)))) (*.f64 a a)) (-.f64 (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 a a) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) (+.f64 (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64)))))) (*.f64 (*.f64 a a) (*.f64 x-scale x-scale)))))) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.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 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (pow.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (*.f64 b b) (+.f64 (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64))))) (*.f64 x-scale x-scale)))) (*.f64 a a)) (-.f64 (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 a a) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) (+.f64 (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64)))))) (*.f64 (*.f64 a a) (*.f64 x-scale x-scale)))))) (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))))) (*.f64 b (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (*.f64 b b) (+.f64 (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64))))) (*.f64 x-scale x-scale)))) (*.f64 a a)) (-.f64 (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 a a) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) (+.f64 (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64)))))) (*.f64 (*.f64 a a) (*.f64 x-scale x-scale)))))) (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))))) (*.f64 b (sqrt.f64 #s(literal 2 binary64)))))))) |
(+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/2 (- (+ (* -2 (/ (+ (* (pow a 2) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2))) (pow a 2))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow a 2) (pow x-scale 2))))) (* -2 (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow a 2) (pow x-scale 2)))))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))))))) (* b (sqrt 2)))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))) (+ (* (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (+ (* (pow a 2) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2)))) (/ (* (pow b 2) (+ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))) (pow x-scale 2))))) (pow a 2))) (* 4 (/ (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- b a) 2)))) (pow x-scale 2))) (/ (* (pow (+ a b) 2) (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- b a) 2))) (pow x-scale 2)))) (pow a 2)))) (+ (* -2 (/ (* (pow b 2) (+ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))) (* (pow a 2) (pow x-scale 2)))) (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (- (+ (* -2 (/ (+ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow x-scale 2)))) (pow a 2))) (* 4 (/ (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))) (pow a 2)))) (+ (* -2 (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow a 2) (pow x-scale 2)))) (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (- (+ (* -2 (/ (+ (* (pow a 2) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2))) (pow a 2))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow a 2) (pow x-scale 2))))) (* -2 (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow a 2) (pow x-scale 2)))))) (pow a 2))))) (pow a 2)) (/ (* (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (- (+ (* -2 (/ (+ (* (pow a 2) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2))) (pow a 2))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow a 2) (pow x-scale 2))))) (* -2 (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow a 2) (pow x-scale 2)))))) (pow a 2)))))) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2)))) (* 1/2 (/ (* (pow x-scale 2) (* (+ (* -1/2 (- (+ (* -2 (/ (+ (* (pow a 2) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2))) (pow a 2))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow a 2) (pow x-scale 2))))) (* -2 (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow a 2) (pow x-scale 2)))))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))))) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow x-scale 2)))) (pow a 2))) (* 4 (/ (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))) (pow a 2)))) (+ (* -2 (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow a 2) (pow x-scale 2)))) (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (- (+ (* -2 (/ (+ (* (pow a 2) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2))) (pow a 2))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow a 2) (pow x-scale 2))))) (* -2 (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow a 2) (pow x-scale 2)))))) (pow a 2))))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/2 (- (+ (* -2 (/ (+ (* (pow a 2) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2))) (pow a 2))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow a 2) (pow x-scale 2))))) (* -2 (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow a 2) (pow x-scale 2)))))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow x-scale 2)))) (pow a 2))) (* 4 (/ (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))) (pow a 2)))) (+ (* -2 (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow a 2) (pow x-scale 2)))) (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (- (+ (* -2 (/ (+ (* (pow a 2) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2))) (pow a 2))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow a 2) (pow x-scale 2))))) (* -2 (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow a 2) (pow x-scale 2)))))) (pow a 2))))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/2 (- (+ (* -2 (/ (+ (* (pow a 2) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2))) (pow a 2))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow a 2) (pow x-scale 2))))) (* -2 (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow a 2) (pow x-scale 2)))))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))))) 2)) (* (pow b 2) (pow (sqrt 2) 2)))))))) (* b (sqrt 2))))))))) |
(+.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (*.f64 angle angle) (+.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (*.f64 b b) (+.f64 (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64))))) (*.f64 x-scale x-scale)))) (*.f64 a a)) (-.f64 (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 a a) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) (+.f64 (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64)))))) (*.f64 (*.f64 a a) (*.f64 x-scale x-scale)))))) (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))))))) (*.f64 b (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 angle angle) (*.f64 #s(literal 1/8 binary64) (+.f64 (/.f64 (*.f64 (*.f64 (*.f64 angle angle) (*.f64 x-scale x-scale)) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (-.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (+.f64 (+.f64 (*.f64 (+.f64 (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64)))) (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.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 #s(literal -1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (+.f64 (*.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 b b)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)))))) (+.f64 (*.f64 (*.f64 a a) (+.f64 (/.f64 (*.f64 (*.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 a a)) (/.f64 (*.f64 #s(literal 4 binary64) (+.f64 (/.f64 (*.f64 #s(literal 1/102036672000000 binary64) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale))))) (*.f64 a a))) (/.f64 (*.f64 #s(literal -2 binary64) (*.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 (*.f64 a a) (*.f64 x-scale x-scale)))) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64)))) (-.f64 (-.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (+.f64 (+.f64 (*.f64 (+.f64 (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64)))) (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 a a) (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.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 a a)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)) #s(literal -1/787320000 binary64))) (*.f64 a a))) (/.f64 (*.f64 #s(literal -2 binary64) (*.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 (*.f64 a a) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (+.f64 (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64)))) (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (*.f64 b b) (+.f64 (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64))))) (*.f64 x-scale x-scale)))) (*.f64 a a)) (-.f64 (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 a a) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) (+.f64 (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64)))))) (*.f64 (*.f64 a a) (*.f64 x-scale x-scale)))))) (*.f64 a a)))) (*.f64 a a)) (/.f64 (*.f64 (+.f64 (*.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 b b)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)))) (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (*.f64 b b) (+.f64 (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64))))) (*.f64 x-scale x-scale)))) (*.f64 a a)) (-.f64 (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 a a) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) (+.f64 (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64)))))) (*.f64 (*.f64 a a) (*.f64 x-scale x-scale)))))) (*.f64 a a))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (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 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (*.f64 b b) (+.f64 (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64))))) (*.f64 x-scale x-scale)))) (*.f64 a a)) (-.f64 (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 a a) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) (+.f64 (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64)))))) (*.f64 (*.f64 a a) (*.f64 x-scale x-scale)))))) (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (+.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (-.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (+.f64 (+.f64 (*.f64 (+.f64 (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64)))) (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 a a) (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.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 a a)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)) #s(literal -1/787320000 binary64))) (*.f64 a a))) (/.f64 (*.f64 #s(literal -2 binary64) (*.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 (*.f64 a a) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (+.f64 (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64)))) (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (*.f64 b b) (+.f64 (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64))))) (*.f64 x-scale x-scale)))) (*.f64 a a)) (-.f64 (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 a a) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) (+.f64 (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64)))))) (*.f64 (*.f64 a a) (*.f64 x-scale x-scale)))))) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.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 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (pow.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (*.f64 b b) (+.f64 (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64))))) (*.f64 x-scale x-scale)))) (*.f64 a a)) (-.f64 (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 a a) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) (+.f64 (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64)))))) (*.f64 (*.f64 a a) (*.f64 x-scale x-scale)))))) (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 (*.f64 b b) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 b (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (-.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (+.f64 (+.f64 (*.f64 (+.f64 (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64)))) (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 a a) (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.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 a a)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)) #s(literal -1/787320000 binary64))) (*.f64 a a))) (/.f64 (*.f64 #s(literal -2 binary64) (*.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 (*.f64 a a) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (+.f64 (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64)))) (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (*.f64 b b) (+.f64 (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64))))) (*.f64 x-scale x-scale)))) (*.f64 a a)) (-.f64 (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 a a) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) (+.f64 (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64)))))) (*.f64 (*.f64 a a) (*.f64 x-scale x-scale)))))) (*.f64 a a)))) (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.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 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (pow.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (*.f64 b b) (+.f64 (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64))))) (*.f64 x-scale x-scale)))) (*.f64 a a)) (-.f64 (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 a a) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) (+.f64 (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64)))))) (*.f64 (*.f64 a a) (*.f64 x-scale x-scale)))))) (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))))) (*.f64 b (sqrt.f64 #s(literal 2 binary64)))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))))) (*.f64 x-scale x-scale)))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))))) (*.f64 x-scale x-scale)))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))))) (*.f64 x-scale x-scale)))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))))) (*.f64 x-scale x-scale)))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))))) (*.f64 x-scale x-scale)))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))))) (*.f64 x-scale x-scale)))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))))) (*.f64 x-scale x-scale)))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))))) (*.f64 x-scale x-scale)))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) |
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))) |
(+ (* -1/4 (* (/ (* b (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))))) (* (pow a 2) x-scale)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(+.f64 (*.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 b y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64))))) (*.f64 (*.f64 a a) x-scale))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* b (+ (* -1/4 (* (/ (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))))) (* (pow a 2) x-scale)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* 1/8 (* (* b (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow a 2) (pow x-scale 2))))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))) (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow a 4) (* (pow x-scale 4) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) |
(+.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))) (*.f64 b (+.f64 (*.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64))))) (*.f64 (*.f64 a a) x-scale))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (*.f64 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 -2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 #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 a a) #s(literal -2 binary64)))) (*.f64 (*.f64 a a) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64)) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64)))) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* b (+ (* -1/4 (* (/ (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))))) (* (pow a 2) x-scale)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* b (+ (* 1/8 (* (* b (* x-scale (* y-scale (* (sqrt 8) (- (* -1/2 (- (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* (pow a 2) (pow x-scale 2)))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow a 4) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* -1 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -2 (pow a 3)) (* 2 (pow a 3))) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow a 2) (pow x-scale 2))))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))) (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow a 4) (* (pow x-scale 4) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (* (pow a 2) (* (pow x-scale 2) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))))) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow a 2) (pow x-scale 2))))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))) (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow a 4) (* (pow x-scale 4) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))))) |
(+.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))) (*.f64 b (+.f64 (*.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64))))) (*.f64 (*.f64 a a) x-scale))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 b (*.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 -1/2 binary64) (*.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 a #s(literal 0 binary64))) (*.f64 (*.f64 a a) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64))) (*.f64 (*.f64 (pow.f64 a #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 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64))) (+.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 #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 a a) #s(literal -2 binary64)))) (*.f64 (*.f64 a a) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64)) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64)))) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) (*.f64 (*.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) (*.f64 x-scale (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 #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 a a) #s(literal -2 binary64)))) (*.f64 (*.f64 a a) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64)) (*.f64 (*.f64 a (*.f64 a a)) #s(literal 0 binary64)))) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))))))))))) |
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) |
(* b (+ (* -1/4 (* (/ (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a))))) (* b x-scale)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) |
(*.f64 b (+.f64 (*.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 a #s(literal 0 binary64))))) (*.f64 b x-scale))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) |
(* b (+ (* -1/4 (* (/ (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a))))) (* b x-scale)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (pow x-scale 2)))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) (pow b 2)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) |
(*.f64 b (+.f64 (*.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 a #s(literal 0 binary64))))) (*.f64 b x-scale))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (-.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64)))) (*.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 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 a #s(literal 0 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (*.f64 b b))) (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))))) |
(* b (+ (* -1/4 (* (/ (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a))))) (* b x-scale)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/2 (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (pow x-scale 2))) (* 4 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (+ (* -2 a) (* 2 a)))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (+ (* -2 a) (* 2 a)) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (pow x-scale 2)))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* (pow x-scale 2) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow b 3)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (pow x-scale 2)))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) (pow b 2)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) |
(*.f64 b (+.f64 (*.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 a #s(literal 0 binary64))))) (*.f64 b x-scale))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (+.f64 (*.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 #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 (*.f64 a (*.f64 a a)) #s(literal 0 binary64))) (*.f64 x-scale x-scale)) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 a #s(literal 0 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.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 a #s(literal 0 binary64))) (+.f64 (*.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 4 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (-.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64)))) (*.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 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 a #s(literal 0 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))))) (*.f64 (*.f64 x-scale x-scale) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 b (*.f64 b b)))) (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (-.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64)))) (*.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 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 a #s(literal 0 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (*.f64 b b))) (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))))) |
(* -1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) |
(*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 b x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) |
(* -1 (* b (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* 1/4 (* (/ (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a))))) (* b x-scale)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) |
(*.f64 (*.f64 #s(literal -1 binary64) b) (*.f64 #s(literal 1/4 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 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 a #s(literal 0 binary64))))) (*.f64 b x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))))) |
(* -1 (* b (+ (* -1 (/ (+ (* -1/4 (* (/ (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a))))) x-scale) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (pow x-scale 2)))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) b) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) b)) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) |
(*.f64 (*.f64 #s(literal -1 binary64) b) (+.f64 (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 a #s(literal 0 binary64))))) x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (-.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64)))) (*.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 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 a #s(literal 0 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) b))) b)) (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) |
(* -1 (* b (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/2 (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (pow x-scale 2))) (* 4 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (+ (* -2 a) (* 2 a)))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (+ (* -2 a) (* 2 a)) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (pow x-scale 2)))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* (pow x-scale 2) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) b) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (pow x-scale 2)))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) b)) (* -1/4 (* (/ (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a))))) x-scale) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) b)) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) |
(*.f64 (*.f64 #s(literal -1 binary64) b) (+.f64 (neg.f64 (/.f64 (+.f64 (/.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 #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 (*.f64 a (*.f64 a a)) #s(literal 0 binary64))) (*.f64 x-scale x-scale)) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 a #s(literal 0 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.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 a #s(literal 0 binary64))) (+.f64 (*.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 4 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (-.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64)))) (*.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 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 a #s(literal 0 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))))) (*.f64 (*.f64 x-scale x-scale) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) b)) (*.f64 #s(literal 1/8 binary64) (*.f64 x-scale (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (-.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 a a) #s(literal -2 binary64)))) (*.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 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 (*.f64 a #s(literal 0 binary64)) (*.f64 a #s(literal 0 binary64)))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))))))) b) (*.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 a #s(literal 0 binary64))))) x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) b)) (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) |
(* 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)))) |
Compiled 429757 to 9317 computations (97.8% saved)
45 alts after pruning (44 fresh and 1 done)
| Pruned | Kept | Total | |
|---|---|---|---|
| New | 1923 | 40 | 1963 |
| Fresh | 7 | 4 | 11 |
| Picked | 4 | 1 | 5 |
| Done | 0 | 0 | 0 |
| Total | 1934 | 45 | 1979 |
| Status | Accuracy | Program |
|---|---|---|
| 2.5% | (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 a (exp.f64 (*.f64 (log.f64 a) #s(literal 2 binary64)))) (*.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 4 binary64) (*.f64 a (*.f64 b (*.f64 b a)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) | |
| 4.8% | (/.f64 (*.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 b (*.f64 a b)))) (*.f64 y-scale y-scale)) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 b a)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) | |
| 2.4% | (/.f64 (*.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 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 b a)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) | |
| 6.4% | (/.f64 (*.f64 (/.f64 #s(literal 4 binary64) (*.f64 x-scale y-scale)) (/.f64 (*.f64 a (*.f64 a (*.f64 b (*.f64 a b)))) y-scale)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 b a)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) | |
| 3.8% | (/.f64 (*.f64 (*.f64 a (*.f64 a (*.f64 b (*.f64 a b)))) (/.f64 #s(literal 4 binary64) (*.f64 (*.f64 x-scale y-scale) y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 b a)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) | |
| 0.4% | (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (sqrt.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.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))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-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 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 b a)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) | |
| 5.6% | (*.f64 (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 b (*.f64 a b)))) x-scale) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (/.f64 (*.f64 a (*.f64 b (*.f64 a b))) (*.f64 (*.f64 x-scale y-scale) y-scale)))) | |
| 5.3% | (*.f64 (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 b (*.f64 a b)))) x-scale) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 a b))))) (/.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) | |
| ▶ | 2.5% | (*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 (*.f64 b b) #s(literal 4 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 a b))))) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) |
| 4.3% | (*.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 b (*.f64 a b)))) #s(literal 4 binary64)) (/.f64 (/.f64 #s(literal 4 binary64) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 (*.f64 a (*.f64 b (*.f64 a b))) (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) | |
| 5.2% | (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 a (*.f64 b (*.f64 a b)))) (/.f64 #s(literal 4 binary64) (*.f64 (*.f64 x-scale y-scale) y-scale))) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 a b))))) (*.f64 x-scale y-scale)) (*.f64 x-scale y-scale)) | |
| 1.8% | (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale y-scale)) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (-.f64 (*.f64 b (*.f64 b (+.f64 (/.f64 (+.f64 #s(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/180 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 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 y-scale y-scale))))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b b) (*.f64 b b))) (+.f64 #s(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/180 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/180 binary64))))))) (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (+.f64 #s(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/180 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 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))))) | |
| 5.8% | (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.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 y-scale y-scale)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) | |
| 3.9% | (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))) | |
| 32.5% | (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) a) #s(literal 4 binary64)) | |
| 0.2% | (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 a a))) (sqrt.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 y-scale y-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 (*.f64 (pow.f64 a #s(literal 6 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))))))) | |
| ▶ | 0.5% | (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 a (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) (*.f64 b b))) (sqrt.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.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))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-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))))))) |
| 1.7% | (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) | |
| 8.5% | (*.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 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) | |
| 10.8% | (*.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 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) | |
| 9.4% | (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))))))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) | |
| 1.3% | (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.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 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) | |
| 3.0% | (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.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 b b) (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 #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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))) | |
| 0.9% | (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (-.f64 (*.f64 (*.f64 b b) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (exp.f64 (*.f64 (log.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))) #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)))) #s(literal 2 binary64))))))) | |
| 3.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 b b) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (cbrt.f64 (*.f64 (*.f64 (PI.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)))) #s(literal 2 binary64))))))) | |
| 3.1% | (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (-.f64 (*.f64 (*.f64 b b) (+.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 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-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))))))) | |
| 2.9% | (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (-.f64 (*.f64 (*.f64 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 x-scale x-scale) (*.f64 y-scale y-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))))))) | |
| 4.6% | (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (+.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)))))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) | |
| 4.6% | (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.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 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (*.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))))))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) | |
| 4.5% | (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/64800 binary64) (*.f64 angle angle)) (*.f64 (PI.f64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) | |
| 4.5% | (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.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)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) | |
| 6.0% | (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.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 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) | |
| 6.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 (*.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 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) #s(literal 2 binary64))))))))) | |
| ▶ | 6.9% | (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.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 #s(literal 1 binary64) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) |
| 6.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 (*.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 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) | |
| 6.8% | (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (exp.f64 (*.f64 (log.f64 #s(literal 8 binary64)) #s(literal 1/2 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 (*.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 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) | |
| 3.4% | (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.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 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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)))))))) | |
| 2.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 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #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)))))))) | |
| 2.1% | (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 a (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) | |
| 27.6% | (*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) | |
| ▶ | 32.5% | (*.f64 (*.f64 #s(literal 1/4 binary64) a) (*.f64 x-scale #s(literal 4 binary64))) |
| 1.3% | (*.f64 b (+.f64 (*.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 a #s(literal 0 binary64))))) (*.f64 b x-scale))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) | |
| 0.8% | (*.f64 a (+.f64 (*.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 b #s(literal 0 binary64))))) (*.f64 a x-scale))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 #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 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))))) | |
| ▶ | 32.5% | (*.f64 #s(literal 1 binary64) (*.f64 a x-scale)) |
| ✓ | 32.3% | (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
Compiled 9022 to 3450 computations (61.8% saved)
| 1× | egg-herbie |
Found 17 expressions of interest:
| New | Metric | Score | Program |
|---|---|---|---|
| ✓ | cost-diff | 0 | (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) |
| ✓ | cost-diff | 0 | (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.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 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.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 #s(literal 1 binary64) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) |
| ✓ | cost-diff | 128 | (*.f64 (*.f64 b b) (pow.f64 #s(literal 1 binary64) #s(literal 2 binary64))) |
| ✓ | cost-diff | 6464 | (pow.f64 #s(literal 1 binary64) #s(literal 2 binary64)) |
| ✓ | cost-diff | 128 | (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) |
| ✓ | cost-diff | 256 | (+.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))) |
| ✓ | cost-diff | 6848 | (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.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))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-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)))) |
| ✓ | cost-diff | 13248 | (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)))) |
| ✓ | cost-diff | 0 | (*.f64 (*.f64 a (*.f64 a a)) (*.f64 (*.f64 b b) #s(literal 4 binary64))) |
| ✓ | cost-diff | 0 | (*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 (*.f64 b b) #s(literal 4 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 a b))))) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) |
| ✓ | cost-diff | 1024 | (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)))) |
| ✓ | cost-diff | 1280 | (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 (*.f64 b b) #s(literal 4 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 a b))))) |
| ✓ | cost-diff | 0 | (*.f64 x-scale #s(literal 4 binary64)) |
| ✓ | cost-diff | 0 | (*.f64 #s(literal 1/4 binary64) a) |
| ✓ | cost-diff | 256 | (*.f64 (*.f64 #s(literal 1/4 binary64) a) (*.f64 x-scale #s(literal 4 binary64))) |
| ✓ | cost-diff | 0 | (*.f64 a x-scale) |
| ✓ | cost-diff | 128 | (*.f64 #s(literal 1 binary64) (*.f64 a x-scale)) |
| 5192× | *-lowering-*.f32 |
| 5192× | *-lowering-*.f64 |
| 3512× | /-lowering-/.f32 |
| 3512× | /-lowering-/.f64 |
| 1392× | associate-/l* |
Useful iterations: 3 (0.0ms)
| Iter | Nodes | Cost |
|---|---|---|
| 0 | 117 | 2283 |
| 1 | 394 | 2096 |
| 2 | 1742 | 1964 |
| 3 | 6931 | 1953 |
| 0 | 8040 | 1953 |
| 1× | iter limit |
| 1× | node limit |
| Inputs |
|---|
(* 1 (* a x-scale)) |
1 |
(* a x-scale) |
a |
x-scale |
(* (* 1/4 a) (* x-scale 4)) |
(* 1/4 a) |
1/4 |
a |
(* x-scale 4) |
x-scale |
4 |
(* (/ (* (* a (* a a)) (* (* b b) 4)) (* 4 (* a (* b (* a b))))) (/ (/ 1 (* (* x-scale y-scale) y-scale)) (/ 1 (* x-scale (* (* x-scale y-scale) y-scale))))) |
(/ (* (* a (* a a)) (* (* b b) 4)) (* 4 (* a (* b (* a b))))) |
(* (* a (* a a)) (* (* b b) 4)) |
(* a (* a a)) |
a |
(* a a) |
(* (* b b) 4) |
(* b b) |
b |
4 |
(* 4 (* a (* b (* a b)))) |
(* a (* b (* a b))) |
(* b (* a b)) |
(* a b) |
(/ (/ 1 (* (* x-scale y-scale) y-scale)) (/ 1 (* x-scale (* (* x-scale y-scale) y-scale)))) |
(/ 1 (* (* x-scale y-scale) y-scale)) |
1 |
(* (* x-scale y-scale) y-scale) |
(* x-scale y-scale) |
x-scale |
y-scale |
(/ 1 (* x-scale (* (* x-scale y-scale) y-scale))) |
(* x-scale (* (* x-scale y-scale) y-scale)) |
(* (* 1/4 (/ (* (* a (* x-scale x-scale)) (* y-scale y-scale)) (* b b))) (sqrt (* 8 (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (* y-scale y-scale))) (/ (* (pow b 4) (- (+ (/ 1/2 (* y-scale y-scale)) (/ (* 1/2 (cos (* 1/90 (* angle (PI))))) (* y-scale y-scale))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (* x-scale x-scale) (* y-scale y-scale))) (pow (- (/ 1/2 (* x-scale x-scale)) (+ (/ 1/2 (* y-scale y-scale)) (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (* x-scale x-scale)) (/ (cos (* 1/90 (* angle (PI)))) (* y-scale y-scale)))))) 2))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) |
(* 1/4 (/ (* (* a (* x-scale x-scale)) (* y-scale y-scale)) (* b b))) |
1/4 |
(/ (* (* a (* x-scale x-scale)) (* y-scale y-scale)) (* b b)) |
(* (* a (* x-scale x-scale)) (* y-scale y-scale)) |
(* a (* x-scale x-scale)) |
a |
(* x-scale x-scale) |
x-scale |
(* y-scale y-scale) |
y-scale |
(* b b) |
b |
(sqrt (* 8 (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (* y-scale y-scale))) (/ (* (pow b 4) (- (+ (/ 1/2 (* y-scale y-scale)) (/ (* 1/2 (cos (* 1/90 (* angle (PI))))) (* y-scale y-scale))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (* x-scale x-scale) (* y-scale y-scale))) (pow (- (/ 1/2 (* x-scale x-scale)) (+ (/ 1/2 (* y-scale y-scale)) (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (* x-scale x-scale)) (/ (cos (* 1/90 (* angle (PI)))) (* y-scale y-scale)))))) 2))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) |
(* 8 (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (* y-scale y-scale))) (/ (* (pow b 4) (- (+ (/ 1/2 (* y-scale y-scale)) (/ (* 1/2 (cos (* 1/90 (* angle (PI))))) (* y-scale y-scale))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (* x-scale x-scale) (* y-scale y-scale))) (pow (- (/ 1/2 (* x-scale x-scale)) (+ (/ 1/2 (* y-scale y-scale)) (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (* x-scale x-scale)) (/ (cos (* 1/90 (* angle (PI)))) (* y-scale y-scale)))))) 2))))) (* (* x-scale x-scale) (* y-scale y-scale))))) |
8 |
(+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (* y-scale y-scale))) (/ (* (pow b 4) (- (+ (/ 1/2 (* y-scale y-scale)) (/ (* 1/2 (cos (* 1/90 (* angle (PI))))) (* y-scale y-scale))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (* x-scale x-scale) (* y-scale y-scale))) (pow (- (/ 1/2 (* x-scale x-scale)) (+ (/ 1/2 (* y-scale y-scale)) (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (* x-scale x-scale)) (/ (cos (* 1/90 (* angle (PI)))) (* y-scale y-scale)))))) 2))))) (* (* x-scale x-scale) (* y-scale y-scale)))) |
(/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (* y-scale y-scale))) |
(* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) |
(pow b 4) |
4 |
(+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) |
1/2 |
(* -1/2 (cos (* 1/90 (* angle (PI))))) |
-1/2 |
(cos (* 1/90 (* angle (PI)))) |
(* 1/90 (* angle (PI))) |
1/90 |
(* angle (PI)) |
angle |
(PI) |
(* (pow x-scale 4) (* y-scale y-scale)) |
(pow x-scale 4) |
(/ (* (pow b 4) (- (+ (/ 1/2 (* y-scale y-scale)) (/ (* 1/2 (cos (* 1/90 (* angle (PI))))) (* y-scale y-scale))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (* x-scale x-scale) (* y-scale y-scale))) (pow (- (/ 1/2 (* x-scale x-scale)) (+ (/ 1/2 (* y-scale y-scale)) (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (* x-scale x-scale)) (/ (cos (* 1/90 (* angle (PI)))) (* y-scale y-scale)))))) 2))))) (* (* x-scale x-scale) (* y-scale y-scale))) |
(* (pow b 4) (- (+ (/ 1/2 (* y-scale y-scale)) (/ (* 1/2 (cos (* 1/90 (* angle (PI))))) (* y-scale y-scale))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (* x-scale x-scale) (* y-scale y-scale))) (pow (- (/ 1/2 (* x-scale x-scale)) (+ (/ 1/2 (* y-scale y-scale)) (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (* x-scale x-scale)) (/ (cos (* 1/90 (* angle (PI)))) (* y-scale y-scale)))))) 2))))) |
(- (+ (/ 1/2 (* y-scale y-scale)) (/ (* 1/2 (cos (* 1/90 (* angle (PI))))) (* y-scale y-scale))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (* x-scale x-scale) (* y-scale y-scale))) (pow (- (/ 1/2 (* x-scale x-scale)) (+ (/ 1/2 (* y-scale y-scale)) (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (* x-scale x-scale)) (/ (cos (* 1/90 (* angle (PI)))) (* y-scale y-scale)))))) 2)))) |
(+ (/ 1/2 (* y-scale y-scale)) (/ (* 1/2 (cos (* 1/90 (* angle (PI))))) (* y-scale y-scale))) |
(/ 1/2 (* y-scale y-scale)) |
(/ (* 1/2 (cos (* 1/90 (* angle (PI))))) (* y-scale y-scale)) |
(* 1/2 (cos (* 1/90 (* angle (PI))))) |
(sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (* x-scale x-scale) (* y-scale y-scale))) (pow (- (/ 1/2 (* x-scale x-scale)) (+ (/ 1/2 (* y-scale y-scale)) (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (* x-scale x-scale)) (/ (cos (* 1/90 (* angle (PI)))) (* y-scale y-scale)))))) 2))) |
(+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (* x-scale x-scale) (* y-scale y-scale))) (pow (- (/ 1/2 (* x-scale x-scale)) (+ (/ 1/2 (* y-scale y-scale)) (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (* x-scale x-scale)) (/ (cos (* 1/90 (* angle (PI)))) (* y-scale y-scale)))))) 2)) |
(/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (* x-scale x-scale) (* y-scale y-scale))) |
(pow (sin (* 1/90 (* angle (PI)))) 2) |
(sin (* 1/90 (* angle (PI)))) |
2 |
(* (* x-scale x-scale) (* y-scale y-scale)) |
(pow (- (/ 1/2 (* x-scale x-scale)) (+ (/ 1/2 (* y-scale y-scale)) (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (* x-scale x-scale)) (/ (cos (* 1/90 (* angle (PI)))) (* y-scale y-scale)))))) 2) |
(- (/ 1/2 (* x-scale x-scale)) (+ (/ 1/2 (* y-scale y-scale)) (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (* x-scale x-scale)) (/ (cos (* 1/90 (* angle (PI)))) (* y-scale y-scale)))))) |
(/ 1/2 (* x-scale x-scale)) |
(+ (/ 1/2 (* y-scale y-scale)) (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (* x-scale x-scale)) (/ (cos (* 1/90 (* angle (PI)))) (* y-scale y-scale))))) |
(* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (* x-scale x-scale)) (/ (cos (* 1/90 (* angle (PI)))) (* y-scale y-scale)))) |
(+ (/ (cos (* 1/90 (* angle (PI)))) (* x-scale x-scale)) (/ (cos (* 1/90 (* angle (PI)))) (* y-scale y-scale))) |
(/ (cos (* 1/90 (* angle (PI)))) (* x-scale x-scale)) |
(/ (cos (* 1/90 (* angle (PI)))) (* y-scale y-scale)) |
(* (* 1/4 (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (+ (/ (* (* a a) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) (/ (* (* b b) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale))) (* -1/2 (/ (+ (* (* -2 (+ (* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (* b b) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (/ (* (* a a) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) (/ (* (* b b) (pow 1 2)) (* x-scale x-scale)))) (/ (* 4 (* (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (* (+ a b) (+ a b)) (* (- b a) (- b a))))) (* x-scale x-scale))) (+ (* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (* b b) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
1/4 |
(* x-scale (* y-scale (sqrt 8))) |
x-scale |
(* y-scale (sqrt 8)) |
y-scale |
(sqrt 8) |
8 |
(sqrt (+ (+ (/ (* (* a a) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) (/ (* (* b b) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale))) (* -1/2 (/ (+ (* (* -2 (+ (* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (* b b) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (/ (* (* a a) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) (/ (* (* b b) (pow 1 2)) (* x-scale x-scale)))) (/ (* 4 (* (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (* (+ a b) (+ a b)) (* (- b a) (- b a))))) (* x-scale x-scale))) (+ (* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (* b b) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) |
(+ (+ (/ (* (* a a) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) (/ (* (* b b) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale))) (* -1/2 (/ (+ (* (* -2 (+ (* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (* b b) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (/ (* (* a a) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) (/ (* (* b b) (pow 1 2)) (* x-scale x-scale)))) (/ (* 4 (* (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (* (+ a b) (+ a b)) (* (- b a) (- b a))))) (* x-scale x-scale))) (+ (* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (* b b) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) |
(+ (/ (* (* a a) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) (/ (* (* b b) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale))) |
(/ (* (* a a) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) |
(* (* a a) (pow (sin (* 1/180 (* angle (PI)))) 2)) |
(* a a) |
a |
(pow (sin (* 1/180 (* angle (PI)))) 2) |
(sin (* 1/180 (* angle (PI)))) |
(* 1/180 (* angle (PI))) |
1/180 |
(* angle (PI)) |
angle |
(PI) |
2 |
(* x-scale x-scale) |
(/ (* (* b b) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) |
(* (* b b) (pow (cos (* 1/180 (* angle (PI)))) 2)) |
(* b b) |
b |
(pow (cos (* 1/180 (* angle (PI)))) 2) |
(cos (* 1/180 (* angle (PI)))) |
(* -1/2 (/ (+ (* (* -2 (+ (* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (* b b) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (/ (* (* a a) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) (/ (* (* b b) (pow 1 2)) (* x-scale x-scale)))) (/ (* 4 (* (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (* (+ a b) (+ a b)) (* (- b a) (- b a))))) (* x-scale x-scale))) (+ (* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (* b b) (pow (sin (* 1/180 (* angle (PI)))) 2))))) |
-1/2 |
(/ (+ (* (* -2 (+ (* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (* b b) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (/ (* (* a a) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) (/ (* (* b b) (pow 1 2)) (* x-scale x-scale)))) (/ (* 4 (* (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (* (+ a b) (+ a b)) (* (- b a) (- b a))))) (* x-scale x-scale))) (+ (* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (* b b) (pow (sin (* 1/180 (* angle (PI)))) 2)))) |
(+ (* (* -2 (+ (* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (* b b) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (/ (* (* a a) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) (/ (* (* b b) (pow 1 2)) (* x-scale x-scale)))) (/ (* 4 (* (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (* (+ a b) (+ a b)) (* (- b a) (- b a))))) (* x-scale x-scale))) |
(* (* -2 (+ (* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (* b b) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (/ (* (* a a) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) (/ (* (* b b) (pow 1 2)) (* x-scale x-scale)))) |
(* -2 (+ (* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (* b b) (pow (sin (* 1/180 (* angle (PI)))) 2)))) |
-2 |
(+ (* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (* b b) (pow (sin (* 1/180 (* angle (PI)))) 2))) |
(* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2)) |
(* (* b b) (pow (sin (* 1/180 (* angle (PI)))) 2)) |
(+ (/ (* (* a a) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) (/ (* (* b b) (pow 1 2)) (* x-scale x-scale))) |
(/ (* (* b b) (pow 1 2)) (* x-scale x-scale)) |
(* (* b b) (pow 1 2)) |
(pow 1 2) |
1 |
(/ (* 4 (* (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (* (+ a b) (+ a b)) (* (- b a) (- b a))))) (* x-scale x-scale)) |
(* 4 (* (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (* (+ a b) (+ a b)) (* (- b a) (- b a))))) |
4 |
(* (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (* (+ a b) (+ a b)) (* (- b a) (- b a)))) |
(* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) |
(* (* (+ a b) (+ a b)) (* (- b a) (- b a))) |
(* (+ a b) (+ a b)) |
(+ a b) |
(* (- b a) (- b a)) |
(- b a) |
| Outputs |
|---|
(* 1 (* a x-scale)) |
(*.f64 a x-scale) |
1 |
#s(literal 1 binary64) |
(* a x-scale) |
(*.f64 a x-scale) |
a |
x-scale |
(* (* 1/4 a) (* x-scale 4)) |
(*.f64 a x-scale) |
(* 1/4 a) |
(/.f64 a #s(literal 4 binary64)) |
1/4 |
#s(literal 1/4 binary64) |
a |
(* x-scale 4) |
(*.f64 x-scale #s(literal 4 binary64)) |
x-scale |
4 |
#s(literal 4 binary64) |
(* (/ (* (* a (* a a)) (* (* b b) 4)) (* 4 (* a (* b (* a b))))) (/ (/ 1 (* (* x-scale y-scale) y-scale)) (/ 1 (* x-scale (* (* x-scale y-scale) y-scale))))) |
(*.f64 a x-scale) |
(/ (* (* a (* a a)) (* (* b b) 4)) (* 4 (* a (* b (* a b))))) |
a |
(* (* a (* a a)) (* (* b b) 4)) |
(*.f64 (*.f64 a a) (*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 b b)))) |
(* a (* a a)) |
(*.f64 a (*.f64 a a)) |
a |
(* a a) |
(*.f64 a a) |
(* (* 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 (* a b)))) |
(*.f64 a (*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 b b)))) |
(* a (* b (* a b))) |
(*.f64 a (*.f64 a (*.f64 b b))) |
(* b (* a b)) |
(*.f64 a (*.f64 b b)) |
(* a b) |
(*.f64 a b) |
(/ (/ 1 (* (* x-scale y-scale) y-scale)) (/ 1 (* x-scale (* (* x-scale y-scale) y-scale)))) |
x-scale |
(/ 1 (* (* x-scale y-scale) y-scale)) |
(/.f64 (/.f64 (/.f64 #s(literal 1 binary64) y-scale) x-scale) y-scale) |
1 |
#s(literal 1 binary64) |
(* (* x-scale y-scale) y-scale) |
(*.f64 x-scale (*.f64 y-scale y-scale)) |
(* x-scale y-scale) |
(*.f64 x-scale y-scale) |
x-scale |
y-scale |
(/ 1 (* x-scale (* (* x-scale y-scale) y-scale))) |
(/.f64 (/.f64 (/.f64 (/.f64 #s(literal 1 binary64) y-scale) x-scale) y-scale) x-scale) |
(* x-scale (* (* x-scale y-scale) y-scale)) |
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) |
(* (* 1/4 (/ (* (* a (* x-scale x-scale)) (* y-scale y-scale)) (* b b))) (sqrt (* 8 (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (* y-scale y-scale))) (/ (* (pow b 4) (- (+ (/ 1/2 (* y-scale y-scale)) (/ (* 1/2 (cos (* 1/90 (* angle (PI))))) (* y-scale y-scale))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (* x-scale x-scale) (* y-scale y-scale))) (pow (- (/ 1/2 (* x-scale x-scale)) (+ (/ 1/2 (* y-scale y-scale)) (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (* x-scale x-scale)) (/ (cos (* 1/90 (* angle (PI)))) (* y-scale y-scale)))))) 2))))) (* (* x-scale x-scale) (* y-scale y-scale))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (/.f64 (*.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) b) b)) (sqrt.f64 (*.f64 #s(literal 8 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1 binary64)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1 binary64)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale))))) (/.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale y-scale)))) (*.f64 x-scale x-scale))))))) |
(* 1/4 (/ (* (* a (* x-scale x-scale)) (* y-scale y-scale)) (* b b))) |
(*.f64 #s(literal 1/4 binary64) (/.f64 (/.f64 (*.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) b) b)) |
1/4 |
#s(literal 1/4 binary64) |
(/ (* (* a (* x-scale x-scale)) (* y-scale y-scale)) (* b b)) |
(/.f64 (/.f64 (*.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) b) b) |
(* (* a (* x-scale x-scale)) (* y-scale y-scale)) |
(*.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) |
(* a (* x-scale x-scale)) |
(*.f64 a (*.f64 x-scale x-scale)) |
a |
(* x-scale x-scale) |
(*.f64 x-scale x-scale) |
x-scale |
(* y-scale y-scale) |
(*.f64 y-scale y-scale) |
y-scale |
(* b b) |
(*.f64 b b) |
b |
(sqrt (* 8 (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (* y-scale y-scale))) (/ (* (pow b 4) (- (+ (/ 1/2 (* y-scale y-scale)) (/ (* 1/2 (cos (* 1/90 (* angle (PI))))) (* y-scale y-scale))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (* x-scale x-scale) (* y-scale y-scale))) (pow (- (/ 1/2 (* x-scale x-scale)) (+ (/ 1/2 (* y-scale y-scale)) (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (* x-scale x-scale)) (/ (cos (* 1/90 (* angle (PI)))) (* y-scale y-scale)))))) 2))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) |
(sqrt.f64 (*.f64 #s(literal 8 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1 binary64)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1 binary64)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale))))) (/.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale y-scale)))) (*.f64 x-scale x-scale)))))) |
(* 8 (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (* y-scale y-scale))) (/ (* (pow b 4) (- (+ (/ 1/2 (* y-scale y-scale)) (/ (* 1/2 (cos (* 1/90 (* angle (PI))))) (* y-scale y-scale))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (* x-scale x-scale) (* y-scale y-scale))) (pow (- (/ 1/2 (* x-scale x-scale)) (+ (/ 1/2 (* y-scale y-scale)) (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (* x-scale x-scale)) (/ (cos (* 1/90 (* angle (PI)))) (* y-scale y-scale)))))) 2))))) (* (* x-scale x-scale) (* y-scale y-scale))))) |
(*.f64 #s(literal 8 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1 binary64)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1 binary64)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale))))) (/.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale y-scale)))) (*.f64 x-scale x-scale))))) |
8 |
#s(literal 8 binary64) |
(+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (* y-scale y-scale))) (/ (* (pow b 4) (- (+ (/ 1/2 (* y-scale y-scale)) (/ (* 1/2 (cos (* 1/90 (* angle (PI))))) (* y-scale y-scale))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (* x-scale x-scale) (* y-scale y-scale))) (pow (- (/ 1/2 (* x-scale x-scale)) (+ (/ 1/2 (* y-scale y-scale)) (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (* x-scale x-scale)) (/ (cos (* 1/90 (* angle (PI)))) (* y-scale y-scale)))))) 2))))) (* (* x-scale x-scale) (* y-scale y-scale)))) |
(*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1 binary64)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1 binary64)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale))))) (/.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale y-scale)))) (*.f64 x-scale x-scale)))) |
(/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (* y-scale y-scale))) |
(/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 #s(literal 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 y-scale (pow.f64 x-scale #s(literal 4 binary64))))) |
(* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) |
(*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) |
(pow b 4) |
(pow.f64 b #s(literal 4 binary64)) |
4 |
#s(literal 4 binary64) |
(+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) |
(+.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 |
#s(literal 1/2 binary64) |
(* -1/2 (cos (* 1/90 (* angle (PI))))) |
(*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) |
-1/2 |
#s(literal -1/2 binary64) |
(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))) |
1/90 |
#s(literal 1/90 binary64) |
(* angle (PI)) |
(*.f64 angle (PI.f64)) |
angle |
(PI) |
(PI.f64) |
(* (pow x-scale 4) (* y-scale y-scale)) |
(*.f64 y-scale (*.f64 y-scale (pow.f64 x-scale #s(literal 4 binary64)))) |
(pow x-scale 4) |
(pow.f64 x-scale #s(literal 4 binary64)) |
(/ (* (pow b 4) (- (+ (/ 1/2 (* y-scale y-scale)) (/ (* 1/2 (cos (* 1/90 (* angle (PI))))) (* y-scale y-scale))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (* x-scale x-scale) (* y-scale y-scale))) (pow (- (/ 1/2 (* x-scale x-scale)) (+ (/ 1/2 (* y-scale y-scale)) (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (* x-scale x-scale)) (/ (cos (* 1/90 (* angle (PI)))) (* y-scale y-scale)))))) 2))))) (* (* x-scale x-scale) (* y-scale y-scale))) |
(*.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1 binary64)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1 binary64)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale))))) (/.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale y-scale)))) (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) |
(* (pow b 4) (- (+ (/ 1/2 (* y-scale y-scale)) (/ (* 1/2 (cos (* 1/90 (* angle (PI))))) (* y-scale y-scale))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (* x-scale x-scale) (* y-scale y-scale))) (pow (- (/ 1/2 (* x-scale x-scale)) (+ (/ 1/2 (* y-scale y-scale)) (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (* x-scale x-scale)) (/ (cos (* 1/90 (* angle (PI)))) (* y-scale y-scale)))))) 2))))) |
(*.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1 binary64)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1 binary64)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale))))) (/.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale y-scale))))) |
(- (+ (/ 1/2 (* y-scale y-scale)) (/ (* 1/2 (cos (* 1/90 (* angle (PI))))) (* y-scale y-scale))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (* x-scale x-scale) (* y-scale y-scale))) (pow (- (/ 1/2 (* x-scale x-scale)) (+ (/ 1/2 (* y-scale y-scale)) (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (* x-scale x-scale)) (/ (cos (* 1/90 (* angle (PI)))) (* y-scale y-scale)))))) 2)))) |
(-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1 binary64)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1 binary64)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale))))) (/.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale y-scale)))) |
(+ (/ 1/2 (* y-scale y-scale)) (/ (* 1/2 (cos (* 1/90 (* angle (PI))))) (* y-scale y-scale))) |
(*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1 binary64)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) |
(/ 1/2 (* y-scale y-scale)) |
(/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) |
(/ (* 1/2 (cos (* 1/90 (* angle (PI))))) (* y-scale y-scale)) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) |
(* 1/2 (cos (* 1/90 (* angle (PI))))) |
(*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) |
(sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (* x-scale x-scale) (* y-scale y-scale))) (pow (- (/ 1/2 (* x-scale x-scale)) (+ (/ 1/2 (* y-scale y-scale)) (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (* x-scale x-scale)) (/ (cos (* 1/90 (* angle (PI)))) (* y-scale y-scale)))))) 2))) |
(hypot.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1 binary64)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale))))) (/.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale y-scale))) |
(+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (* x-scale x-scale) (* y-scale y-scale))) (pow (- (/ 1/2 (* x-scale x-scale)) (+ (/ 1/2 (* y-scale y-scale)) (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (* x-scale x-scale)) (/ (cos (* 1/90 (* angle (PI)))) (* y-scale y-scale)))))) 2)) |
(+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1 binary64)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale))))) #s(literal 2 binary64))) |
(/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (* x-scale x-scale) (* y-scale y-scale))) |
(/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) |
(pow (sin (* 1/90 (* angle (PI)))) 2) |
(pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) |
(sin (* 1/90 (* angle (PI)))) |
(sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) |
2 |
#s(literal 2 binary64) |
(* (* x-scale x-scale) (* y-scale y-scale)) |
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) |
(pow (- (/ 1/2 (* x-scale x-scale)) (+ (/ 1/2 (* y-scale y-scale)) (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (* x-scale x-scale)) (/ (cos (* 1/90 (* angle (PI)))) (* y-scale y-scale)))))) 2) |
(pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1 binary64)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale))))) #s(literal 2 binary64)) |
(- (/ 1/2 (* x-scale x-scale)) (+ (/ 1/2 (* y-scale y-scale)) (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (* x-scale x-scale)) (/ (cos (* 1/90 (* angle (PI)))) (* y-scale y-scale)))))) |
(-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1 binary64)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale))))) |
(/ 1/2 (* x-scale x-scale)) |
(/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) |
(+ (/ 1/2 (* y-scale y-scale)) (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (* x-scale x-scale)) (/ (cos (* 1/90 (* angle (PI)))) (* y-scale y-scale))))) |
(+.f64 (*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1 binary64)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)))) |
(* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (* x-scale x-scale)) (/ (cos (* 1/90 (* angle (PI)))) (* y-scale y-scale)))) |
(*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)))) |
(+ (/ (cos (* 1/90 (* angle (PI)))) (* x-scale x-scale)) (/ (cos (* 1/90 (* angle (PI)))) (* y-scale y-scale))) |
(+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))) |
(/ (cos (* 1/90 (* angle (PI)))) (* x-scale x-scale)) |
(/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) |
(/ (cos (* 1/90 (* angle (PI)))) (* y-scale y-scale)) |
(/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)) |
(* (* 1/4 (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (+ (/ (* (* a a) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) (/ (* (* b b) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale))) (* -1/2 (/ (+ (* (* -2 (+ (* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (* b b) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (/ (* (* a a) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) (/ (* (* b b) (pow 1 2)) (* x-scale x-scale)))) (/ (* 4 (* (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (* (+ a b) (+ a b)) (* (- b a) (- b a))))) (* x-scale x-scale))) (+ (* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (* b b) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) |
(*.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 1/4 binary64) (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 a (/.f64 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 b b) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 a (/.f64 a (*.f64 x-scale x-scale)))) (/.f64 (*.f64 b b) (*.f64 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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))))) (*.f64 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)))))))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(*.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal 1/4 binary64) (sqrt.f64 #s(literal 8 binary64)))) |
1/4 |
#s(literal 1/4 binary64) |
(* x-scale (* y-scale (sqrt 8))) |
(*.f64 y-scale (*.f64 x-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 (+ (+ (/ (* (* a a) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) (/ (* (* b b) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale))) (* -1/2 (/ (+ (* (* -2 (+ (* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (* b b) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (/ (* (* a a) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) (/ (* (* b b) (pow 1 2)) (* x-scale x-scale)))) (/ (* 4 (* (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (* (+ a b) (+ a b)) (* (- b a) (- b a))))) (* x-scale x-scale))) (+ (* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (* b b) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) |
(sqrt.f64 (+.f64 (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 a (/.f64 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 b b) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 a (/.f64 a (*.f64 x-scale x-scale)))) (/.f64 (*.f64 b b) (*.f64 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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))))) (*.f64 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)) (/ (* (* b b) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale))) (* -1/2 (/ (+ (* (* -2 (+ (* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (* b b) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (/ (* (* a a) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) (/ (* (* b b) (pow 1 2)) (* x-scale x-scale)))) (/ (* 4 (* (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (* (+ a b) (+ a b)) (* (- b a) (- b a))))) (* x-scale x-scale))) (+ (* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (* b b) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) |
(+.f64 (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 a (/.f64 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 b b) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 a (/.f64 a (*.f64 x-scale x-scale)))) (/.f64 (*.f64 b b) (*.f64 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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))))) (*.f64 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)) (/ (* (* b b) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale))) |
(+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 a (/.f64 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 b b) (*.f64 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 a (/.f64 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))) |
(* a a) |
(*.f64 a a) |
a |
(pow (sin (* 1/180 (* angle (PI)))) 2) |
(pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) |
(sin (* 1/180 (* angle (PI)))) |
(sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) |
(* 1/180 (* angle (PI))) |
(*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))) |
1/180 |
#s(literal 1/180 binary64) |
(* angle (PI)) |
(*.f64 angle (PI.f64)) |
angle |
(PI) |
(PI.f64) |
2 |
#s(literal 2 binary64) |
(* x-scale x-scale) |
(*.f64 x-scale x-scale) |
(/ (* (* b b) (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 (*.f64 b b) (*.f64 x-scale x-scale))) |
(* (* b b) (pow (cos (* 1/180 (* angle (PI)))) 2)) |
(*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) |
(* b b) |
(*.f64 b b) |
b |
(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/2 (/ (+ (* (* -2 (+ (* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (* b b) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (/ (* (* a a) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) (/ (* (* b b) (pow 1 2)) (* x-scale x-scale)))) (/ (* 4 (* (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (* (+ a b) (+ a b)) (* (- b a) (- b a))))) (* x-scale x-scale))) (+ (* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (* b b) (pow (sin (* 1/180 (* angle (PI)))) 2))))) |
(/.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 a (/.f64 a (*.f64 x-scale x-scale)))) (/.f64 (*.f64 b b) (*.f64 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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))))) (*.f64 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))))) |
-1/2 |
#s(literal -1/2 binary64) |
(/ (+ (* (* -2 (+ (* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (* b b) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (/ (* (* a a) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) (/ (* (* b b) (pow 1 2)) (* x-scale x-scale)))) (/ (* 4 (* (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (* (+ a b) (+ a b)) (* (- b a) (- b a))))) (* x-scale x-scale))) (+ (* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (* b b) (pow (sin (* 1/180 (* angle (PI)))) 2)))) |
(/.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 a (/.f64 a (*.f64 x-scale x-scale)))) (/.f64 (*.f64 b b) (*.f64 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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))))) (*.f64 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))))) |
(+ (* (* -2 (+ (* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (* b b) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (/ (* (* a a) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) (/ (* (* b b) (pow 1 2)) (* x-scale x-scale)))) (/ (* 4 (* (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (* (+ a b) (+ a b)) (* (- b a) (- b a))))) (* x-scale x-scale))) |
(+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 a (/.f64 a (*.f64 x-scale x-scale)))) (/.f64 (*.f64 b b) (*.f64 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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))))) (*.f64 x-scale x-scale))) |
(* (* -2 (+ (* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (* b b) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (/ (* (* a a) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) (/ (* (* b b) (pow 1 2)) (* x-scale x-scale)))) |
(*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 a (/.f64 a (*.f64 x-scale x-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) |
(* -2 (+ (* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (* b b) (pow (sin (* 1/180 (* angle (PI)))) 2)))) |
(*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))) |
-2 |
#s(literal -2 binary64) |
(+ (* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (* b b) (pow (sin (* 1/180 (* angle (PI)))) 2))) |
(+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) |
(* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2)) |
(*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) |
(* (* b b) (pow (sin (* 1/180 (* angle (PI)))) 2)) |
(*.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)) (/ (* (* b b) (pow 1 2)) (* x-scale x-scale))) |
(+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 a (/.f64 a (*.f64 x-scale x-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale))) |
(/ (* (* b b) (pow 1 2)) (* x-scale x-scale)) |
(/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) |
(* (* b b) (pow 1 2)) |
(*.f64 b b) |
(pow 1 2) |
#s(literal 1 binary64) |
1 |
#s(literal 1 binary64) |
(/ (* 4 (* (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (* (+ a b) (+ a b)) (* (- b a) (- b 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 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))))) (*.f64 x-scale x-scale)) |
(* 4 (* (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (* (+ a b) (+ a b)) (* (- b a) (- b a))))) |
(*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))))) |
4 |
#s(literal 4 binary64) |
(* (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (* (+ a b) (+ a b)) (* (- b a) (- b a)))) |
(*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) |
(* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) |
(*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) |
(* (* (+ a b) (+ a b)) (* (- b a) (- b a))) |
(*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))) |
(* (+ a b) (+ a b)) |
(*.f64 (+.f64 a b) (+.f64 a b)) |
(+ a b) |
(+.f64 a b) |
(* (- b a) (- b a)) |
(*.f64 (-.f64 b a) (-.f64 b a)) |
(- b a) |
(-.f64 b a) |
Found 17 expressions of interest:
| New | Metric | Score | Program |
|---|---|---|---|
| ✓ | accuracy | 100.0% | (sqrt.f64 #s(literal 8 binary64)) |
| ✓ | accuracy | 100.0% | (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
| ✓ | accuracy | 100.0% | (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
| ✓ | accuracy | 3.1% | (PI.f64) |
| ✓ | accuracy | 100.0% | (sqrt.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.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))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-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)))))) |
| ✓ | accuracy | 100.0% | (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) |
| ✓ | accuracy | 100.0% | (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) |
| ✓ | accuracy | 3.1% | (PI.f64) |
| ✓ | accuracy | 100.0% | (*.f64 a (*.f64 a a)) |
| ✓ | accuracy | 100.0% | (*.f64 a b) |
| ✓ | accuracy | 100.0% | (*.f64 a a) |
| ✓ | accuracy | 100.0% | (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 a b)))) |
| ✓ | accuracy | 100.0% | (*.f64 (*.f64 #s(literal 1/4 binary64) a) (*.f64 x-scale #s(literal 4 binary64))) |
| ✓ | accuracy | 100.0% | (*.f64 x-scale #s(literal 4 binary64)) |
| ✓ | accuracy | 100.0% | (*.f64 #s(literal 1/4 binary64) a) |
| ✓ | accuracy | 100.0% | (*.f64 a x-scale) |
| ✓ | accuracy | 100.0% | (*.f64 #s(literal 1 binary64) (*.f64 a x-scale)) |
| 4.0s | 256× | 5 | exit |
Compiled 2736 to 118 computations (95.7% saved)
ival-cos: 568.0ms (20.9% of total)ival-sin: 566.0ms (20.8% of total)ival-mult: 488.0ms (17.9% of total)backward-pass: 393.0ms (14.4% of total)ival-div: 277.0ms (10.2% of total)ival-pow: 135.0ms (5% of total)...c/correct-round.rkt:119:19: 107.0ms (3.9% of total)ival-add: 105.0ms (3.9% of total)ival-sqrt: 47.0ms (1.7% of total)ival-sub: 20.0ms (0.7% of total)ival-pi: 7.0ms (0.3% of total)const: 7.0ms (0.3% of total)| Inputs |
|---|
#<alt (* 1 (* a x-scale))> |
#<alt (* a x-scale)> |
#<alt (* (* 1/4 a) (* x-scale 4))> |
#<alt (* 1/4 a)> |
#<alt (* x-scale 4)> |
#<alt (/ (* (* a (* a a)) (* (* b b) 4)) (* 4 (* a (* b (* a b)))))> |
#<alt (/ (/ 1 (* (* x-scale y-scale) y-scale)) (/ 1 (* x-scale (* (* x-scale y-scale) y-scale))))> |
#<alt (* (/ (* (* a (* a a)) (* (* b b) 4)) (* 4 (* a (* b (* a b))))) (/ (/ 1 (* (* x-scale y-scale) y-scale)) (/ 1 (* x-scale (* (* x-scale y-scale) y-scale)))))> |
#<alt (* (* a (* a a)) (* (* b b) 4))> |
#<alt (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (* x-scale x-scale) (* y-scale y-scale))) (pow (- (/ 1/2 (* x-scale x-scale)) (+ (/ 1/2 (* y-scale y-scale)) (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (* x-scale x-scale)) (/ (cos (* 1/90 (* angle (PI)))) (* y-scale y-scale)))))) 2)))> |
#<alt (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (* y-scale y-scale))) (/ (* (pow b 4) (- (+ (/ 1/2 (* y-scale y-scale)) (/ (* 1/2 (cos (* 1/90 (* angle (PI))))) (* y-scale y-scale))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (* x-scale x-scale) (* y-scale y-scale))) (pow (- (/ 1/2 (* x-scale x-scale)) (+ (/ 1/2 (* y-scale y-scale)) (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (* x-scale x-scale)) (/ (cos (* 1/90 (* angle (PI)))) (* y-scale y-scale)))))) 2))))) (* (* x-scale x-scale) (* y-scale y-scale))))> |
#<alt (+ (/ 1/2 (* y-scale y-scale)) (/ (* 1/2 (cos (* 1/90 (* angle (PI))))) (* y-scale y-scale)))> |
#<alt (+ (/ 1/2 (* y-scale y-scale)) (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (* x-scale x-scale)) (/ (cos (* 1/90 (* angle (PI)))) (* y-scale y-scale)))))> |
#<alt (pow 1 2)> |
#<alt (* (* b b) (pow 1 2))> |
#<alt (* (* 1/4 (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (+ (/ (* (* a a) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) (/ (* (* b b) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale))) (* -1/2 (/ (+ (* (* -2 (+ (* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (* b b) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (/ (* (* a a) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) (/ (* (* b b) (pow 1 2)) (* x-scale x-scale)))) (/ (* 4 (* (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (* (+ a b) (+ a b)) (* (- b a) (- b a))))) (* x-scale x-scale))) (+ (* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (* b b) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))> |
#<alt (* 1/4 (* x-scale (* y-scale (sqrt 8))))> |
#<alt (* 4 (* a (* b (* a b))))> |
#<alt (* a a)> |
#<alt (* a b)> |
#<alt (* a (* a a))> |
#<alt (PI)> |
#<alt (cos (* 1/90 (* angle (PI))))> |
#<alt (sin (* 1/90 (* angle (PI))))> |
#<alt (sqrt (* 8 (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (* y-scale y-scale))) (/ (* (pow b 4) (- (+ (/ 1/2 (* y-scale y-scale)) (/ (* 1/2 (cos (* 1/90 (* angle (PI))))) (* y-scale y-scale))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (* x-scale x-scale) (* y-scale y-scale))) (pow (- (/ 1/2 (* x-scale x-scale)) (+ (/ 1/2 (* y-scale y-scale)) (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (* x-scale x-scale)) (/ (cos (* 1/90 (* angle (PI)))) (* y-scale y-scale)))))) 2))))) (* (* x-scale x-scale) (* y-scale y-scale))))))> |
#<alt (cos (* 1/180 (* angle (PI))))> |
#<alt (sin (* 1/180 (* angle (PI))))> |
#<alt (sqrt 8)> |
| 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)> |
#<alt (* 1/4 a)> |
#<alt (* 1/4 a)> |
#<alt (* 1/4 a)> |
#<alt (* 1/4 a)> |
#<alt (* 1/4 a)> |
#<alt (* 1/4 a)> |
#<alt (* 1/4 a)> |
#<alt (* 1/4 a)> |
#<alt (* 1/4 a)> |
#<alt (* 1/4 a)> |
#<alt (* 1/4 a)> |
#<alt (* 4 x-scale)> |
#<alt (* 4 x-scale)> |
#<alt (* 4 x-scale)> |
#<alt (* 4 x-scale)> |
#<alt (* 4 x-scale)> |
#<alt (* 4 x-scale)> |
#<alt (* 4 x-scale)> |
#<alt (* 4 x-scale)> |
#<alt (* 4 x-scale)> |
#<alt (* 4 x-scale)> |
#<alt (* 4 x-scale)> |
#<alt (* 4 x-scale)> |
#<alt a> |
#<alt a> |
#<alt a> |
#<alt a> |
#<alt a> |
#<alt a> |
#<alt a> |
#<alt a> |
#<alt a> |
#<alt a> |
#<alt a> |
#<alt a> |
#<alt a> |
#<alt a> |
#<alt a> |
#<alt a> |
#<alt a> |
#<alt a> |
#<alt a> |
#<alt a> |
#<alt a> |
#<alt a> |
#<alt a> |
#<alt a> |
#<alt x-scale> |
#<alt x-scale> |
#<alt x-scale> |
#<alt x-scale> |
#<alt x-scale> |
#<alt x-scale> |
#<alt x-scale> |
#<alt x-scale> |
#<alt x-scale> |
#<alt x-scale> |
#<alt x-scale> |
#<alt x-scale> |
#<alt x-scale> |
#<alt x-scale> |
#<alt x-scale> |
#<alt x-scale> |
#<alt x-scale> |
#<alt x-scale> |
#<alt x-scale> |
#<alt x-scale> |
#<alt x-scale> |
#<alt x-scale> |
#<alt x-scale> |
#<alt x-scale> |
#<alt (* a x-scale)> |
#<alt (* a x-scale)> |
#<alt (* a x-scale)> |
#<alt (* a x-scale)> |
#<alt (* a x-scale)> |
#<alt (* a x-scale)> |
#<alt (* a x-scale)> |
#<alt (* a x-scale)> |
#<alt (* a x-scale)> |
#<alt (* a x-scale)> |
#<alt (* a x-scale)> |
#<alt (* a x-scale)> |
#<alt (* a x-scale)> |
#<alt (* a x-scale)> |
#<alt (* a x-scale)> |
#<alt (* a x-scale)> |
#<alt (* a x-scale)> |
#<alt (* a x-scale)> |
#<alt (* a x-scale)> |
#<alt (* a x-scale)> |
#<alt (* a x-scale)> |
#<alt (* a x-scale)> |
#<alt (* a x-scale)> |
#<alt (* a x-scale)> |
#<alt (* a x-scale)> |
#<alt (* a x-scale)> |
#<alt (* a x-scale)> |
#<alt (* a x-scale)> |
#<alt (* a x-scale)> |
#<alt (* a x-scale)> |
#<alt (* a x-scale)> |
#<alt (* a x-scale)> |
#<alt (* a x-scale)> |
#<alt (* a x-scale)> |
#<alt (* a x-scale)> |
#<alt (* a x-scale)> |
#<alt (* a x-scale)> |
#<alt (* a x-scale)> |
#<alt (* a x-scale)> |
#<alt (* a x-scale)> |
#<alt (* a x-scale)> |
#<alt (* a x-scale)> |
#<alt (* 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)))> |
#<alt (* 4 (* (pow a 3) (pow b 2)))> |
#<alt (* 4 (* (pow a 3) (pow b 2)))> |
#<alt (* 4 (* (pow a 3) (pow b 2)))> |
#<alt (* 4 (* (pow a 3) (pow b 2)))> |
#<alt (* 4 (* (pow a 3) (pow b 2)))> |
#<alt (* 4 (* (pow a 3) (pow b 2)))> |
#<alt (* 4 (* (pow a 3) (pow b 2)))> |
#<alt (* 4 (* (pow a 3) (pow b 2)))> |
#<alt (* 4 (* (pow a 3) (pow b 2)))> |
#<alt (* 4 (* (pow a 3) (pow b 2)))> |
#<alt (* 4 (* (pow a 3) (pow b 2)))> |
#<alt (* 4 (* (pow a 3) (pow b 2)))> |
#<alt (* 4 (* (pow a 3) (pow b 2)))> |
#<alt (* 4 (* (pow a 3) (pow b 2)))> |
#<alt (* 4 (* (pow a 3) (pow b 2)))> |
#<alt (* 4 (* (pow a 3) (pow b 2)))> |
#<alt (* 4 (* (pow a 3) (pow b 2)))> |
#<alt (* 4 (* (pow a 3) (pow b 2)))> |
#<alt (* 4 (* (pow a 3) (pow b 2)))> |
#<alt (* 4 (* (pow a 3) (pow b 2)))> |
#<alt (* 4 (* (pow a 3) (pow b 2)))> |
#<alt (* 4 (* (pow a 3) (pow b 2)))> |
#<alt (* 4 (* (pow a 3) (pow b 2)))> |
#<alt (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2)))))> |
#<alt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (* (pow angle 2) (+ (* -1 (* (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/16200 (/ (pow (PI) 2) (pow y-scale 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2)))))> |
#<alt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (+ (* -1 (* (+ (* 1/1574640000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/1574640000 (/ (pow (PI) 4) (pow y-scale 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))) (+ (* -1/196830000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (pow (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/16200 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (* 1/4 (/ (pow (+ (* -1 (* (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/16200 (/ (pow (PI) 2) (pow y-scale 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 1/2 (/ (+ (* -1 (* (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/16200 (/ (pow (PI) 2) (pow y-scale 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2)))))))))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2)))))> |
#<alt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (* (pow angle 2) (+ (* 1/2 (/ (+ (* -1 (* (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/16200 (/ (pow (PI) 2) (pow y-scale 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (+ (* -1 (* (+ (* -1/382637520000000 (/ (pow (PI) 6) (pow x-scale 2))) (* -1/382637520000000 (/ (pow (PI) 6) (pow y-scale 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))) (+ (* 1/31886460000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/19131876000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/2 (* (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/16200 (/ (pow (PI) 2) (pow y-scale 2)))) (+ (* 1/1574640000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/1574640000 (/ (pow (PI) 4) (pow y-scale 2))))))))) (* 1/2 (/ (* (+ (* -1 (* (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/16200 (/ (pow (PI) 2) (pow y-scale 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* -1 (* (+ (* 1/1574640000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/1574640000 (/ (pow (PI) 4) (pow y-scale 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))) (+ (* -1/196830000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (pow (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/16200 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (* 1/4 (/ (pow (+ (* -1 (* (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/16200 (/ (pow (PI) 2) (pow y-scale 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2))))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 1/2 (/ (- (+ (* -1 (* (+ (* 1/1574640000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/1574640000 (/ (pow (PI) 4) (pow y-scale 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))) (+ (* -1/196830000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (pow (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/16200 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (* 1/4 (/ (pow (+ (* -1 (* (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/16200 (/ (pow (PI) 2) (pow y-scale 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2)))))))))))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2)))))> |
#<alt (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2)))> |
#<alt (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2)))> |
#<alt (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2)))> |
#<alt (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2)))> |
#<alt (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2)))> |
#<alt (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2)))> |
#<alt (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2)))> |
#<alt (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2)))> |
#<alt (/ (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))> |
#<alt (/ (- (+ 1/2 (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))> |
#<alt (/ (- (+ 1/2 (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (- (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))> |
#<alt (/ (- (+ 1/2 (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 2) (* (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) (- (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)))))) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 3))) (* 1/2 (/ (- (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))> |
#<alt (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))> |
#<alt (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) (* (pow x-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))))> |
#<alt (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) (* (pow x-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 1/2 (/ (- (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (* (pow x-scale 4) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))))))> |
#<alt (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) (- (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))) (* (pow x-scale 6) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 3)))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) (* (pow x-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 1/2 (/ (- (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (* (pow x-scale 4) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))))))> |
#<alt (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))> |
#<alt (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) (* (pow x-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))))> |
#<alt (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) (* (pow x-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 1/2 (/ (- (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (* (pow x-scale 4) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))))))> |
#<alt (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) (- (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))) (* (pow x-scale 6) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 3)))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) (* (pow x-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 1/2 (/ (- (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (* (pow x-scale 4) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))))))> |
#<alt (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow y-scale 2))> |
#<alt (/ (+ 1/2 (+ (* 1/2 (cos (* 1/90 (* angle (PI))))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (pow y-scale 2))> |
#<alt (/ (+ 1/2 (+ (* 1/2 (cos (* 1/90 (* angle (PI))))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow y-scale 2) (- (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))) (pow y-scale 2))> |
#<alt (/ (+ 1/2 (+ (* 1/2 (cos (* 1/90 (* angle (PI))))) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow y-scale 2) (* (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (- (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)))))) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 3))) (* 1/2 (/ (- (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))) (pow y-scale 2))> |
#<alt (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))> |
#<alt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 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) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))> |
#<alt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 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) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) (* 1/2 (/ (- (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) 2) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 2)))) (* (pow y-scale 4) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))> |
#<alt (- (+ (* -1/4 (/ (* (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (- (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) 2) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 2))))) (* (pow y-scale 6) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 3)))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 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) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) (* 1/2 (/ (- (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) 2) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 2)))) (* (pow y-scale 4) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))> |
#<alt (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))> |
#<alt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 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) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))> |
#<alt (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 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) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) (* 1/2 (/ (- (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) 2) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 2)))) (* (pow y-scale 4) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))> |
#<alt (- (+ (* -1/4 (/ (* (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (- (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) 2) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 2))))) (* (pow y-scale 6) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 3)))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 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) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) (* 1/2 (/ (- (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) 2) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 2)))) (* (pow y-scale 4) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))> |
#<alt (* (pow b 4) (- (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 4) (pow y-scale 2)))) (+ (* 1/2 (/ 1 (* (pow x-scale 2) (pow y-scale 4)))) (+ (* 1/2 (/ 1 (* (pow x-scale 4) (pow y-scale 2)))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 2) (pow y-scale 4))))))) (* (/ 1 (* (pow x-scale 2) (pow y-scale 2))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2))))))> |
#<alt (* (pow b 4) (- (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 4) (pow y-scale 2)))) (+ (* 1/2 (/ 1 (* (pow x-scale 2) (pow y-scale 4)))) (+ (* 1/2 (/ 1 (* (pow x-scale 4) (pow y-scale 2)))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 2) (pow y-scale 4))))))) (* (/ 1 (* (pow x-scale 2) (pow y-scale 2))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2))))))> |
#<alt (* (pow b 4) (- (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 4) (pow y-scale 2)))) (+ (* 1/2 (/ 1 (* (pow x-scale 2) (pow y-scale 4)))) (+ (* 1/2 (/ 1 (* (pow x-scale 4) (pow y-scale 2)))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 2) (pow y-scale 4))))))) (* (/ 1 (* (pow x-scale 2) (pow y-scale 2))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2))))))> |
#<alt (* (pow b 4) (- (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 4) (pow y-scale 2)))) (+ (* 1/2 (/ 1 (* (pow x-scale 2) (pow y-scale 4)))) (+ (* 1/2 (/ 1 (* (pow x-scale 4) (pow y-scale 2)))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 2) (pow y-scale 4))))))) (* (/ 1 (* (pow x-scale 2) (pow y-scale 2))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2))))))> |
#<alt (* (pow b 4) (- (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 4) (pow y-scale 2)))) (+ (* 1/2 (/ 1 (* (pow x-scale 2) (pow y-scale 4)))) (+ (* 1/2 (/ 1 (* (pow x-scale 4) (pow y-scale 2)))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 2) (pow y-scale 4))))))) (* (/ 1 (* (pow x-scale 2) (pow y-scale 2))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2))))))> |
#<alt (* (pow b 4) (- (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 4) (pow y-scale 2)))) (+ (* 1/2 (/ 1 (* (pow x-scale 2) (pow y-scale 4)))) (+ (* 1/2 (/ 1 (* (pow x-scale 4) (pow y-scale 2)))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 2) (pow y-scale 4))))))) (* (/ 1 (* (pow x-scale 2) (pow y-scale 2))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2))))))> |
#<alt (* (pow b 4) (- (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 4) (pow y-scale 2)))) (+ (* 1/2 (/ 1 (* (pow x-scale 2) (pow y-scale 4)))) (+ (* 1/2 (/ 1 (* (pow x-scale 4) (pow y-scale 2)))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 2) (pow y-scale 4))))))) (* (/ 1 (* (pow x-scale 2) (pow y-scale 2))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2))))))> |
#<alt (* (pow b 4) (- (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 4) (pow y-scale 2)))) (+ (* 1/2 (/ 1 (* (pow x-scale 2) (pow y-scale 4)))) (+ (* 1/2 (/ 1 (* (pow x-scale 4) (pow y-scale 2)))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 2) (pow y-scale 4))))))) (* (/ 1 (* (pow x-scale 2) (pow y-scale 2))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2))))))> |
#<alt (* (pow b 4) (- (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 4) (pow y-scale 2)))) (+ (* 1/2 (/ 1 (* (pow x-scale 2) (pow y-scale 4)))) (+ (* 1/2 (/ 1 (* (pow x-scale 4) (pow y-scale 2)))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 2) (pow y-scale 4))))))) (* (/ 1 (* (pow x-scale 2) (pow y-scale 2))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2))))))> |
#<alt (* (pow b 4) (- (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 4) (pow y-scale 2)))) (+ (* 1/2 (/ 1 (* (pow x-scale 2) (pow y-scale 4)))) (+ (* 1/2 (/ 1 (* (pow x-scale 4) (pow y-scale 2)))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 2) (pow y-scale 4))))))) (* (/ 1 (* (pow x-scale 2) (pow y-scale 2))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2))))))> |
#<alt (* (pow b 4) (- (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 4) (pow y-scale 2)))) (+ (* 1/2 (/ 1 (* (pow x-scale 2) (pow y-scale 4)))) (+ (* 1/2 (/ 1 (* (pow x-scale 4) (pow y-scale 2)))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 2) (pow y-scale 4))))))) (* (/ 1 (* (pow x-scale 2) (pow y-scale 2))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2))))))> |
#<alt (* (pow b 4) (- (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 4) (pow y-scale 2)))) (+ (* 1/2 (/ 1 (* (pow x-scale 2) (pow y-scale 4)))) (+ (* 1/2 (/ 1 (* (pow x-scale 4) (pow y-scale 2)))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 2) (pow y-scale 4))))))) (* (/ 1 (* (pow x-scale 2) (pow y-scale 2))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2))))))> |
#<alt (/ (* (pow b 4) (- (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 3/2 (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow x-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))> |
#<alt (+ (* (pow angle 2) (+ (* 1/32400 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 4) (pow y-scale 2)))) (/ (* (pow b 4) (- (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (+ (* -1 (* (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/16200 (/ (pow (PI) 2) (pow y-scale 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))))) (* (pow x-scale 2) (pow y-scale 2))))) (/ (* (pow b 4) (- (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 3/2 (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow x-scale 2))))) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (+ (* (pow angle 2) (+ (* 1/32400 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 4) (pow y-scale 2)))) (+ (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow b 4) (pow (PI) 4)) (* (pow x-scale 4) (pow y-scale 2)))) (/ (* (pow b 4) (- (* 1/3149280000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1 (* (+ (* 1/1574640000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/1574640000 (/ (pow (PI) 4) (pow y-scale 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))) (+ (* -1/196830000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (pow (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/16200 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (* 1/4 (/ (pow (+ (* -1 (* (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/16200 (/ (pow (PI) 2) (pow y-scale 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))))) (* (pow x-scale 2) (pow y-scale 2))))) (/ (* (pow b 4) (- (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (+ (* -1 (* (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/16200 (/ (pow (PI) 2) (pow y-scale 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))))) (* (pow x-scale 2) (pow y-scale 2)))))) (/ (* (pow b 4) (- (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 3/2 (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow x-scale 2))))) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (+ (* (pow angle 2) (+ (* 1/32400 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 4) (pow y-scale 2)))) (+ (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow b 4) (pow (PI) 4)) (* (pow x-scale 4) (pow y-scale 2)))) (+ (* (pow angle 2) (+ (* 1/765275040000000 (/ (* (pow b 4) (pow (PI) 6)) (* (pow x-scale 4) (pow y-scale 2)))) (/ (* (pow b 4) (- (* -1/765275040000000 (/ (pow (PI) 6) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1 (* (+ (* -1/382637520000000 (/ (pow (PI) 6) (pow x-scale 2))) (* -1/382637520000000 (/ (pow (PI) 6) (pow y-scale 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))) (+ (* 1/31886460000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/19131876000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/2 (* (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/16200 (/ (pow (PI) 2) (pow y-scale 2)))) (+ (* 1/1574640000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/1574640000 (/ (pow (PI) 4) (pow y-scale 2))))))))) (* 1/2 (/ (* (+ (* -1 (* (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/16200 (/ (pow (PI) 2) (pow y-scale 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* -1 (* (+ (* 1/1574640000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/1574640000 (/ (pow (PI) 4) (pow y-scale 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))) (+ (* -1/196830000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (pow (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/16200 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (* 1/4 (/ (pow (+ (* -1 (* (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/16200 (/ (pow (PI) 2) (pow y-scale 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2))))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))))) (* (pow x-scale 2) (pow y-scale 2))))) (/ (* (pow b 4) (- (* 1/3149280000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1 (* (+ (* 1/1574640000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/1574640000 (/ (pow (PI) 4) (pow y-scale 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))) (+ (* -1/196830000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (pow (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/16200 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (* 1/4 (/ (pow (+ (* -1 (* (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/16200 (/ (pow (PI) 2) (pow y-scale 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))))) (* (pow x-scale 2) (pow y-scale 2)))))) (/ (* (pow b 4) (- (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (+ (* -1 (* (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/16200 (/ (pow (PI) 2) (pow y-scale 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))))) (* (pow x-scale 2) (pow y-scale 2)))))) (/ (* (pow b 4) (- (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 3/2 (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow x-scale 2))))) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))) (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2))))) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))) (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2))))) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))) (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2))))) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))) (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2))))) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))) (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2))))) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))) (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2))))) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))) (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2))))) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))) (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2))))) (* (pow x-scale 2) (pow y-scale 2))))> |
#<alt (/ (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 4) (- (* 1/2 (cos (* 1/90 (* angle (PI))))) 1/2)) (pow y-scale 2))) (pow x-scale 4))> |
#<alt (/ (+ (/ (* (pow b 4) (* (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 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow y-scale 2)) (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 4) (- (* 1/2 (cos (* 1/90 (* angle (PI))))) 1/2)) (pow y-scale 2)))) (pow x-scale 4))> |
#<alt (/ (+ (* (pow x-scale 2) (+ (* -1/2 (/ (* (pow b 4) (* (pow x-scale 2) (- (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)))))) (* (pow y-scale 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (pow y-scale 2)))) (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 4) (- (* 1/2 (cos (* 1/90 (* angle (PI))))) 1/2)) (pow y-scale 2)))) (pow x-scale 4))> |
#<alt (/ (+ (* (pow x-scale 2) (+ (* (pow x-scale 2) (+ (* -1/2 (/ (* (pow b 4) (- (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2))))) (* (pow y-scale 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* 1/4 (/ (* (pow b 4) (* (pow x-scale 2) (* (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) (- (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2))))))) (* (pow y-scale 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 3)))))) (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (pow y-scale 2)))) (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 4) (- (* 1/2 (cos (* 1/90 (* angle (PI))))) 1/2)) (pow y-scale 2)))) (pow x-scale 4))> |
#<alt (/ (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (pow x-scale 4))> |
#<alt (/ (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (+ (* -1/2 (/ (* (pow b 4) (- (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (pow x-scale 4))> |
#<alt (/ (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (+ (* -1/2 (/ (* (pow b 4) (- (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (+ (* 1/4 (/ (* (pow b 4) (* (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) (- (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 3))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (pow x-scale 4))> |
#<alt (/ (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (+ (* -1/2 (/ (* (pow b 4) (- (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (+ (* 1/4 (/ (* (pow b 4) (* (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) (- (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 3))))) (+ (* 1/2 (/ (* (pow b 4) (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (- (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 4))) (* 1/4 (/ (pow (- (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))) (* (pow x-scale 6) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (pow x-scale 4))> |
#<alt (/ (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (pow x-scale 4))> |
#<alt (/ (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (+ (* -1/2 (/ (* (pow b 4) (- (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (pow x-scale 4))> |
#<alt (/ (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (+ (* -1/2 (/ (* (pow b 4) (- (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (+ (* 1/4 (/ (* (pow b 4) (* (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) (- (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 3))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (pow x-scale 4))> |
#<alt (/ (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (+ (* -1/2 (/ (* (pow b 4) (- (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (+ (* 1/4 (/ (* (pow b 4) (* (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) (- (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 3))))) (+ (* 1/2 (/ (* (pow b 4) (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (- (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 4))) (* 1/4 (/ (pow (- (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))) (* (pow x-scale 6) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (pow x-scale 4))> |
#<alt (/ (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)))) (* (pow x-scale 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4))) (pow y-scale 2))> |
#<alt (/ (+ (* -1/2 (/ (* (pow b 4) (* (pow y-scale 2) (- (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)))))) (* (pow x-scale 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)))) (* (pow x-scale 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4)))) (pow y-scale 2))> |
#<alt (/ (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)))) (* (pow x-scale 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (+ (* (pow y-scale 2) (+ (* -1/2 (/ (* (pow b 4) (- (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2))))) (* (pow x-scale 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* 1/4 (/ (* (pow b 4) (* (pow y-scale 2) (* (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (- (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2))))))) (* (pow x-scale 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 3)))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4)))) (pow y-scale 2))> |
#<alt (/ (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)))) (* (pow x-scale 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (+ (* (pow y-scale 2) (+ (* -1/2 (/ (* (pow b 4) (- (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2))))) (* (pow x-scale 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow y-scale 2) (+ (* 1/4 (/ (* (pow b 4) (* (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (- (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)))))) (* (pow x-scale 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 3)))) (* 1/2 (/ (* (pow b 4) (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) 2) (- (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2))))) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 4))) (* 1/4 (/ (pow (- (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)))) 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)))))) (* (pow x-scale 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4)))) (pow y-scale 2))> |
#<alt (/ (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4)) (/ (* (pow b 4) (- (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (pow x-scale 2))) (pow y-scale 2))> |
#<alt (/ (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4)) (+ (/ (* (pow b 4) (- (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (pow x-scale 2)) (/ (* (pow b 4) (- (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (* 1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))) (* (pow x-scale 2) (pow y-scale 2))))) (pow y-scale 2))> |
#<alt (/ (+ (* -1/2 (/ (* (pow b 4) (- (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) 2) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 2))))) (* (pow x-scale 2) (* (pow y-scale 4) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))) (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4)) (+ (/ (* (pow b 4) (- (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (pow x-scale 2)) (/ (* (pow b 4) (- (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (* 1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow y-scale 2))> |
#<alt (/ (+ (* -1/2 (/ (* (pow b 4) (- (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) 2) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 2))))) (* (pow x-scale 2) (* (pow y-scale 4) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))) (+ (* 1/4 (/ (* (pow b 4) (* (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (- (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) 2) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 6) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 3))))) (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4)) (+ (/ (* (pow b 4) (- (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (pow x-scale 2)) (/ (* (pow b 4) (- (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (* 1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow y-scale 2))> |
#<alt (/ (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4)) (/ (* (pow b 4) (- (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (pow x-scale 2))) (pow y-scale 2))> |
#<alt (/ (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4)) (+ (/ (* (pow b 4) (- (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (pow x-scale 2)) (/ (* (pow b 4) (- (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (* 1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))) (* (pow x-scale 2) (pow y-scale 2))))) (pow y-scale 2))> |
#<alt (/ (+ (* -1/2 (/ (* (pow b 4) (- (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) 2) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 2))))) (* (pow x-scale 2) (* (pow y-scale 4) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))) (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4)) (+ (/ (* (pow b 4) (- (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (pow x-scale 2)) (/ (* (pow b 4) (- (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (* 1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow y-scale 2))> |
#<alt (/ (+ (* -1/2 (/ (* (pow b 4) (- (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) 2) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 2))))) (* (pow x-scale 2) (* (pow y-scale 4) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))) (+ (* 1/4 (/ (* (pow b 4) (* (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (- (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) 2) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 6) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 3))))) (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4)) (+ (/ (* (pow b 4) (- (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (pow x-scale 2)) (/ (* (pow b 4) (- (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (* 1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow y-scale 2))> |
#<alt (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow y-scale 2))> |
#<alt (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow y-scale 2))> |
#<alt (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow y-scale 2))> |
#<alt (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow y-scale 2))> |
#<alt (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow y-scale 2))> |
#<alt (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow y-scale 2))> |
#<alt (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow y-scale 2))> |
#<alt (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow y-scale 2))> |
#<alt (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow y-scale 2))> |
#<alt (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow y-scale 2))> |
#<alt (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow y-scale 2))> |
#<alt (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow y-scale 2))> |
#<alt (/ 1 (pow y-scale 2))> |
#<alt (+ (* -1/32400 (/ (* (pow angle 2) (pow (PI) 2)) (pow y-scale 2))) (/ 1 (pow y-scale 2)))> |
#<alt (+ (* (pow angle 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow angle 2) (pow (PI) 4)) (pow y-scale 2))))) (/ 1 (pow y-scale 2)))> |
#<alt (+ (* (pow angle 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* (pow angle 2) (+ (* -1/765275040000000 (/ (* (pow angle 2) (pow (PI) 6)) (pow y-scale 2))) (* 1/3149280000 (/ (pow (PI) 4) (pow y-scale 2))))))) (/ 1 (pow y-scale 2)))> |
#<alt (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))> |
#<alt (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))> |
#<alt (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))> |
#<alt (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))> |
#<alt (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))> |
#<alt (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))> |
#<alt (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))> |
#<alt (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))> |
#<alt (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow y-scale 2))> |
#<alt (/ (+ 1/2 (+ (* 1/2 (cos (* 1/90 (* angle (PI))))) (* 1/2 (/ (* (pow y-scale 2) (cos (* 1/90 (* angle (PI))))) (pow x-scale 2))))) (pow y-scale 2))> |
#<alt (/ (+ 1/2 (+ (* 1/2 (cos (* 1/90 (* angle (PI))))) (* 1/2 (/ (* (pow y-scale 2) (cos (* 1/90 (* angle (PI))))) (pow x-scale 2))))) (pow y-scale 2))> |
#<alt (/ (+ 1/2 (+ (* 1/2 (cos (* 1/90 (* angle (PI))))) (* 1/2 (/ (* (pow y-scale 2) (cos (* 1/90 (* angle (PI))))) (pow x-scale 2))))) (pow y-scale 2))> |
#<alt (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))> |
#<alt (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))> |
#<alt (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))> |
#<alt (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))> |
#<alt (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))> |
#<alt (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))> |
#<alt (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))> |
#<alt (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))> |
#<alt (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))> |
#<alt (+ (* 1/2 (* (pow angle 2) (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/16200 (/ (pow (PI) 2) (pow y-scale 2)))))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2)))))> |
#<alt (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* (pow angle 2) (+ (* 1/2 (* (pow angle 2) (+ (* 1/1574640000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/1574640000 (/ (pow (PI) 4) (pow y-scale 2)))))) (* 1/2 (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/16200 (/ (pow (PI) 2) (pow y-scale 2)))))))))> |
#<alt (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* (pow angle 2) (+ (* 1/2 (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/16200 (/ (pow (PI) 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* 1/2 (* (pow angle 2) (+ (* -1/382637520000000 (/ (pow (PI) 6) (pow x-scale 2))) (* -1/382637520000000 (/ (pow (PI) 6) (pow y-scale 2)))))) (* 1/2 (+ (* 1/1574640000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/1574640000 (/ (pow (PI) 4) (pow y-scale 2)))))))))))> |
#<alt (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))> |
#<alt (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))> |
#<alt (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))> |
#<alt (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))> |
#<alt (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))> |
#<alt (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))> |
#<alt (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))> |
#<alt (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))> |
#<alt (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))> |
#<alt (/ (+ (* 1/2 (cos (* 1/90 (* angle (PI))))) (* (pow x-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (pow x-scale 2))> |
#<alt (/ (+ (* 1/2 (cos (* 1/90 (* angle (PI))))) (* (pow x-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (pow x-scale 2))> |
#<alt (/ (+ (* 1/2 (cos (* 1/90 (* angle (PI))))) (* (pow x-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (pow x-scale 2))> |
#<alt (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))> |
#<alt (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))> |
#<alt (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))> |
#<alt (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))> |
#<alt (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))> |
#<alt (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))> |
#<alt (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))> |
#<alt (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))> |
#<alt (pow b 2)> |
#<alt (pow b 2)> |
#<alt (pow b 2)> |
#<alt (pow b 2)> |
#<alt (pow b 2)> |
#<alt (pow b 2)> |
#<alt (pow b 2)> |
#<alt (pow b 2)> |
#<alt (pow b 2)> |
#<alt (pow b 2)> |
#<alt (pow b 2)> |
#<alt (pow b 2)> |
#<alt (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow b 2)))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))> |
#<alt (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow b 2)))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))> |
#<alt (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow b 2)))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))> |
#<alt (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow b 2)))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))> |
#<alt (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow b 2)))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))> |
#<alt (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow b 2)))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))> |
#<alt (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow b 2)))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))> |
#<alt (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow b 2)))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))> |
#<alt (* -1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow b 2)))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))> |
#<alt (* -1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow b 2)))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))> |
#<alt (* -1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow b 2)))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))> |
#<alt (* -1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow b 2)))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))> |
#<alt (+ (* -1/4 (* (/ (* a (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))))) (* (pow b 2) x-scale)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))> |
#<alt (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* a (+ (* -1/4 (* (/ (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))))) (* (pow b 2) x-scale)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* 1/8 (* (* a (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow b 2) (pow x-scale 2))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow b 4) (* (pow x-scale 4) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))> |
#<alt (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* a (+ (* -1/4 (* (/ (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))))) (* (pow b 2) x-scale)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* a (+ (* 1/8 (* (* a (* x-scale (* y-scale (* (sqrt 8) (- (* -1/2 (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* (pow b 2) (pow x-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow b 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (+ (* -2 (pow b 3)) (* 2 (pow b 3))) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow b 2) (pow x-scale 2))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow b 4) (* (pow x-scale 4) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (* (pow b 2) (* (pow x-scale 2) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))))) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow b 2) (pow x-scale 2))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow b 4) (* (pow x-scale 4) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))))> |
#<alt (* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))> |
#<alt (* a (+ (* -1/4 (* (/ (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b))))) (* a x-scale)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))> |
#<alt (* a (+ (* -1/4 (* (/ (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b))))) (* a x-scale)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (pow x-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) (pow a 2)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))> |
#<alt (* a (+ (* -1/4 (* (/ (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b))))) (* a x-scale)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/2 (- (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (pow x-scale 2))) (* 4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (+ (* -2 b) (* 2 b)))) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* -1 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -2 b) (* 2 b)) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (pow x-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* (pow x-scale 2) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 3)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (pow x-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) (pow a 2)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))> |
#<alt (* -1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))> |
#<alt (* -1 (* a (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* 1/4 (* (/ (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b))))) (* a x-scale)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))> |
#<alt (* -1 (* a (+ (* -1 (/ (+ (* -1/4 (* (/ (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b))))) x-scale) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (pow x-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) a) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) a)) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))> |
#<alt (* -1 (* a (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/2 (- (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (pow x-scale 2))) (* 4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (+ (* -2 b) (* 2 b)))) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* -1 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -2 b) (* 2 b)) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (pow x-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* (pow x-scale 2) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) a) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (pow x-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) a)) (* -1/4 (* (/ (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b))))) x-scale) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) a)) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))> |
#<alt (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))> |
#<alt (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/2 (- (+ (* -2 (/ (+ (* 1/32400 (/ (* (pow a 4) (pow (PI) 2)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2))) (pow a 2))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow a 2) (pow x-scale 2))))) (* -2 (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow a 2) (pow x-scale 2)))))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))))))))) (* b (sqrt 2)))) (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))))> |
#<alt (+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (* -1/3149280000 (/ (* (pow a 4) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))))) (pow x-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow x-scale 2)))) (pow a 2))) (* 4 (/ (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))) (pow a 2)))) (+ (* -2 (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow a 2) (pow x-scale 2)))) (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (- (+ (* -2 (/ (+ (* 1/32400 (/ (* (pow a 4) (pow (PI) 2)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2))) (pow a 2))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow a 2) (pow x-scale 2))))) (* -2 (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow a 2) (pow x-scale 2)))))) (pow a 2))))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/2 (- (+ (* -2 (/ (+ (* 1/32400 (/ (* (pow a 4) (pow (PI) 2)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2))) (pow a 2))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow a 2) (pow x-scale 2))))) (* -2 (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow a 2) (pow x-scale 2)))))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/2 (- (+ (* -2 (/ (+ (* 1/32400 (/ (* (pow a 4) (pow (PI) 2)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2))) (pow a 2))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow a 2) (pow x-scale 2))))) (* -2 (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow a 2) (pow x-scale 2)))))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))))))) (* b (sqrt 2)))))))> |
#<alt (+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/2 (- (+ (* -2 (/ (+ (* 1/32400 (/ (* (pow a 4) (pow (PI) 2)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2))) (pow a 2))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow a 2) (pow x-scale 2))))) (* -2 (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow a 2) (pow x-scale 2)))))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))))))) (* b (sqrt 2)))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (* -1/3149280000 (/ (* (pow a 2) (* (pow (PI) 4) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))))) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (pow x-scale 2))) (+ (/ (* (pow a 4) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))) (pow x-scale 2))))) (pow a 2))) (* 4 (/ (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- b a) 2)))) (pow x-scale 2))) (/ (* (pow (+ a b) 2) (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- b a) 2))) (pow x-scale 2)))) (pow a 2)))) (+ (* -2 (/ (* (pow b 2) (+ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))) (* (pow a 2) (pow x-scale 2)))) (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (- (+ (* -2 (/ (+ (* -1/3149280000 (/ (* (pow a 4) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))))) (pow x-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow x-scale 2)))) (pow a 2))) (* 4 (/ (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))) (pow a 2)))) (+ (* -2 (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow a 2) (pow x-scale 2)))) (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (- (+ (* -2 (/ (+ (* 1/32400 (/ (* (pow a 4) (pow (PI) 2)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2))) (pow a 2))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow a 2) (pow x-scale 2))))) (* -2 (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow a 2) (pow x-scale 2)))))) (pow a 2))))) (pow a 2)) (/ (* (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (- (+ (* -2 (/ (+ (* 1/32400 (/ (* (pow a 4) (pow (PI) 2)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2))) (pow a 2))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow a 2) (pow x-scale 2))))) (* -2 (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow a 2) (pow x-scale 2)))))) (pow a 2)))))) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2)))) (* 1/2 (/ (* (pow x-scale 2) (* (+ (* -1/2 (- (+ (* -2 (/ (+ (* 1/32400 (/ (* (pow a 4) (pow (PI) 2)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2))) (pow a 2))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow a 2) (pow x-scale 2))))) (* -2 (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow a 2) (pow x-scale 2)))))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))))) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (* -1/3149280000 (/ (* (pow a 4) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))))) (pow x-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow x-scale 2)))) (pow a 2))) (* 4 (/ (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))) (pow a 2)))) (+ (* -2 (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow a 2) (pow x-scale 2)))) (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (- (+ (* -2 (/ (+ (* 1/32400 (/ (* (pow a 4) (pow (PI) 2)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2))) (pow a 2))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow a 2) (pow x-scale 2))))) (* -2 (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow a 2) (pow x-scale 2)))))) (pow a 2))))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/2 (- (+ (* -2 (/ (+ (* 1/32400 (/ (* (pow a 4) (pow (PI) 2)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2))) (pow a 2))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow a 2) (pow x-scale 2))))) (* -2 (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow a 2) (pow x-scale 2)))))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (* -1/3149280000 (/ (* (pow a 4) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))))) (pow x-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow x-scale 2)))) (pow a 2))) (* 4 (/ (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))) (pow a 2)))) (+ (* -2 (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow a 2) (pow x-scale 2)))) (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (- (+ (* -2 (/ (+ (* 1/32400 (/ (* (pow a 4) (pow (PI) 2)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2))) (pow a 2))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow a 2) (pow x-scale 2))))) (* -2 (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow a 2) (pow x-scale 2)))))) (pow a 2))))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/2 (- (+ (* -2 (/ (+ (* 1/32400 (/ (* (pow a 4) (pow (PI) 2)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2))) (pow a 2))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow a 2) (pow x-scale 2))))) (* -2 (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow a 2) (pow x-scale 2)))))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))))) 2)) (* (pow b 2) (pow (sqrt 2) 2)))))))) (* b (sqrt 2)))))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))> |
#<alt (+ (* -1/4 (* (/ (* b (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))))) (* (pow a 2) x-scale)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))> |
#<alt (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* b (+ (* -1/4 (* (/ (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))))) (* (pow a 2) x-scale)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* 1/8 (* (* b (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow a 2) (pow x-scale 2))))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))) (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow a 4) (* (pow x-scale 4) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))> |
#<alt (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* b (+ (* -1/4 (* (/ (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))))) (* (pow a 2) x-scale)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* b (+ (* 1/8 (* (* b (* x-scale (* y-scale (* (sqrt 8) (- (* -1/2 (- (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* (pow a 2) (pow x-scale 2)))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow a 4) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* -1 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -2 (pow a 3)) (* 2 (pow a 3))) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow a 2) (pow x-scale 2))))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))) (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow a 4) (* (pow x-scale 4) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (* (pow a 2) (* (pow x-scale 2) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))))) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow a 2) (pow x-scale 2))))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))) (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow a 4) (* (pow x-scale 4) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))))> |
#<alt (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))> |
#<alt (* b (+ (* -1/4 (* (/ (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a))))) (* b x-scale)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))> |
#<alt (* b (+ (* -1/4 (* (/ (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a))))) (* b x-scale)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (pow x-scale 2)))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (+ (* -1/2 (/ (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) (pow b 2)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))> |
#<alt (* b (+ (* -1/4 (* (/ (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a))))) (* b x-scale)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/2 (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (pow x-scale 2))) (* 4 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (+ (* -2 a) (* 2 a)))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (+ (* -2 a) (* 2 a)) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (pow x-scale 2)))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (+ (* -1/2 (/ (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* (pow x-scale 2) (+ (* -1/2 (/ (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow b 3)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (pow x-scale 2)))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (+ (* -1/2 (/ (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) (pow b 2)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))> |
#<alt (* -1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))> |
#<alt (* -1 (* b (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* 1/4 (* (/ (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a))))) (* b x-scale)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))> |
#<alt (* -1 (* b (+ (* -1 (/ (+ (* -1/4 (* (/ (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a))))) x-scale) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (pow x-scale 2)))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (+ (* -1/2 (/ (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) b) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) b)) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))> |
#<alt (* -1 (* b (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/2 (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (pow x-scale 2))) (* 4 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (+ (* -2 a) (* 2 a)))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (+ (* -2 a) (* 2 a)) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (pow x-scale 2)))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (+ (* -1/2 (/ (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* (pow x-scale 2) (+ (* -1/2 (/ (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) b) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (pow x-scale 2)))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (+ (* -1/2 (/ (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) b)) (* -1/4 (* (/ (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a))))) x-scale) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) b)) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))> |
#<alt (* 1/4 (* x-scale (* y-scale (sqrt 8))))> |
#<alt (* 1/4 (* x-scale (* y-scale (sqrt 8))))> |
#<alt (* 1/4 (* x-scale (* y-scale (sqrt 8))))> |
#<alt (* 1/4 (* x-scale (* y-scale (sqrt 8))))> |
#<alt (* 1/4 (* x-scale (* y-scale (sqrt 8))))> |
#<alt (* 1/4 (* x-scale (* y-scale (sqrt 8))))> |
#<alt (* 1/4 (* x-scale (* y-scale (sqrt 8))))> |
#<alt (* 1/4 (* x-scale (* y-scale (sqrt 8))))> |
#<alt (* 1/4 (* x-scale (* y-scale (sqrt 8))))> |
#<alt (* 1/4 (* x-scale (* y-scale (sqrt 8))))> |
#<alt (* 1/4 (* x-scale (* y-scale (sqrt 8))))> |
#<alt (* 1/4 (* x-scale (* y-scale (sqrt 8))))> |
#<alt (* 1/4 (* x-scale (* y-scale (sqrt 8))))> |
#<alt (* 1/4 (* x-scale (* y-scale (sqrt 8))))> |
#<alt (* 1/4 (* x-scale (* y-scale (sqrt 8))))> |
#<alt (* 1/4 (* x-scale (* y-scale (sqrt 8))))> |
#<alt (* 1/4 (* x-scale (* y-scale (sqrt 8))))> |
#<alt (* 1/4 (* x-scale (* y-scale (sqrt 8))))> |
#<alt (* 1/4 (* x-scale (* y-scale (sqrt 8))))> |
#<alt (* 1/4 (* x-scale (* y-scale (sqrt 8))))> |
#<alt (* 1/4 (* x-scale (* y-scale (sqrt 8))))> |
#<alt (* 1/4 (* x-scale (* y-scale (sqrt 8))))> |
#<alt (* 1/4 (* x-scale (* y-scale (sqrt 8))))> |
#<alt (* 1/4 (* x-scale (* y-scale (sqrt 8))))> |
#<alt (* 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 (* 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 (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> |
#<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 (* (* (pow b 2) (sqrt 8)) (sqrt (- (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 4) (pow y-scale 2)))) (+ (* 1/2 (/ 1 (* (pow x-scale 2) (pow y-scale 4)))) (+ (* 1/2 (/ 1 (* (pow x-scale 4) (pow y-scale 2)))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 2) (pow y-scale 4))))))) (* (/ 1 (* (pow x-scale 2) (pow y-scale 2))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2)))))))> |
#<alt (* (* (pow b 2) (sqrt 8)) (sqrt (- (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 4) (pow y-scale 2)))) (+ (* 1/2 (/ 1 (* (pow x-scale 2) (pow y-scale 4)))) (+ (* 1/2 (/ 1 (* (pow x-scale 4) (pow y-scale 2)))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 2) (pow y-scale 4))))))) (* (/ 1 (* (pow x-scale 2) (pow y-scale 2))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2)))))))> |
#<alt (* (* (pow b 2) (sqrt 8)) (sqrt (- (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 4) (pow y-scale 2)))) (+ (* 1/2 (/ 1 (* (pow x-scale 2) (pow y-scale 4)))) (+ (* 1/2 (/ 1 (* (pow x-scale 4) (pow y-scale 2)))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 2) (pow y-scale 4))))))) (* (/ 1 (* (pow x-scale 2) (pow y-scale 2))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2)))))))> |
#<alt (* (* (pow b 2) (sqrt 8)) (sqrt (- (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 4) (pow y-scale 2)))) (+ (* 1/2 (/ 1 (* (pow x-scale 2) (pow y-scale 4)))) (+ (* 1/2 (/ 1 (* (pow x-scale 4) (pow y-scale 2)))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 2) (pow y-scale 4))))))) (* (/ 1 (* (pow x-scale 2) (pow y-scale 2))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2)))))))> |
#<alt (* (* (pow b 2) (sqrt 8)) (sqrt (- (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 4) (pow y-scale 2)))) (+ (* 1/2 (/ 1 (* (pow x-scale 2) (pow y-scale 4)))) (+ (* 1/2 (/ 1 (* (pow x-scale 4) (pow y-scale 2)))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 2) (pow y-scale 4))))))) (* (/ 1 (* (pow x-scale 2) (pow y-scale 2))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2)))))))> |
#<alt (* (* (pow b 2) (sqrt 8)) (sqrt (- (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 4) (pow y-scale 2)))) (+ (* 1/2 (/ 1 (* (pow x-scale 2) (pow y-scale 4)))) (+ (* 1/2 (/ 1 (* (pow x-scale 4) (pow y-scale 2)))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 2) (pow y-scale 4))))))) (* (/ 1 (* (pow x-scale 2) (pow y-scale 2))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2)))))))> |
#<alt (* (* (pow b 2) (sqrt 8)) (sqrt (- (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 4) (pow y-scale 2)))) (+ (* 1/2 (/ 1 (* (pow x-scale 2) (pow y-scale 4)))) (+ (* 1/2 (/ 1 (* (pow x-scale 4) (pow y-scale 2)))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 2) (pow y-scale 4))))))) (* (/ 1 (* (pow x-scale 2) (pow y-scale 2))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2)))))))> |
#<alt (* (* (pow b 2) (sqrt 8)) (sqrt (- (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 4) (pow y-scale 2)))) (+ (* 1/2 (/ 1 (* (pow x-scale 2) (pow y-scale 4)))) (+ (* 1/2 (/ 1 (* (pow x-scale 4) (pow y-scale 2)))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 2) (pow y-scale 4))))))) (* (/ 1 (* (pow x-scale 2) (pow y-scale 2))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2)))))))> |
#<alt (* (* (pow b 2) (sqrt 8)) (sqrt (- (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 4) (pow y-scale 2)))) (+ (* 1/2 (/ 1 (* (pow x-scale 2) (pow y-scale 4)))) (+ (* 1/2 (/ 1 (* (pow x-scale 4) (pow y-scale 2)))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 2) (pow y-scale 4))))))) (* (/ 1 (* (pow x-scale 2) (pow y-scale 2))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2)))))))> |
#<alt (* (* (pow b 2) (sqrt 8)) (sqrt (- (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 4) (pow y-scale 2)))) (+ (* 1/2 (/ 1 (* (pow x-scale 2) (pow y-scale 4)))) (+ (* 1/2 (/ 1 (* (pow x-scale 4) (pow y-scale 2)))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 2) (pow y-scale 4))))))) (* (/ 1 (* (pow x-scale 2) (pow y-scale 2))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2)))))))> |
#<alt (* (* (pow b 2) (sqrt 8)) (sqrt (- (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 4) (pow y-scale 2)))) (+ (* 1/2 (/ 1 (* (pow x-scale 2) (pow y-scale 4)))) (+ (* 1/2 (/ 1 (* (pow x-scale 4) (pow y-scale 2)))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 2) (pow y-scale 4))))))) (* (/ 1 (* (pow x-scale 2) (pow y-scale 2))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2)))))))> |
#<alt (* (* (pow b 2) (sqrt 8)) (sqrt (- (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 4) (pow y-scale 2)))) (+ (* 1/2 (/ 1 (* (pow x-scale 2) (pow y-scale 4)))) (+ (* 1/2 (/ 1 (* (pow x-scale 4) (pow y-scale 2)))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 2) (pow y-scale 4))))))) (* (/ 1 (* (pow x-scale 2) (pow y-scale 2))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2)))))))> |
#<alt (* (/ (* (pow b 2) (sqrt 8)) (* x-scale y-scale)) (sqrt (- (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 3/2 (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow x-scale 2))))))> |
#<alt (+ (* 1/2 (* (/ (* (pow angle 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/32400 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 4) (pow y-scale 2)))) (/ (* (pow b 4) (- (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (+ (* -1 (* (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/16200 (/ (pow (PI) 2) (pow y-scale 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)) (sqrt (/ 1 (- (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 3/2 (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow x-scale 2)))))))) (* (/ (* (pow b 2) (sqrt 8)) (* x-scale y-scale)) (sqrt (- (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 3/2 (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow x-scale 2)))))))> |
#<alt (+ (* (/ (* (pow b 2) (sqrt 8)) (* x-scale y-scale)) (sqrt (- (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 3/2 (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow x-scale 2)))))) (* (pow angle 2) (+ (* 1/2 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/32400 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 4) (pow y-scale 2)))) (/ (* (pow b 4) (- (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (+ (* -1 (* (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/16200 (/ (pow (PI) 2) (pow y-scale 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow b 2)) (sqrt (/ 1 (- (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 3/2 (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow x-scale 2)))))))) (* 1/2 (* (/ (* (pow angle 2) (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow b 4) (pow (PI) 4)) (* (pow x-scale 4) (pow y-scale 2)))) (/ (* (pow b 4) (- (* 1/3149280000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1 (* (+ (* 1/1574640000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/1574640000 (/ (pow (PI) 4) (pow y-scale 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))) (+ (* -1/196830000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (pow (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/16200 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (* 1/4 (/ (pow (+ (* -1 (* (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/16200 (/ (pow (PI) 2) (pow y-scale 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (pow (+ (* 1/32400 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 4) (pow y-scale 2)))) (/ (* (pow b 4) (- (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (+ (* -1 (* (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/16200 (/ (pow (PI) 2) (pow y-scale 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))))) (* (pow x-scale 2) (pow y-scale 2)))) 2))) (* (pow b 4) (- (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 3/2 (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow x-scale 2)))))))))))) (pow b 2)) (sqrt (/ 1 (- (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 3/2 (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow x-scale 2)))))))))))> |
#<alt (+ (* (/ (* (pow b 2) (sqrt 8)) (* x-scale y-scale)) (sqrt (- (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 3/2 (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow x-scale 2)))))) (* (pow angle 2) (+ (* 1/2 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/32400 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 4) (pow y-scale 2)))) (/ (* (pow b 4) (- (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (+ (* -1 (* (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/16200 (/ (pow (PI) 2) (pow y-scale 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow b 2)) (sqrt (/ 1 (- (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 3/2 (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow x-scale 2)))))))) (* (pow angle 2) (+ (* 1/2 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow b 4) (pow (PI) 4)) (* (pow x-scale 4) (pow y-scale 2)))) (/ (* (pow b 4) (- (* 1/3149280000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1 (* (+ (* 1/1574640000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/1574640000 (/ (pow (PI) 4) (pow y-scale 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))) (+ (* -1/196830000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (pow (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/16200 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (* 1/4 (/ (pow (+ (* -1 (* (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/16200 (/ (pow (PI) 2) (pow y-scale 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (pow (+ (* 1/32400 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 4) (pow y-scale 2)))) (/ (* (pow b 4) (- (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (+ (* -1 (* (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/16200 (/ (pow (PI) 2) (pow y-scale 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))))) (* (pow x-scale 2) (pow y-scale 2)))) 2))) (* (pow b 4) (- (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 3/2 (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow x-scale 2))))))))))) (pow b 2)) (sqrt (/ 1 (- (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 3/2 (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow x-scale 2)))))))) (* 1/2 (* (/ (* (pow angle 2) (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/765275040000000 (/ (* (pow b 4) (pow (PI) 6)) (* (pow x-scale 4) (pow y-scale 2)))) (/ (* (pow b 4) (- (* -1/765275040000000 (/ (pow (PI) 6) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1 (* (+ (* -1/382637520000000 (/ (pow (PI) 6) (pow x-scale 2))) (* -1/382637520000000 (/ (pow (PI) 6) (pow y-scale 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))) (+ (* 1/31886460000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/19131876000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/2 (* (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/16200 (/ (pow (PI) 2) (pow y-scale 2)))) (+ (* 1/1574640000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/1574640000 (/ (pow (PI) 4) (pow y-scale 2))))))))) (* 1/2 (/ (* (+ (* -1 (* (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/16200 (/ (pow (PI) 2) (pow y-scale 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* -1 (* (+ (* 1/1574640000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/1574640000 (/ (pow (PI) 4) (pow y-scale 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))) (+ (* -1/196830000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (pow (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/16200 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (* 1/4 (/ (pow (+ (* -1 (* (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/16200 (/ (pow (PI) 2) (pow y-scale 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2))))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (* (+ (* 1/32400 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 4) (pow y-scale 2)))) (/ (* (pow b 4) (- (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (+ (* -1 (* (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/16200 (/ (pow (PI) 2) (pow y-scale 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (- (+ (* -1/3149280000 (/ (* (pow b 4) (pow (PI) 4)) (* (pow x-scale 4) (pow y-scale 2)))) (/ (* (pow b 4) (- (* 1/3149280000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1 (* (+ (* 1/1574640000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/1574640000 (/ (pow (PI) 4) (pow y-scale 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))) (+ (* -1/196830000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (pow (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/16200 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (* 1/4 (/ (pow (+ (* -1 (* (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/16200 (/ (pow (PI) 2) (pow y-scale 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (pow (+ (* 1/32400 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 4) (pow y-scale 2)))) (/ (* (pow b 4) (- (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (+ (* -1 (* (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/16200 (/ (pow (PI) 2) (pow y-scale 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))))) (* (pow x-scale 2) (pow y-scale 2)))) 2))) (* (pow b 4) (- (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 3/2 (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow x-scale 2))))))))))) (* (pow b 4) (- (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 3/2 (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow x-scale 2)))))))))))) (pow b 2)) (sqrt (/ 1 (- (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 3/2 (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow x-scale 2)))))))))))))> |
#<alt (* (sqrt 8) (sqrt (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))) (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))> |
#<alt (* (sqrt 8) (sqrt (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))) (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))> |
#<alt (* (sqrt 8) (sqrt (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))) (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))> |
#<alt (* (sqrt 8) (sqrt (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))) (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))> |
#<alt (* (sqrt 8) (sqrt (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))) (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))> |
#<alt (* (sqrt 8) (sqrt (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))) (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))> |
#<alt (* (sqrt 8) (sqrt (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))) (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))> |
#<alt (* (sqrt 8) (sqrt (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))) (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))> |
#<alt (* (/ (sqrt 8) (pow x-scale 2)) (sqrt (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 4) (- (* 1/2 (cos (* 1/90 (* angle (PI))))) 1/2)) (pow y-scale 2)))))> |
#<alt (/ (+ (* 1/2 (* (/ (* (pow b 4) (* (pow x-scale 2) (* (sqrt 8) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))) (pow y-scale 2)) (sqrt (/ 1 (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 4) (- (* 1/2 (cos (* 1/90 (* angle (PI))))) 1/2)) (pow y-scale 2))))))) (* (sqrt 8) (sqrt (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 4) (- (* 1/2 (cos (* 1/90 (* angle (PI))))) 1/2)) (pow y-scale 2)))))) (pow x-scale 2))> |
#<alt (/ (+ (* (sqrt 8) (sqrt (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 4) (- (* 1/2 (cos (* 1/90 (* angle (PI))))) 1/2)) (pow y-scale 2))))) (* (pow x-scale 2) (+ (* 1/2 (* (* (pow x-scale 2) (* (sqrt 8) (- (* -1/2 (/ (* (pow b 4) (- (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2))))) (* (pow y-scale 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* 1/4 (/ (* (pow b 8) (pow (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2)) (* (pow y-scale 4) (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 4) (- (* 1/2 (cos (* 1/90 (* angle (PI))))) 1/2)) (pow y-scale 2))))))))) (sqrt (/ 1 (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 4) (- (* 1/2 (cos (* 1/90 (* angle (PI))))) 1/2)) (pow y-scale 2))))))) (* 1/2 (* (/ (* (pow b 4) (* (sqrt 8) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow y-scale 2)) (sqrt (/ 1 (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 4) (- (* 1/2 (cos (* 1/90 (* angle (PI))))) 1/2)) (pow y-scale 2)))))))))) (pow x-scale 2))> |
#<alt (/ (+ (* (sqrt 8) (sqrt (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 4) (- (* 1/2 (cos (* 1/90 (* angle (PI))))) 1/2)) (pow y-scale 2))))) (* (pow x-scale 2) (+ (* 1/2 (* (/ (* (pow b 4) (* (sqrt 8) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow y-scale 2)) (sqrt (/ 1 (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 4) (- (* 1/2 (cos (* 1/90 (* angle (PI))))) 1/2)) (pow y-scale 2))))))) (* (pow x-scale 2) (+ (* 1/2 (* (* (sqrt 8) (- (* -1/2 (/ (* (pow b 4) (- (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2))))) (* (pow y-scale 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* 1/4 (/ (* (pow b 8) (pow (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2)) (* (pow y-scale 4) (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 4) (- (* 1/2 (cos (* 1/90 (* angle (PI))))) 1/2)) (pow y-scale 2)))))))) (sqrt (/ 1 (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 4) (- (* 1/2 (cos (* 1/90 (* angle (PI))))) 1/2)) (pow y-scale 2))))))) (* 1/2 (* (* (pow x-scale 2) (* (sqrt 8) (- (* 1/4 (/ (* (pow b 4) (* (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) (- (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)))))) (* (pow y-scale 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 3)))) (* 1/2 (/ (* (pow b 4) (* (- (* -1/2 (/ (* (pow b 4) (- (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2))))) (* (pow y-scale 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* 1/4 (/ (* (pow b 8) (pow (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2)) (* (pow y-scale 4) (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 4) (- (* 1/2 (cos (* 1/90 (* angle (PI))))) 1/2)) (pow y-scale 2))))))) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* (pow y-scale 2) (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 4) (- (* 1/2 (cos (* 1/90 (* angle (PI))))) 1/2)) (pow y-scale 2))))))))) (sqrt (/ 1 (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 4) (- (* 1/2 (cos (* 1/90 (* angle (PI))))) 1/2)) (pow y-scale 2)))))))))))) (pow x-scale 2))> |
#<alt (* (/ (sqrt 8) (pow x-scale 2)) (sqrt (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))> |
#<alt (/ (+ (* -1/4 (* (/ (* (pow b 4) (* (sqrt 8) (- (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))) (* (sqrt 8) (sqrt (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (pow x-scale 2))> |
#<alt (/ (+ (* -1/4 (* (/ (* (pow b 4) (* (sqrt 8) (- (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))) (+ (* 1/2 (* (/ (* (sqrt 8) (- (* 1/4 (/ (* (pow b 4) (* (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) (- (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (* (pow y-scale 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 3)))) (* 1/16 (/ (* (pow b 8) (pow (- (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) 2)) (* (pow y-scale 4) (* (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))) (* (sqrt 8) (sqrt (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))) (pow x-scale 2))> |
#<alt (/ (+ (* -1/4 (* (/ (* (pow b 4) (* (sqrt 8) (- (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))) (+ (* 1/2 (* (/ (* (sqrt 8) (- (* 1/4 (/ (* (pow b 4) (* (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) (- (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (* (pow y-scale 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 3)))) (* 1/16 (/ (* (pow b 8) (pow (- (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) 2)) (* (pow y-scale 4) (* (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))) (+ (* 1/2 (* (/ (* (sqrt 8) (- (* 1/2 (/ (* (pow b 4) (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (- (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 4))) (* 1/4 (/ (pow (- (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -1/4 (/ (* (pow b 4) (* (- (* 1/4 (/ (* (pow b 4) (* (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) (- (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (* (pow y-scale 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 3)))) (* 1/16 (/ (* (pow b 8) (pow (- (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) 2)) (* (pow y-scale 4) (* (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (- (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (* (pow y-scale 2) (* (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))))) (pow x-scale 6)) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))) (* (sqrt 8) (sqrt (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (pow x-scale 2))> |
#<alt (* (/ (sqrt 8) (pow x-scale 2)) (sqrt (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))> |
#<alt (/ (+ (* -1/4 (* (/ (* (pow b 4) (* (sqrt 8) (- (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))) (* (sqrt 8) (sqrt (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (pow x-scale 2))> |
#<alt (/ (+ (* -1/4 (* (/ (* (pow b 4) (* (sqrt 8) (- (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))) (+ (* 1/2 (* (/ (* (sqrt 8) (- (* 1/4 (/ (* (pow b 4) (* (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) (- (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (* (pow y-scale 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 3)))) (* 1/16 (/ (* (pow b 8) (pow (- (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) 2)) (* (pow y-scale 4) (* (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))) (* (sqrt 8) (sqrt (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))) (pow x-scale 2))> |
#<alt (/ (+ (* -1/4 (* (/ (* (pow b 4) (* (sqrt 8) (- (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))) (+ (* 1/2 (* (/ (* (sqrt 8) (- (* 1/4 (/ (* (pow b 4) (* (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) (- (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (* (pow y-scale 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 3)))) (* 1/16 (/ (* (pow b 8) (pow (- (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) 2)) (* (pow y-scale 4) (* (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))) (+ (* 1/2 (* (/ (* (sqrt 8) (- (* 1/2 (/ (* (pow b 4) (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (- (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 4))) (* 1/4 (/ (pow (- (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -1/4 (/ (* (pow b 4) (* (- (* 1/4 (/ (* (pow b 4) (* (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) (- (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (* (pow y-scale 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 3)))) (* 1/16 (/ (* (pow b 8) (pow (- (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) 2)) (* (pow y-scale 4) (* (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (- (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (* (pow y-scale 2) (* (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))))) (pow x-scale 6)) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))) (* (sqrt 8) (sqrt (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (pow x-scale 2))> |
#<alt (* (/ (sqrt 8) y-scale) (sqrt (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)))) (* (pow x-scale 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4)))))> |
#<alt (/ (+ (* -1/4 (* (/ (* (pow b 4) (* (pow y-scale 2) (* (sqrt 8) (- (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2))))))) (* (pow x-scale 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)))) (* (pow x-scale 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4))))))) (* (sqrt 8) (sqrt (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)))) (* (pow x-scale 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4)))))) y-scale)> |
#<alt (/ (+ (* (sqrt 8) (sqrt (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)))) (* (pow x-scale 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4))))) (* (pow y-scale 2) (+ (* -1/4 (* (/ (* (pow b 4) (* (sqrt 8) (- (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)))))) (* (pow x-scale 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)))) (* (pow x-scale 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4))))))) (* 1/2 (* (* (pow y-scale 2) (* (sqrt 8) (- (* 1/4 (/ (* (pow b 4) (* (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (- (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)))))) (* (pow x-scale 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 3)))) (* 1/16 (/ (* (pow b 8) (pow (- (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)))) 2)) (* (pow x-scale 4) (* (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)))) (* (pow x-scale 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4)))))))))) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)))) (* (pow x-scale 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4)))))))))) y-scale)> |
#<alt (/ (+ (* (sqrt 8) (sqrt (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)))) (* (pow x-scale 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4))))) (* (pow y-scale 2) (+ (* -1/4 (* (/ (* (pow b 4) (* (sqrt 8) (- (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)))))) (* (pow x-scale 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)))) (* (pow x-scale 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4))))))) (* (pow y-scale 2) (+ (* 1/2 (* (* (sqrt 8) (- (* 1/4 (/ (* (pow b 4) (* (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (- (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)))))) (* (pow x-scale 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 3)))) (* 1/16 (/ (* (pow b 8) (pow (- (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)))) 2)) (* (pow x-scale 4) (* (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)))) (* (pow x-scale 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4))))))))) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)))) (* (pow x-scale 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4))))))) (* 1/2 (* (* (pow y-scale 2) (* (sqrt 8) (- (* 1/2 (/ (* (pow b 4) (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) 2) (- (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2))))) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 4))) (* 1/4 (/ (pow (- (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)))) 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2))))) (* (pow x-scale 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* -1/4 (/ (* (pow b 4) (* (- (* 1/4 (/ (* (pow b 4) (* (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (- (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)))))) (* (pow x-scale 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 3)))) (* 1/16 (/ (* (pow b 8) (pow (- (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)))) 2)) (* (pow x-scale 4) (* (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)))) (* (pow x-scale 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4)))))))) (- (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)))))) (* (pow x-scale 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)))) (* (pow x-scale 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4)))))))))) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)))) (* (pow x-scale 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4)))))))))))) y-scale)> |
#<alt (* (/ (sqrt 8) y-scale) (sqrt (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4)) (/ (* (pow b 4) (- (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (pow x-scale 2)))))> |
#<alt (/ (+ (* 1/2 (* (/ (* (pow b 4) (* (sqrt 8) (- (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (* 1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4)) (/ (* (pow b 4) (- (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (pow x-scale 2))))))) (* (sqrt 8) (sqrt (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4)) (/ (* (pow b 4) (- (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (pow x-scale 2)))))) y-scale)> |
#<alt (/ (+ (* 1/2 (* (/ (* (sqrt 8) (- (* -1/2 (/ (* (pow b 4) (- (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) 2) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 2))))) (* (pow x-scale 2) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) (* 1/4 (/ (* (pow b 8) (pow (- (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (* 1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) 2)) (* (pow x-scale 4) (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4)) (/ (* (pow b 4) (- (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (pow x-scale 2)))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4)) (/ (* (pow b 4) (- (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (pow x-scale 2))))))) (+ (* 1/2 (* (/ (* (pow b 4) (* (sqrt 8) (- (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (* 1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4)) (/ (* (pow b 4) (- (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (pow x-scale 2))))))) (* (sqrt 8) (sqrt (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4)) (/ (* (pow b 4) (- (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (pow x-scale 2))))))) y-scale)> |
#<alt (/ (+ (* 1/2 (* (/ (* (sqrt 8) (- (* -1/2 (/ (* (pow b 4) (- (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) 2) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 2))))) (* (pow x-scale 2) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) (* 1/4 (/ (* (pow b 8) (pow (- (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (* 1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) 2)) (* (pow x-scale 4) (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4)) (/ (* (pow b 4) (- (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (pow x-scale 2)))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4)) (/ (* (pow b 4) (- (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (pow x-scale 2))))))) (+ (* 1/2 (* (/ (* (sqrt 8) (- (* 1/4 (/ (* (pow b 4) (* (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (- (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) 2) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 2)))))) (* (pow x-scale 2) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 3)))) (* 1/2 (/ (* (pow b 4) (* (- (* -1/2 (/ (* (pow b 4) (- (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) 2) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 2))))) (* (pow x-scale 2) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) (* 1/4 (/ (* (pow b 8) (pow (- (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (* 1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) 2)) (* (pow x-scale 4) (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4)) (/ (* (pow b 4) (- (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (pow x-scale 2))))))) (- (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (* 1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (* (pow x-scale 2) (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4)) (/ (* (pow b 4) (- (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (pow x-scale 2)))))))) (pow y-scale 6)) (sqrt (/ 1 (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4)) (/ (* (pow b 4) (- (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (pow x-scale 2))))))) (+ (* 1/2 (* (/ (* (pow b 4) (* (sqrt 8) (- (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (* 1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4)) (/ (* (pow b 4) (- (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (pow x-scale 2))))))) (* (sqrt 8) (sqrt (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4)) (/ (* (pow b 4) (- (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (pow x-scale 2)))))))) y-scale)> |
#<alt (* -1 (* (/ (sqrt 8) y-scale) (sqrt (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4)) (/ (* (pow b 4) (- (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (pow x-scale 2))))))> |
#<alt (* -1 (/ (+ (* 1/2 (* (/ (* (pow b 4) (* (sqrt 8) (- (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (* 1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4)) (/ (* (pow b 4) (- (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (pow x-scale 2))))))) (* (sqrt 8) (sqrt (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4)) (/ (* (pow b 4) (- (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (pow x-scale 2)))))) y-scale))> |
#<alt (* -1 (/ (+ (* 1/2 (* (/ (* (sqrt 8) (- (* -1/2 (/ (* (pow b 4) (- (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) 2) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 2))))) (* (pow x-scale 2) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) (* 1/4 (/ (* (pow b 8) (pow (- (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (* 1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) 2)) (* (pow x-scale 4) (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4)) (/ (* (pow b 4) (- (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (pow x-scale 2)))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4)) (/ (* (pow b 4) (- (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (pow x-scale 2))))))) (+ (* 1/2 (* (/ (* (pow b 4) (* (sqrt 8) (- (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (* 1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4)) (/ (* (pow b 4) (- (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (pow x-scale 2))))))) (* (sqrt 8) (sqrt (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4)) (/ (* (pow b 4) (- (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (pow x-scale 2))))))) y-scale))> |
#<alt (* -1 (/ (+ (* 1/2 (* (/ (* (sqrt 8) (- (* -1/2 (/ (* (pow b 4) (- (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) 2) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 2))))) (* (pow x-scale 2) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) (* 1/4 (/ (* (pow b 8) (pow (- (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (* 1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) 2)) (* (pow x-scale 4) (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4)) (/ (* (pow b 4) (- (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (pow x-scale 2)))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4)) (/ (* (pow b 4) (- (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (pow x-scale 2))))))) (+ (* 1/2 (* (/ (* (sqrt 8) (- (* 1/4 (/ (* (pow b 4) (* (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (- (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) 2) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 2)))))) (* (pow x-scale 2) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 3)))) (* 1/2 (/ (* (pow b 4) (* (- (* -1/2 (/ (* (pow b 4) (- (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) 2) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 2))))) (* (pow x-scale 2) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) (* 1/4 (/ (* (pow b 8) (pow (- (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (* 1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) 2)) (* (pow x-scale 4) (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4)) (/ (* (pow b 4) (- (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (pow x-scale 2))))))) (- (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (* 1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (* (pow x-scale 2) (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4)) (/ (* (pow b 4) (- (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (pow x-scale 2)))))))) (pow y-scale 6)) (sqrt (/ 1 (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4)) (/ (* (pow b 4) (- (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (pow x-scale 2))))))) (+ (* 1/2 (* (/ (* (pow b 4) (* (sqrt 8) (- (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (* 1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4)) (/ (* (pow b 4) (- (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (pow x-scale 2))))))) (* (sqrt 8) (sqrt (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4)) (/ (* (pow b 4) (- (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (pow x-scale 2)))))))) y-scale))> |
#<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))))> |
156 calls:
| Time | Variable | Point | Expression | |
|---|---|---|---|---|
| 9.0ms | angle | @ | 0 | (* (* 1/4 (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (+ (/ (* (* a a) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) (/ (* (* b b) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale))) (* -1/2 (/ (+ (* (* -2 (+ (* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (* b b) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (/ (* (* a a) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) (/ (* (* b b) (pow 1 2)) (* x-scale x-scale)))) (/ (* 4 (* (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (* (+ a b) (+ a b)) (* (- b a) (- b a))))) (* x-scale x-scale))) (+ (* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (* b b) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) |
| 9.0ms | y-scale | @ | 0 | (* (* 1/4 (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (+ (/ (* (* a a) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) (/ (* (* b b) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale))) (* -1/2 (/ (+ (* (* -2 (+ (* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (* b b) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (/ (* (* a a) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) (/ (* (* b b) (pow 1 2)) (* x-scale x-scale)))) (/ (* 4 (* (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (* (+ a b) (+ a b)) (* (- b a) (- b a))))) (* x-scale x-scale))) (+ (* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (* b b) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) |
| 9.0ms | b | @ | 0 | (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (* y-scale y-scale))) (/ (* (pow b 4) (- (+ (/ 1/2 (* y-scale y-scale)) (/ (* 1/2 (cos (* 1/90 (* angle (PI))))) (* y-scale y-scale))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (* x-scale x-scale) (* y-scale y-scale))) (pow (- (/ 1/2 (* x-scale x-scale)) (+ (/ 1/2 (* y-scale y-scale)) (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (* x-scale x-scale)) (/ (cos (* 1/90 (* angle (PI)))) (* y-scale y-scale)))))) 2))))) (* (* x-scale x-scale) (* y-scale y-scale)))) |
| 7.0ms | angle | @ | 0 | (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (* x-scale x-scale) (* y-scale y-scale))) (pow (- (/ 1/2 (* x-scale x-scale)) (+ (/ 1/2 (* y-scale y-scale)) (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (* x-scale x-scale)) (/ (cos (* 1/90 (* angle (PI)))) (* y-scale y-scale)))))) 2))) |
| 6.0ms | x-scale | @ | inf | (sqrt (* 8 (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (* y-scale y-scale))) (/ (* (pow b 4) (- (+ (/ 1/2 (* y-scale y-scale)) (/ (* 1/2 (cos (* 1/90 (* angle (PI))))) (* y-scale y-scale))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (* x-scale x-scale) (* y-scale y-scale))) (pow (- (/ 1/2 (* x-scale x-scale)) (+ (/ 1/2 (* y-scale y-scale)) (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (* x-scale x-scale)) (/ (cos (* 1/90 (* angle (PI)))) (* y-scale y-scale)))))) 2))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) |
| 1× | batch-egg-rewrite |
| 6370× | *-lowering-*.f32 |
| 6370× | *-lowering-*.f64 |
| 3910× | /-lowering-/.f32 |
| 3910× | /-lowering-/.f64 |
| 1640× | +-lowering-+.f64 |
Useful iterations: 1 (0.0ms)
| Iter | Nodes | Cost |
|---|---|---|
| 0 | 112 | 572 |
| 1 | 733 | 489 |
| 0 | 8136 | 489 |
| 1× | iter limit |
| 1× | node limit |
| Inputs |
|---|
(* 1 (* a x-scale)) |
(* a x-scale) |
(* (* 1/4 a) (* x-scale 4)) |
(* 1/4 a) |
(* x-scale 4) |
(/ (* (* a (* a a)) (* (* b b) 4)) (* 4 (* a (* b (* a b))))) |
(/ (/ 1 (* (* x-scale y-scale) y-scale)) (/ 1 (* x-scale (* (* x-scale y-scale) y-scale)))) |
(* (/ (* (* a (* a a)) (* (* b b) 4)) (* 4 (* a (* b (* a b))))) (/ (/ 1 (* (* x-scale y-scale) y-scale)) (/ 1 (* x-scale (* (* x-scale y-scale) y-scale))))) |
(* (* a (* a a)) (* (* b b) 4)) |
(sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (* x-scale x-scale) (* y-scale y-scale))) (pow (- (/ 1/2 (* x-scale x-scale)) (+ (/ 1/2 (* y-scale y-scale)) (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (* x-scale x-scale)) (/ (cos (* 1/90 (* angle (PI)))) (* y-scale y-scale)))))) 2))) |
(+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (* y-scale y-scale))) (/ (* (pow b 4) (- (+ (/ 1/2 (* y-scale y-scale)) (/ (* 1/2 (cos (* 1/90 (* angle (PI))))) (* y-scale y-scale))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (* x-scale x-scale) (* y-scale y-scale))) (pow (- (/ 1/2 (* x-scale x-scale)) (+ (/ 1/2 (* y-scale y-scale)) (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (* x-scale x-scale)) (/ (cos (* 1/90 (* angle (PI)))) (* y-scale y-scale)))))) 2))))) (* (* x-scale x-scale) (* y-scale y-scale)))) |
(+ (/ 1/2 (* y-scale y-scale)) (/ (* 1/2 (cos (* 1/90 (* angle (PI))))) (* y-scale y-scale))) |
(+ (/ 1/2 (* y-scale y-scale)) (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (* x-scale x-scale)) (/ (cos (* 1/90 (* angle (PI)))) (* y-scale y-scale))))) |
(pow 1 2) |
(* (* b b) (pow 1 2)) |
(* (* 1/4 (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (+ (/ (* (* a a) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) (/ (* (* b b) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale))) (* -1/2 (/ (+ (* (* -2 (+ (* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (* b b) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (/ (* (* a a) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale)) (/ (* (* b b) (pow 1 2)) (* x-scale x-scale)))) (/ (* 4 (* (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (* (+ a b) (+ a b)) (* (- b a) (- b a))))) (* x-scale x-scale))) (+ (* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (* b b) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(* 4 (* a (* b (* a b)))) |
(* a a) |
(* a b) |
(* a (* a a)) |
(PI) |
(cos (* 1/90 (* angle (PI)))) |
(sin (* 1/90 (* angle (PI)))) |
(sqrt (* 8 (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (* y-scale y-scale))) (/ (* (pow b 4) (- (+ (/ 1/2 (* y-scale y-scale)) (/ (* 1/2 (cos (* 1/90 (* angle (PI))))) (* y-scale y-scale))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (* x-scale x-scale) (* y-scale y-scale))) (pow (- (/ 1/2 (* x-scale x-scale)) (+ (/ 1/2 (* y-scale y-scale)) (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (* x-scale x-scale)) (/ (cos (* 1/90 (* angle (PI)))) (* y-scale y-scale)))))) 2))))) (* (* x-scale x-scale) (* y-scale y-scale)))))) |
(cos (* 1/180 (* angle (PI)))) |
(sin (* 1/180 (* angle (PI)))) |
(sqrt 8) |
| Outputs |
|---|
(*.f64 #s(literal 1 binary64) (*.f64 a x-scale)) |
(*.f64 a x-scale) |
(*.f64 a (*.f64 x-scale #s(literal 1 binary64))) |
(*.f64 x-scale a) |
(*.f64 x-scale (*.f64 a #s(literal 1 binary64))) |
(*.f64 (*.f64 a x-scale) #s(literal 1 binary64)) |
(*.f64 (*.f64 #s(literal 1 binary64) x-scale) a) |
(*.f64 #s(literal 1 binary64) (*.f64 a x-scale)) |
(*.f64 a x-scale) |
(*.f64 a (*.f64 x-scale #s(literal 1 binary64))) |
(*.f64 x-scale a) |
(*.f64 x-scale (*.f64 a #s(literal 1 binary64))) |
(*.f64 (*.f64 a x-scale) #s(literal 1 binary64)) |
(*.f64 (*.f64 #s(literal 1 binary64) x-scale) a) |
(*.f64 a (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale #s(literal 4 binary64)))) |
(*.f64 x-scale (*.f64 #s(literal 4 binary64) (*.f64 a #s(literal 1/4 binary64)))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 a (*.f64 x-scale #s(literal 4 binary64)))) |
(*.f64 (*.f64 a #s(literal 1/4 binary64)) (*.f64 x-scale #s(literal 4 binary64))) |
(*.f64 #s(literal 4 binary64) (*.f64 x-scale (*.f64 a #s(literal 1/4 binary64)))) |
(*.f64 (*.f64 x-scale #s(literal 4 binary64)) (*.f64 a #s(literal 1/4 binary64))) |
(*.f64 (*.f64 a (*.f64 #s(literal 1/4 binary64) x-scale)) #s(literal 4 binary64)) |
(*.f64 (*.f64 (*.f64 a #s(literal 1/4 binary64)) #s(literal 4 binary64)) x-scale) |
(*.f64 (*.f64 (*.f64 x-scale #s(literal 4 binary64)) a) #s(literal 1/4 binary64)) |
(*.f64 (*.f64 (*.f64 x-scale #s(literal 4 binary64)) #s(literal 1/4 binary64)) a) |
(*.f64 a #s(literal 1/4 binary64)) |
(*.f64 #s(literal 1/4 binary64) a) |
(*.f64 x-scale #s(literal 4 binary64)) |
(*.f64 #s(literal 4 binary64) x-scale) |
(neg.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 b b)))) (*.f64 (*.f64 a (*.f64 a (*.f64 b b))) #s(literal -4 binary64)))) |
(neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 a (*.f64 b b))) #s(literal -4 binary64)) (*.f64 a (*.f64 (*.f64 a (*.f64 b b)) #s(literal 4 binary64))))) |
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 b b))) (*.f64 (*.f64 a a) (*.f64 a (*.f64 b b)))) #s(literal 1 binary64))) |
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 b b))) (*.f64 (*.f64 a a) (*.f64 a (*.f64 b b)))) #s(literal 1 binary64)) #s(literal 1 binary64))) |
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 a (*.f64 a (*.f64 b b))) (/.f64 (*.f64 (*.f64 a a) (*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 b b)))) #s(literal 4 binary64)))) |
(/.f64 (*.f64 (*.f64 a a) (*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 b b)))) (*.f64 a (*.f64 (*.f64 a (*.f64 b b)) #s(literal 4 binary64)))) |
(/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 b b))) (*.f64 (*.f64 a a) (*.f64 a (*.f64 b b)))) #s(literal 1 binary64)))) |
(/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 a (*.f64 b b))) #s(literal -4 binary64)) (*.f64 (*.f64 a (*.f64 a (*.f64 b b))) #s(literal -4 binary64))) |
(/.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 b b)))) #s(literal 4 binary64)) (*.f64 a (*.f64 a (*.f64 b b)))) |
(/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 b b)))) #s(literal 1 binary64)) (*.f64 a (*.f64 (*.f64 a (*.f64 b b)) #s(literal 4 binary64)))) |
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 a (*.f64 b b))) #s(literal -4 binary64))) (neg.f64 (*.f64 (*.f64 a (*.f64 a (*.f64 b b))) #s(literal -4 binary64)))) |
(/.f64 (neg.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 b b)))) #s(literal 4 binary64))) (neg.f64 (*.f64 a (*.f64 a (*.f64 b b))))) |
(/.f64 (*.f64 (/.f64 (*.f64 a (*.f64 a a)) #s(literal 4 binary64)) (*.f64 #s(literal 4 binary64) (*.f64 b b))) (*.f64 a (*.f64 a (*.f64 b b)))) |
(pow.f64 (*.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 b b))) (*.f64 (*.f64 a a) (*.f64 a (*.f64 b b)))) #s(literal 1 binary64)) #s(literal -1 binary64)) |
(*.f64 #s(literal 1 binary64) (*.f64 (*.f64 a (*.f64 a a)) (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 b b) (*.f64 a (*.f64 a (*.f64 b b))))))) |
(*.f64 a (*.f64 (*.f64 a a) (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 b b) (*.f64 a (*.f64 a (*.f64 b b))))))) |
(*.f64 a (*.f64 (*.f64 a (*.f64 (*.f64 a (*.f64 b b)) #s(literal 4 binary64))) (/.f64 #s(literal 1 binary64) (*.f64 a (*.f64 (*.f64 a (*.f64 b b)) #s(literal 4 binary64)))))) |
(*.f64 (*.f64 a a) (*.f64 a (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 b b) (*.f64 a (*.f64 a (*.f64 b b))))))) |
(*.f64 (*.f64 a (*.f64 a a)) (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 b b) (*.f64 a (*.f64 a (*.f64 b b)))))) |
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 b b)) (*.f64 (*.f64 a (*.f64 a a)) (/.f64 #s(literal 1 binary64) (*.f64 a (*.f64 (*.f64 a (*.f64 b b)) #s(literal 4 binary64)))))) |
(*.f64 (*.f64 (*.f64 a a) (*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 b b)))) (/.f64 #s(literal 1 binary64) (*.f64 a (*.f64 (*.f64 a (*.f64 b b)) #s(literal 4 binary64))))) |
(*.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 a (*.f64 b b))) #s(literal -4 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 a (*.f64 a (*.f64 b b))) #s(literal -4 binary64)))) |
(*.f64 (/.f64 (*.f64 a (*.f64 a a)) #s(literal 4 binary64)) (*.f64 (/.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b))) (/.f64 (*.f64 b b) a))) |
(*.f64 (*.f64 (/.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b))) (/.f64 (*.f64 b b) a)) (/.f64 (*.f64 a (*.f64 a a)) #s(literal 4 binary64))) |
(*.f64 (*.f64 (*.f64 a a) (*.f64 a (*.f64 b b))) (*.f64 #s(literal 4 binary64) (/.f64 #s(literal 1 binary64) (*.f64 a (*.f64 (*.f64 a (*.f64 b b)) #s(literal 4 binary64)))))) |
(*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 b b)))) #s(literal 4 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 a (*.f64 a (*.f64 b b))))) |
(*.f64 (/.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 a (*.f64 (*.f64 a (*.f64 b b)) #s(literal 4 binary64))) (*.f64 a (*.f64 a (*.f64 b b))))) |
(*.f64 (/.f64 a (*.f64 a (*.f64 a (*.f64 b b)))) (/.f64 (*.f64 a (*.f64 (*.f64 a (*.f64 b b)) #s(literal 4 binary64))) #s(literal 4 binary64))) |
(*.f64 (/.f64 a (*.f64 #s(literal 4 binary64) a)) (/.f64 (*.f64 a (*.f64 (*.f64 a (*.f64 b b)) #s(literal 4 binary64))) (*.f64 a (*.f64 b b)))) |
(*.f64 (/.f64 (*.f64 a (*.f64 a a)) (*.f64 a (*.f64 a (*.f64 b b)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 b b)) #s(literal 4 binary64))) |
(*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 b b)) #s(literal 4 binary64)) (/.f64 (*.f64 a (*.f64 a a)) (*.f64 a (*.f64 a (*.f64 b b))))) |
(*.f64 (/.f64 (*.f64 a (*.f64 a a)) (*.f64 #s(literal 4 binary64) a)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 b b)) (*.f64 a (*.f64 b b)))) |
(*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 b b)) (*.f64 #s(literal 4 binary64) a)) (/.f64 (*.f64 a (*.f64 a a)) (*.f64 a (*.f64 b b)))) |
(*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 a (*.f64 b b))) #s(literal 4 binary64)) (/.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a (*.f64 b b))))) |
(*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 a (*.f64 b b))) (*.f64 a (*.f64 a (*.f64 b b)))) #s(literal 1 binary64)) |
(*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 a (*.f64 b b))) (*.f64 #s(literal 4 binary64) a)) (/.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b)))) |
(neg.f64 (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 #s(literal -1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) |
(neg.f64 (/.f64 (/.f64 #s(literal -1 binary64) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 (/.f64 #s(literal 1 binary64) x-scale) (*.f64 x-scale (*.f64 y-scale y-scale))))) |
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 #s(literal 1 binary64) x-scale) (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 x-scale (*.f64 y-scale y-scale)))) |
(/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (/.f64 (/.f64 #s(literal 1 binary64) x-scale) (*.f64 x-scale (*.f64 y-scale y-scale))))) |
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 (/.f64 #s(literal 1 binary64) x-scale) (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 x-scale (*.f64 y-scale y-scale))) #s(literal 1 binary64))) |
(/.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 (/.f64 #s(literal 1 binary64) x-scale) (*.f64 x-scale (*.f64 y-scale y-scale)))) |
(/.f64 #s(literal -1 binary64) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.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 #s(literal 1 binary64) x-scale) (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 x-scale (*.f64 y-scale y-scale))))) |
(/.f64 (/.f64 #s(literal -1 binary64) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 #s(literal -1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) |
(/.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) #s(literal 1 binary64)) (*.f64 y-scale (/.f64 (/.f64 #s(literal 1 binary64) x-scale) (*.f64 x-scale (*.f64 y-scale y-scale))))) |
(pow.f64 (*.f64 (/.f64 (/.f64 #s(literal 1 binary64) x-scale) (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 x-scale (*.f64 y-scale y-scale))) #s(literal -1 binary64)) |
(*.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) |
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) |
(*.f64 (/.f64 #s(literal -1 binary64) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) |
(*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale y-scale))) x-scale) (*.f64 x-scale (*.f64 y-scale y-scale))) |
(*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 x-scale y-scale)) (*.f64 x-scale y-scale)) |
(*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 x-scale (*.f64 y-scale y-scale))) x-scale) |
(*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) |
(*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 y-scale y-scale)) (*.f64 x-scale x-scale)) |
(*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 x-scale (*.f64 x-scale y-scale))) y-scale) |
(/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 b b))) (*.f64 (*.f64 a a) (*.f64 a (*.f64 b b)))) #s(literal 1 binary64)) (*.f64 (/.f64 (/.f64 #s(literal 1 binary64) x-scale) (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 x-scale (*.f64 y-scale y-scale))))) |
(/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (/.f64 #s(literal 1 binary64) x-scale) (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 b b))) (*.f64 (*.f64 a a) (*.f64 a (*.f64 b b)))) #s(literal 1 binary64)))) |
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 a (*.f64 b b)) #s(literal 4 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 a a) (*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 b b)))) (*.f64 x-scale (*.f64 y-scale y-scale))))) |
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (/.f64 #s(literal 1 binary64) x-scale) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 b b) (*.f64 a (*.f64 a (*.f64 b b)))))) (*.f64 x-scale (*.f64 y-scale y-scale))))) |
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 a (*.f64 (*.f64 a (*.f64 b b)) #s(literal 4 binary64))) (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 b b)))) (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) |
(/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 b b) (*.f64 a (*.f64 a (*.f64 b b)))))) (*.f64 (/.f64 (/.f64 #s(literal 1 binary64) x-scale) (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 x-scale (*.f64 y-scale y-scale)))) |
(/.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 b b))) (*.f64 (*.f64 a a) (*.f64 a (*.f64 b b)))) #s(literal 1 binary64)) (/.f64 (/.f64 #s(literal 1 binary64) x-scale) (*.f64 x-scale (*.f64 y-scale y-scale))))) |
(/.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 (/.f64 (/.f64 #s(literal 1 binary64) x-scale) (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 b b))) (*.f64 (*.f64 a a) (*.f64 a (*.f64 b b)))) #s(literal 1 binary64)))) |
(/.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 b b))) (*.f64 (*.f64 a a) (*.f64 a (*.f64 b b)))) #s(literal 1 binary64))) |
(/.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 b b)))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 (*.f64 a (*.f64 (*.f64 a (*.f64 b b)) #s(literal 4 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) |
(/.f64 (/.f64 #s(literal -1 binary64) (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 b b))) (*.f64 (*.f64 a a) (*.f64 a (*.f64 b b)))) #s(literal 1 binary64)) (/.f64 #s(literal -1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) |
(/.f64 (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 b b) (*.f64 a (*.f64 a (*.f64 b b)))))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 (/.f64 #s(literal 1 binary64) x-scale) (*.f64 x-scale (*.f64 y-scale y-scale)))) |
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 b b)))) (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 a (*.f64 (*.f64 a (*.f64 b b)) #s(literal 4 binary64)))) |
(/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 b b)))) #s(literal 1 binary64)) (*.f64 (*.f64 a (*.f64 (*.f64 a (*.f64 b b)) #s(literal 4 binary64))) (*.f64 (/.f64 (/.f64 #s(literal 1 binary64) x-scale) (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 x-scale (*.f64 y-scale y-scale))))) |
(/.f64 (*.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 a (*.f64 b b))) #s(literal -4 binary64)) #s(literal 1 binary64)) (*.f64 (*.f64 (*.f64 a (*.f64 a (*.f64 b b))) #s(literal -4 binary64)) (*.f64 (/.f64 (/.f64 #s(literal 1 binary64) x-scale) (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 x-scale (*.f64 y-scale y-scale))))) |
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 b b)))) #s(literal 4 binary64)) #s(literal 1 binary64)) (*.f64 (*.f64 a (*.f64 a (*.f64 b b))) (*.f64 (/.f64 (/.f64 #s(literal 1 binary64) x-scale) (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 x-scale (*.f64 y-scale y-scale))))) |
(/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 b b)))) (/.f64 #s(literal -1 binary64) (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 (*.f64 a (*.f64 (*.f64 a (*.f64 b b)) #s(literal 4 binary64))) (/.f64 #s(literal -1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) |
(/.f64 (*.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 a (*.f64 b b))) #s(literal -4 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (*.f64 a (*.f64 a (*.f64 b b))) #s(literal -4 binary64)) (/.f64 (/.f64 #s(literal 1 binary64) x-scale) (*.f64 x-scale (*.f64 y-scale y-scale))))) |
(/.f64 (*.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 a (*.f64 b b))) #s(literal -4 binary64)) (/.f64 #s(literal -1 binary64) (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (*.f64 a (*.f64 a (*.f64 b b))) #s(literal -4 binary64)) (/.f64 #s(literal -1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) |
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 b b)))) #s(literal 4 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 (*.f64 a (*.f64 a (*.f64 b b))) (/.f64 (/.f64 #s(literal 1 binary64) x-scale) (*.f64 x-scale (*.f64 y-scale y-scale))))) |
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 b b)))) #s(literal 4 binary64)) (/.f64 #s(literal -1 binary64) (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 (*.f64 a (*.f64 a (*.f64 b b))) (/.f64 #s(literal -1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) |
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 a a) (*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 b b))))) (*.f64 (*.f64 (/.f64 (/.f64 #s(literal 1 binary64) x-scale) (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 a (*.f64 (*.f64 a (*.f64 b b)) #s(literal 4 binary64))))) |
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 a a) (*.f64 a (*.f64 b b))) #s(literal -4 binary64))) (*.f64 (*.f64 (/.f64 (/.f64 #s(literal 1 binary64) x-scale) (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 (*.f64 a (*.f64 a (*.f64 b b))) #s(literal -4 binary64)))) |
(/.f64 (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 b b)))) #s(literal 4 binary64))) (*.f64 (*.f64 (/.f64 (/.f64 #s(literal 1 binary64) x-scale) (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 a (*.f64 a (*.f64 b b))))) |
(/.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 (*.f64 a a) (*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 b b))))) (*.f64 (/.f64 (/.f64 #s(literal 1 binary64) x-scale) (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 a (*.f64 (*.f64 a (*.f64 b b)) #s(literal 4 binary64))))) |
(/.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 (*.f64 (*.f64 a a) (*.f64 a (*.f64 b b))) #s(literal -4 binary64))) (*.f64 (/.f64 (/.f64 #s(literal 1 binary64) x-scale) (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 (*.f64 a (*.f64 a (*.f64 b b))) #s(literal -4 binary64)))) |
(/.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 b b)))) #s(literal 4 binary64))) (*.f64 (/.f64 (/.f64 #s(literal 1 binary64) x-scale) (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 a (*.f64 a (*.f64 b b))))) |
(/.f64 (*.f64 (/.f64 #s(literal -1 binary64) (*.f64 x-scale (*.f64 y-scale y-scale))) #s(literal 1 binary64)) (*.f64 (/.f64 #s(literal -1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 b b))) (*.f64 (*.f64 a a) (*.f64 a (*.f64 b b)))) #s(literal 1 binary64)))) |
(/.f64 (*.f64 (/.f64 #s(literal -1 binary64) (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 (*.f64 a a) (*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 b b))))) (*.f64 (/.f64 #s(literal -1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 a (*.f64 (*.f64 a (*.f64 b b)) #s(literal 4 binary64))))) |
(/.f64 (*.f64 (/.f64 #s(literal -1 binary64) (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 (*.f64 (*.f64 a a) (*.f64 a (*.f64 b b))) #s(literal -4 binary64))) (*.f64 (/.f64 #s(literal -1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 (*.f64 a (*.f64 a (*.f64 b b))) #s(literal -4 binary64)))) |
(/.f64 (*.f64 (/.f64 #s(literal -1 binary64) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 b b)))) #s(literal 4 binary64))) (*.f64 (/.f64 #s(literal -1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 a (*.f64 a (*.f64 b b))))) |
(/.f64 (neg.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 b b)))) (*.f64 x-scale (*.f64 y-scale y-scale)))) (neg.f64 (/.f64 (*.f64 a (*.f64 (*.f64 a (*.f64 b b)) #s(literal 4 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) |
(/.f64 (neg.f64 (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 b b) (*.f64 a (*.f64 a (*.f64 b b)))))) (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 #s(literal -1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) |
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 b b)))) (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 (*.f64 a (*.f64 a (*.f64 b b))) #s(literal -4 binary64))) |
(/.f64 (*.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 b b) (*.f64 a (*.f64 a (*.f64 b b)))))) #s(literal 1 binary64)) (*.f64 (/.f64 (/.f64 #s(literal 1 binary64) x-scale) (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 x-scale (*.f64 y-scale y-scale)))) |
(/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 (*.f64 a a) (*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 b b))))) (*.f64 a (*.f64 (*.f64 a (*.f64 b b)) #s(literal 4 binary64)))) |
(/.f64 (*.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 b b) (*.f64 a (*.f64 a (*.f64 b b)))))) (/.f64 #s(literal -1 binary64) (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 #s(literal -1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) |
(/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(literal 1 binary64)) (*.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 b b))) (*.f64 (*.f64 a a) (*.f64 a (*.f64 b b)))) #s(literal 1 binary64))) |
(/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (*.f64 a a) (*.f64 a (*.f64 b b))) #s(literal -4 binary64))) (*.f64 (*.f64 a (*.f64 a (*.f64 b b))) #s(literal -4 binary64))) |
(/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 a a) (*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 b b)))) #s(literal 4 binary64))) (*.f64 a (*.f64 a (*.f64 b b)))) |
(*.f64 (*.f64 a (*.f64 a a)) (*.f64 (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 b b) (*.f64 a (*.f64 a (*.f64 b b))))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) |
(*.f64 (*.f64 (*.f64 a a) (*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 b b)))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 a (*.f64 (*.f64 a (*.f64 b b)) #s(literal 4 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) |
(*.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 b b) (*.f64 a (*.f64 a (*.f64 b b)))))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) |
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 (*.f64 a (*.f64 a a)) (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 b b) (*.f64 a (*.f64 a (*.f64 b b)))))))) |
(*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 (*.f64 a (*.f64 a a)) (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 b b) (*.f64 a (*.f64 a (*.f64 b b))))))) |
(*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 b b)))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 a (*.f64 (*.f64 a (*.f64 b b)) #s(literal 4 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) |
(*.f64 (/.f64 (*.f64 a (*.f64 a a)) #s(literal 4 binary64)) (*.f64 (*.f64 (/.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b))) (/.f64 (*.f64 b b) a)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) |
(*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 b b) (*.f64 a (*.f64 a (*.f64 b b)))))) (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) |
(*.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 b b)))) (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1 binary64) (*.f64 a (*.f64 (*.f64 a (*.f64 b b)) #s(literal 4 binary64))))) |
(*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 b b)))) #s(literal 4 binary64)) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 a (*.f64 a (*.f64 b b))))) |
(*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 b b) (*.f64 a (*.f64 a (*.f64 b b)))))) #s(literal 1 binary64)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) |
(*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 b b)))) (*.f64 a (*.f64 a (*.f64 b b)))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(literal 4 binary64))) |
(*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 b b)))) (*.f64 #s(literal 4 binary64) a)) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 a (*.f64 b b)))) |
(*.f64 (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 a (*.f64 a a))) (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 b b) (*.f64 a (*.f64 a (*.f64 b b)))))) |
(*.f64 (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 (*.f64 a a) (*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 b b))))) (/.f64 #s(literal 1 binary64) (*.f64 a (*.f64 (*.f64 a (*.f64 b b)) #s(literal 4 binary64))))) |
(*.f64 (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 a (*.f64 a a)) #s(literal 4 binary64))) (*.f64 (/.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b))) (/.f64 (*.f64 b b) a))) |
(*.f64 a (*.f64 a (*.f64 (*.f64 a (*.f64 b b)) #s(literal 4 binary64)))) |
(*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b b) (*.f64 a (*.f64 a a)))) |
(*.f64 (*.f64 a a) (*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 b b)))) |
(*.f64 (*.f64 a (*.f64 a a)) (*.f64 #s(literal 4 binary64) (*.f64 b b))) |
(*.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 #s(literal 4 binary64) (*.f64 b b)) (*.f64 a (*.f64 a a))) |
(*.f64 (*.f64 (*.f64 a a) (*.f64 a (*.f64 b 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 #s(literal 4 binary64) (*.f64 b b)) a) (*.f64 a a)) |
(*.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 b b)) (*.f64 a a)) a) |
(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 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (+.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))))) #s(literal 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 #s(literal 2 binary64) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (+.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))))) #s(literal 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 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(literal 3 binary64)) (pow.f64 (+.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))))) #s(literal 6 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 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (-.f64 (pow.f64 (+.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-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 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))))) #s(literal 4 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 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (+.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64))))) |
(pow.f64 (+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (+.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))))) #s(literal 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 #s(literal 2 binary64) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (+.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))))) #s(literal 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 #s(literal 2 binary64) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (+.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64))) #s(literal 1/4 binary64))) |
(+.f64 (/.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 b b) (-.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.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 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (+.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) |
(+.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 b b) (-.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.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 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (+.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) |
(-.f64 (/.f64 (pow.f64 (/.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal 2 binary64)) (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (-.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.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 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (+.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (/.f64 (pow.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 b b) (-.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.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 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (+.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (-.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.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 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (+.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) |
(fma.f64 (*.f64 b (*.f64 b (*.f64 b b))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 b b) (-.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.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 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (+.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) |
(fma.f64 (*.f64 b (*.f64 b (*.f64 b b))) (/.f64 (-.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.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 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (+.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) |
(fma.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64)))) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 b b) (-.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.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 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (+.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) |
(fma.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 b b) (-.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.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 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (+.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64))))))) (/.f64 (/.f64 #s(literal 1 binary64) x-scale) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) |
(fma.f64 (/.f64 (*.f64 b b) (*.f64 (*.f64 x-scale x-scale) (/.f64 (*.f64 x-scale x-scale) (*.f64 b b)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 b b) (-.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.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 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (+.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) |
(fma.f64 (/.f64 (*.f64 b (*.f64 b (*.f64 b b))) (*.f64 x-scale x-scale)) (/.f64 (-.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.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 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (+.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) |
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 b (*.f64 b (*.f64 b b)))) (-.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.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 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (+.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64))))))))) |
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 b b) (-.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.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 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (+.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 b b) (-.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.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 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (+.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 b b) (-.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.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 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (+.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(literal 3 binary64))))) |
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (-.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.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 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (+.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 b b) (-.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.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 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (+.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))) |
(/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 b (*.f64 b (*.f64 b b)))) (-.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.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 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (+.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64))))))) (*.f64 (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) |
(/.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 b b) (-.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.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 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (+.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 b b) (-.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.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 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (+.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 b b) (-.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.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 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (+.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))) |
(/.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 b b) (-.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.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 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (+.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (-.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.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 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (+.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) |
(/.f64 (+.f64 (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 (*.f64 b b) (*.f64 (*.f64 b b) (-.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.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 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (+.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64))))))))) (*.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))))) #s(literal 1 binary64))) (*.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))))) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 (*.f64 b b) (*.f64 (*.f64 b b) (-.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.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 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (+.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)))))))))) |
(/.f64 (+.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))))) (*.f64 (*.f64 b b) (*.f64 (*.f64 b b) (-.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.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 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (+.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64))))))))) (*.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) |
(/.f64 (+.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (neg.f64 x-scale))) (*.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))))) (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (neg.f64 (-.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.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 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (+.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64))))))))) (*.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))))) (*.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (neg.f64 x-scale)))) |
(/.f64 (+.f64 (*.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 b b) (-.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.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 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (+.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)))) (*.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))))) (*.f64 y-scale y-scale))) |
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64)))) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 (*.f64 b b) (*.f64 (*.f64 b b) (-.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.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 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (+.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64))))))))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(literal 1 binary64))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 (*.f64 b b) (*.f64 (*.f64 b b) (-.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.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 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (+.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)))))))))) |
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (neg.f64 x-scale))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (neg.f64 (-.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.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 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (+.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64))))))))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (neg.f64 x-scale)))) |
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64)))) (*.f64 y-scale y-scale)) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 b b) (-.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.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 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (+.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 y-scale y-scale))) |
(/.f64 (+.f64 (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (neg.f64 (*.f64 b (*.f64 b (*.f64 b b))))) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 (*.f64 b b) (*.f64 (*.f64 b b) (-.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.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 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (+.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64))))))))) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal 1 binary64))) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 (*.f64 b b) (*.f64 (*.f64 b b) (-.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.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 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (+.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)))))))))) |
(/.f64 (+.f64 (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (neg.f64 (*.f64 b (*.f64 b (*.f64 b b))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 (*.f64 b b) (*.f64 (*.f64 b b) (-.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.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 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (+.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64))))))))) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) |
(/.f64 (+.f64 (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (neg.f64 (*.f64 b (*.f64 b (*.f64 b b))))) (*.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (neg.f64 x-scale))) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (neg.f64 (-.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.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 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (+.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64))))))))) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (neg.f64 x-scale)))) |
(/.f64 (+.f64 (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (neg.f64 (*.f64 b (*.f64 b (*.f64 b b))))) (*.f64 y-scale y-scale)) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 b b) (-.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.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 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (+.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)))) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 y-scale y-scale))) |
(/.f64 (+.f64 (*.f64 (/.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 x-scale x-scale)))) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 (*.f64 b b) (*.f64 (*.f64 b b) (-.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.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 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (+.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64))))))))) (*.f64 (*.f64 y-scale y-scale) #s(literal 1 binary64))) (*.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 (*.f64 b b) (*.f64 (*.f64 b b) (-.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.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 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (+.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)))))))))) |
(/.f64 (+.f64 (*.f64 (/.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 x-scale x-scale)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 b b) (*.f64 (*.f64 b b) (-.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.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 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (+.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64))))))))) (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) |
(/.f64 (+.f64 (*.f64 (/.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 x-scale x-scale)))) (*.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (neg.f64 x-scale))) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (neg.f64 (-.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.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 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (+.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64))))))))) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (neg.f64 x-scale)))) |
(/.f64 (+.f64 (*.f64 (/.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 x-scale x-scale)))) (*.f64 y-scale y-scale)) (*.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 b b) (-.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.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 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (+.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)))) (*.f64 y-scale (*.f64 y-scale (*.f64 y-scale y-scale)))) |
(/.f64 (+.f64 (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64)))))) (*.f64 (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 (*.f64 b b) (*.f64 (*.f64 b b) (-.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.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 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (+.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)))))))) #s(literal 1 binary64))) (*.f64 (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 (*.f64 b b) (*.f64 (*.f64 b b) (-.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.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 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (+.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)))))))) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))))))) |
(/.f64 (+.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale x-scale) (*.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 (*.f64 b b) (*.f64 (*.f64 b b) (-.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.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 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (+.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64)))))) (*.f64 (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 (*.f64 b b) (*.f64 (*.f64 b b) (-.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.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 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (+.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) |
(/.f64 (+.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 x-scale x-scale) (*.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 (*.f64 b b) (*.f64 (*.f64 b b) (-.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.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 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (+.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (neg.f64 (*.f64 b (*.f64 b (*.f64 b b))))))) (*.f64 (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 (*.f64 b b) (*.f64 (*.f64 b b) (-.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.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 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (+.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)))))))) (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) |
(/.f64 (+.f64 (*.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 (*.f64 b b) (*.f64 (*.f64 b b) (-.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.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 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (+.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)))))))) (/.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 x-scale x-scale)))))) (*.f64 (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 (*.f64 b b) (*.f64 (*.f64 b b) (-.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.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 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (+.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)))))))) (*.f64 y-scale y-scale))) |
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 b b) (-.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.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 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (+.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64))))))) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64)))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))))))) |
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 b b) (-.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.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 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (+.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64)))))) (*.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) |
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 b b) (-.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.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 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (+.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64))))))) (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (neg.f64 (*.f64 b (*.f64 b (*.f64 b b))))))) (*.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) |
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 b b) (-.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.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 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (+.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64))))))) (*.f64 y-scale y-scale)) (*.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 y-scale y-scale))) |
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (neg.f64 (-.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.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 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (+.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64))))))) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64)))))) (*.f64 (*.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (neg.f64 x-scale)) #s(literal 1 binary64))) (*.f64 (*.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (neg.f64 x-scale)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))))))) |
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (neg.f64 (-.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.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 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (+.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 (*.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (neg.f64 x-scale)) (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64)))))) (*.f64 (*.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (neg.f64 x-scale)) (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) |
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (neg.f64 (-.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.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 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (+.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64))))))) (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (neg.f64 x-scale)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (neg.f64 (*.f64 b (*.f64 b (*.f64 b b))))))) (*.f64 (*.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (neg.f64 x-scale)) (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) |
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (neg.f64 (-.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.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 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (+.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64))))))) (*.f64 y-scale y-scale)) (*.f64 (*.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (neg.f64 x-scale)) (/.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (neg.f64 x-scale)) (*.f64 y-scale y-scale))) |
(/.f64 (+.f64 (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 b b) (-.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.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 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (+.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64)))))) (*.f64 (*.f64 y-scale y-scale) #s(literal 1 binary64))) (*.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))))))) |
(/.f64 (+.f64 (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 b b) (-.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.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 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (+.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64)))))) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) |
(/.f64 (+.f64 (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 b b) (-.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.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 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (+.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 y-scale y-scale) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (neg.f64 (*.f64 b (*.f64 b (*.f64 b b))))))) (*.f64 (*.f64 y-scale y-scale) (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) |
(/.f64 (+.f64 (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 b b) (-.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.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 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (+.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64))))))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) (*.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 x-scale x-scale)))))) (*.f64 y-scale (*.f64 y-scale (*.f64 y-scale y-scale)))) |
(/.f64 (neg.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 b (*.f64 b (*.f64 b b)))) (-.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.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 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (+.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)))))))) (neg.f64 (*.f64 (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)))) |
(/.f64 (neg.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 b b) (-.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.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 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (+.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 b b) (-.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.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 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (+.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 b b) (-.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.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 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (+.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))))) |
(/.f64 (neg.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 b b) (-.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.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 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (+.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (neg.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (-.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.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 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (+.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) |
(/.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 b b) (-.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.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 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (+.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal 3 binary64))) (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 b b) (-.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.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 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (+.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 b b) (-.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.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 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (+.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))) |
(/.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 b b) (-.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.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 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (+.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal 2 binary64))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 b b) (-.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.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 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (+.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) |
(*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (-.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.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 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (+.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) |
(*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (+.f64 (/.f64 (-.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.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 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (+.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) |
(*.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 b (*.f64 b (*.f64 b b)))) (-.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.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 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (+.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64))))))) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)))) |
(*.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 b b) (-.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.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 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (+.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 b b) (-.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.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 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (+.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 b b) (-.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.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 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (+.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))))) |
(*.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 b b) (-.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.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 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (+.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (-.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.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 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (+.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) |
(+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) |
(+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) |
(-.f64 (/.f64 (/.f64 #s(literal 1/4 binary64) (*.f64 y-scale (*.f64 y-scale (*.f64 y-scale y-scale)))) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)))) |
(fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) |
(fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) |
(fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) |
(fma.f64 (/.f64 #s(literal 1/2 binary64) y-scale) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) y-scale) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) |
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 y-scale (*.f64 y-scale (*.f64 y-scale y-scale))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 (*.f64 (*.f64 y-scale y-scale) #s(literal 1/2 binary64)) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) |
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (*.f64 y-scale (*.f64 y-scale (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))))) (+.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (/.f64 #s(literal 1/4 binary64) (*.f64 y-scale (*.f64 y-scale (*.f64 y-scale y-scale))))) (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) #s(literal 3 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 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)) (-.f64 (/.f64 #s(literal 1/4 binary64) (*.f64 y-scale (*.f64 y-scale (*.f64 y-scale y-scale)))) (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))) |
(/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 (*.f64 (*.f64 y-scale y-scale) #s(literal 1/2 binary64)) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale (*.f64 y-scale (*.f64 y-scale y-scale)))) |
(/.f64 (+.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (/.f64 #s(literal 1/4 binary64) (*.f64 y-scale (*.f64 y-scale (*.f64 y-scale y-scale))))) (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) #s(literal 3 binary64))) (+.f64 (/.f64 #s(literal 1/4 binary64) (*.f64 y-scale (*.f64 y-scale (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))))) |
(/.f64 (-.f64 (/.f64 #s(literal 1/4 binary64) (*.f64 y-scale (*.f64 y-scale (*.f64 y-scale y-scale)))) (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(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 binary64) (/.f64 (*.f64 y-scale y-scale) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (/.f64 (*.f64 y-scale y-scale) #s(literal 1/2 binary64)) #s(literal 1 binary64))) (*.f64 (/.f64 (*.f64 y-scale y-scale) #s(literal 1/2 binary64)) (/.f64 (*.f64 y-scale y-scale) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) |
(/.f64 (+.f64 (*.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 (/.f64 (*.f64 y-scale y-scale) #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (/.f64 (*.f64 y-scale y-scale) #s(literal 1/2 binary64)) (*.f64 y-scale y-scale))) |
(/.f64 (+.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 y-scale y-scale) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64)))) (*.f64 (/.f64 (*.f64 y-scale y-scale) #s(literal 1/2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 y-scale y-scale)))) |
(/.f64 (+.f64 (*.f64 #s(literal 1 binary64) y-scale) (*.f64 (/.f64 (*.f64 y-scale y-scale) #s(literal 1/2 binary64)) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) y-scale))) (*.f64 (/.f64 (*.f64 y-scale y-scale) #s(literal 1/2 binary64)) y-scale)) |
(/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y-scale y-scale) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 y-scale y-scale) #s(literal 1 binary64))) (*.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 y-scale y-scale) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) |
(/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 0 binary64) (*.f64 y-scale y-scale))) (*.f64 (*.f64 y-scale y-scale) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 y-scale y-scale) (-.f64 #s(literal 0 binary64) (*.f64 y-scale y-scale)))) |
(/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) y-scale) (*.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) y-scale))) (*.f64 (*.f64 y-scale y-scale) y-scale)) |
(/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y-scale y-scale) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 y-scale y-scale)) #s(literal 1 binary64))) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 y-scale y-scale)) (/.f64 (*.f64 y-scale y-scale) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) |
(/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 y-scale y-scale)) (*.f64 y-scale y-scale))) |
(/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 0 binary64) (*.f64 y-scale y-scale))) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 y-scale y-scale)) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64)))) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 y-scale y-scale)) (-.f64 #s(literal 0 binary64) (*.f64 y-scale y-scale)))) |
(/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) y-scale) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) y-scale))) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 y-scale y-scale)) y-scale)) |
(/.f64 (+.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) y-scale) (/.f64 (*.f64 y-scale y-scale) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale #s(literal 1 binary64))) (*.f64 y-scale (/.f64 (*.f64 y-scale y-scale) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) |
(/.f64 (+.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) y-scale) (*.f64 y-scale y-scale)) (*.f64 y-scale (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale (*.f64 y-scale y-scale))) |
(/.f64 (+.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) y-scale) (-.f64 #s(literal 0 binary64) (*.f64 y-scale y-scale))) (*.f64 y-scale (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64)))) (*.f64 y-scale (-.f64 #s(literal 0 binary64) (*.f64 y-scale y-scale)))) |
(/.f64 (+.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) y-scale) y-scale) (*.f64 y-scale (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) y-scale))) (*.f64 y-scale y-scale)) |
(/.f64 (+.f64 (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 y-scale y-scale) #s(literal 1/2 binary64))) (*.f64 (/.f64 (*.f64 y-scale y-scale) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) #s(literal 1 binary64))) (*.f64 (/.f64 (*.f64 y-scale y-scale) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (*.f64 y-scale y-scale) #s(literal 1/2 binary64)))) |
(/.f64 (+.f64 (*.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 (/.f64 (*.f64 y-scale y-scale) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) #s(literal 1/2 binary64))) (*.f64 (/.f64 (*.f64 y-scale y-scale) (*.f64 #s(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 binary64) (-.f64 #s(literal 0 binary64) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 y-scale y-scale) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) #s(literal -1/2 binary64))) (*.f64 (/.f64 (*.f64 y-scale y-scale) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (-.f64 #s(literal 0 binary64) (*.f64 y-scale y-scale)))) |
(/.f64 (+.f64 (*.f64 #s(literal 1 binary64) y-scale) (*.f64 (/.f64 (*.f64 y-scale y-scale) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (/.f64 #s(literal 1/2 binary64) y-scale))) (*.f64 (/.f64 (*.f64 y-scale y-scale) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) y-scale)) |
(/.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) #s(literal 1/2 binary64))) (*.f64 (*.f64 y-scale y-scale) #s(literal 1 binary64))) (*.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 y-scale y-scale) #s(literal 1/2 binary64)))) |
(/.f64 (+.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)) (*.f64 (*.f64 y-scale y-scale) #s(literal 1/2 binary64))) (*.f64 y-scale (*.f64 y-scale (*.f64 y-scale y-scale)))) |
(/.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (-.f64 #s(literal 0 binary64) (*.f64 y-scale y-scale))) (*.f64 (*.f64 y-scale y-scale) #s(literal -1/2 binary64))) (*.f64 (*.f64 y-scale y-scale) (-.f64 #s(literal 0 binary64) (*.f64 y-scale y-scale)))) |
(/.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) y-scale) (*.f64 (*.f64 y-scale y-scale) (/.f64 #s(literal 1/2 binary64) y-scale))) (*.f64 (*.f64 y-scale y-scale) y-scale)) |
(/.f64 (+.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64)) (/.f64 (*.f64 y-scale y-scale) #s(literal 1/2 binary64))) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 y-scale y-scale)) #s(literal 1 binary64))) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 y-scale y-scale)) (/.f64 (*.f64 y-scale y-scale) #s(literal 1/2 binary64)))) |
(/.f64 (+.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64)) (*.f64 y-scale y-scale)) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 y-scale y-scale)) #s(literal 1/2 binary64))) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 y-scale y-scale)) (*.f64 y-scale y-scale))) |
(/.f64 (+.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 y-scale y-scale))) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 y-scale y-scale)) #s(literal -1/2 binary64))) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 y-scale y-scale)) (-.f64 #s(literal 0 binary64) (*.f64 y-scale y-scale)))) |
(/.f64 (+.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64)) y-scale) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 y-scale y-scale)) (/.f64 #s(literal 1/2 binary64) y-scale))) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 y-scale y-scale)) y-scale)) |
(/.f64 (+.f64 (*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) y-scale) (/.f64 (*.f64 y-scale y-scale) #s(literal 1/2 binary64))) (*.f64 y-scale #s(literal 1 binary64))) (*.f64 y-scale (/.f64 (*.f64 y-scale y-scale) #s(literal 1/2 binary64)))) |
(/.f64 (+.f64 (*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) y-scale) (*.f64 y-scale y-scale)) (*.f64 y-scale #s(literal 1/2 binary64))) (*.f64 y-scale (*.f64 y-scale y-scale))) |
(/.f64 (+.f64 (*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) y-scale) (-.f64 #s(literal 0 binary64) (*.f64 y-scale y-scale))) (*.f64 y-scale #s(literal -1/2 binary64))) (*.f64 y-scale (-.f64 #s(literal 0 binary64) (*.f64 y-scale y-scale)))) |
(/.f64 (+.f64 (*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) y-scale) y-scale) (*.f64 y-scale (/.f64 #s(literal 1/2 binary64) y-scale))) (*.f64 y-scale y-scale)) |
(/.f64 (neg.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 (*.f64 (*.f64 y-scale y-scale) #s(literal 1/2 binary64)) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (neg.f64 (*.f64 y-scale (*.f64 y-scale (*.f64 y-scale y-scale))))) |
(/.f64 (neg.f64 (+.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (/.f64 #s(literal 1/4 binary64) (*.f64 y-scale (*.f64 y-scale (*.f64 y-scale y-scale))))) (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (*.f64 y-scale (*.f64 y-scale (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))))))) |
(/.f64 (neg.f64 (-.f64 (/.f64 #s(literal 1/4 binary64) (*.f64 y-scale (*.f64 y-scale (*.f64 y-scale y-scale)))) (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #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 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) #s(literal 3 binary64)) (*.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (/.f64 #s(literal 1/4 binary64) (*.f64 y-scale (*.f64 y-scale (*.f64 y-scale y-scale)))))) (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1/4 binary64) (*.f64 y-scale (*.f64 y-scale (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))))) |
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (/.f64 #s(literal 1/4 binary64) (*.f64 y-scale (*.f64 y-scale (*.f64 y-scale y-scale))))) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) |
(*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (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 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) |
(*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 (*.f64 (*.f64 y-scale y-scale) #s(literal 1/2 binary64)) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale (*.f64 y-scale (*.f64 y-scale y-scale))))) |
(*.f64 (+.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (/.f64 #s(literal 1/4 binary64) (*.f64 y-scale (*.f64 y-scale (*.f64 y-scale y-scale))))) (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 #s(literal 1/4 binary64) (*.f64 y-scale (*.f64 y-scale (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))))))) |
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 #s(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 binary64) (*.f64 y-scale y-scale)) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) #s(literal 1/2 binary64))) |
(*.f64 (-.f64 (/.f64 #s(literal 1/4 binary64) (*.f64 y-scale (*.f64 y-scale (*.f64 y-scale y-scale)))) (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (*.f64 y-scale y-scale)))) |
(+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))))) |
(+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) |
(+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) |
(+.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) #s(literal 1/2 binary64)) (+.f64 (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) |
(+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) |
(+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) #s(literal 1/2 binary64))) (*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)) #s(literal 1/2 binary64))) |
(-.f64 (/.f64 (/.f64 #s(literal 1/4 binary64) (*.f64 y-scale (*.f64 y-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))))))) (/.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))))))) |
(fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) |
(fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))))) |
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) |
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (*.f64 y-scale (*.f64 y-scale (*.f64 y-scale y-scale)))) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))))) (+.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (/.f64 #s(literal 1/4 binary64) (*.f64 y-scale (*.f64 y-scale (*.f64 y-scale y-scale))))) (pow.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))))) #s(literal 3 binary64))))) |
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))))) (-.f64 (/.f64 #s(literal 1/4 binary64) (*.f64 y-scale (*.f64 y-scale (*.f64 y-scale y-scale)))) (pow.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) |
(/.f64 (+.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (/.f64 #s(literal 1/4 binary64) (*.f64 y-scale (*.f64 y-scale (*.f64 y-scale y-scale))))) (pow.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))))) #s(literal 3 binary64))) (+.f64 (/.f64 #s(literal 1/4 binary64) (*.f64 y-scale (*.f64 y-scale (*.f64 y-scale y-scale)))) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))))) |
(/.f64 (-.f64 (/.f64 #s(literal 1/4 binary64) (*.f64 y-scale (*.f64 y-scale (*.f64 y-scale y-scale)))) (pow.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))))))) |
(/.f64 (neg.f64 (+.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (/.f64 #s(literal 1/4 binary64) (*.f64 y-scale (*.f64 y-scale (*.f64 y-scale y-scale))))) (pow.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (*.f64 y-scale (*.f64 y-scale (*.f64 y-scale y-scale)))) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))))))) |
(/.f64 (neg.f64 (-.f64 (/.f64 #s(literal 1/4 binary64) (*.f64 y-scale (*.f64 y-scale (*.f64 y-scale y-scale)))) (pow.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (neg.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))))))) |
(/.f64 (+.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))))) #s(literal 3 binary64)) (*.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (/.f64 #s(literal 1/4 binary64) (*.f64 y-scale (*.f64 y-scale (*.f64 y-scale y-scale)))))) (+.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1/4 binary64) (*.f64 y-scale (*.f64 y-scale (*.f64 y-scale y-scale)))) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))))) |
(/.f64 (-.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)) (/.f64 #s(literal 1/4 binary64) (*.f64 y-scale (*.f64 y-scale (*.f64 y-scale y-scale))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) |
(*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))))) |
(*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))) |
(*.f64 (+.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (/.f64 #s(literal 1/4 binary64) (*.f64 y-scale (*.f64 y-scale (*.f64 y-scale y-scale))))) (pow.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 #s(literal 1/4 binary64) (*.f64 y-scale (*.f64 y-scale (*.f64 y-scale y-scale)))) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))))))) |
(*.f64 (-.f64 (/.f64 #s(literal 1/4 binary64) (*.f64 y-scale (*.f64 y-scale (*.f64 y-scale y-scale)))) (pow.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))))))) |
#s(literal 1 binary64) |
(exp.f64 (*.f64 (log.f64 b) #s(literal 2 binary64))) |
(pow.f64 b #s(literal 2 binary64)) |
(*.f64 #s(literal 1 binary64) (*.f64 b b)) |
(*.f64 b b) |
(*.f64 (*.f64 b b) #s(literal 1 binary64)) |
(*.f64 (pow.f64 b #s(literal 1 binary64)) (pow.f64 b #s(literal 1 binary64))) |
(*.f64 (*.f64 #s(literal 1 binary64) b) b) |
(*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.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 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))))) (/.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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 x-scale x-scale)) (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (*.f64 b b))))) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) x-scale) (/.f64 (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))) x-scale)))))))))) |
(*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (*.f64 #s(literal 1/4 binary64) (sqrt.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 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))))) (/.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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 x-scale x-scale)) (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (*.f64 b b))))) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) x-scale) (/.f64 (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))) x-scale))))))))) |
(*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) #s(literal 1/4 binary64))) (sqrt.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 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))))) (/.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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 x-scale x-scale)) (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (*.f64 b b))))) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) x-scale) (/.f64 (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))) x-scale)))))))) |
(*.f64 (sqrt.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 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))))) (/.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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 x-scale x-scale)) (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (*.f64 b b))))) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) x-scale) (/.f64 (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))) x-scale))))))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) #s(literal 1/4 binary64)))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.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 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))))) (/.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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 x-scale x-scale)) (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (*.f64 b b))))) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) x-scale) (/.f64 (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))) x-scale))))))))) |
(*.f64 (*.f64 (sqrt.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 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))))) (/.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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 x-scale x-scale)) (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (*.f64 b b))))) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) x-scale) (/.f64 (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))) x-scale))))))) #s(literal 1/4 binary64)) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) |
(*.f64 (*.f64 (sqrt.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 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))))) (/.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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 x-scale x-scale)) (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (*.f64 b b))))) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) x-scale) (/.f64 (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))) x-scale))))))) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) #s(literal 1/4 binary64)) |
(*.f64 (*.f64 (sqrt.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 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))))) (/.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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 x-scale x-scale)) (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (*.f64 b b))))) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) x-scale) (/.f64 (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))) x-scale))))))) (*.f64 #s(literal 1/4 binary64) x-scale)) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) |
(*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) #s(literal 1/4 binary64))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) |
(*.f64 (*.f64 x-scale y-scale) (*.f64 (sqrt.f64 #s(literal 8 binary64)) #s(literal 1/4 binary64))) |
(*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (*.f64 x-scale #s(literal 1/4 binary64))) |
(*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) #s(literal 1/4 binary64)) |
(*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale y-scale)) (sqrt.f64 #s(literal 8 binary64))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) x-scale) |
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) y-scale) (sqrt.f64 #s(literal 8 binary64))) |
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (sqrt.f64 #s(literal 8 binary64))) y-scale) |
(*.f64 a (*.f64 (*.f64 a (*.f64 b b)) #s(literal 4 binary64))) |
(*.f64 a (*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 b b)))) |
(*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a (*.f64 b b)))) |
(*.f64 (*.f64 a a) (*.f64 #s(literal 4 binary64) (*.f64 b 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 (*.f64 b b))) #s(literal 4 binary64)) |
(*.f64 (*.f64 #s(literal 4 binary64) a) (*.f64 a (*.f64 b 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 (*.f64 #s(literal 4 binary64) a) b) (*.f64 a b)) |
(*.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) b) (*.f64 b #s(literal 4 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))) |
(*.f64 a b) |
(*.f64 b 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))) |
(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))) |
(cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) |
(exp.f64 (*.f64 (log.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) #s(literal 1 binary64))) |
(sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) |
(pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1 binary64)) |
(*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 1/2 binary64))) |
(exp.f64 (*.f64 (log.f64 (*.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (-.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.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 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (+.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #s(literal 8 binary64))) #s(literal 1/2 binary64))) |
(sqrt.f64 (*.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (-.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.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 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (+.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #s(literal 8 binary64))) |
(pow.f64 (*.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (-.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.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 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (+.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #s(literal 8 binary64)) #s(literal 1/2 binary64)) |
(*.f64 (sqrt.f64 #s(literal 8 binary64)) (sqrt.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (-.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.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 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (+.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) |
(*.f64 (sqrt.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (-.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.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 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (+.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (sqrt.f64 #s(literal 8 binary64))) |
(*.f64 (pow.f64 (*.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (-.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.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 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (+.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #s(literal 8 binary64)) #s(literal 1/4 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (-.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.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 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (+.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #s(literal 8 binary64)) #s(literal 1/4 binary64))) |
(exp.f64 (*.f64 (log.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) #s(literal 1 binary64))) |
(cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) |
(pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 1 binary64)) |
(*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 1/2 binary64)) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 1/2 binary64))) |
(exp.f64 (*.f64 (log.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) #s(literal 1 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)) |
(*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 1/2 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/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))) |
| 1× | egg-herbie |
| 6846× | *-lowering-*.f32 |
| 6846× | *-lowering-*.f64 |
| 3552× | +-lowering-+.f64 |
| 3552× | +-lowering-+.f32 |
| 2184× | /-lowering-/.f32 |
Useful iterations: 1 (0.0ms)
| Iter | Nodes | Cost |
|---|---|---|
| 0 | 1532 | 52541 |
| 1 | 5692 | 44026 |
| 0 | 8536 | 44026 |
| 1× | iter limit |
| 1× | node limit |
| 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) |
(* 1/4 a) |
(* 1/4 a) |
(* 1/4 a) |
(* 1/4 a) |
(* 1/4 a) |
(* 1/4 a) |
(* 1/4 a) |
(* 1/4 a) |
(* 1/4 a) |
(* 1/4 a) |
(* 1/4 a) |
(* 4 x-scale) |
(* 4 x-scale) |
(* 4 x-scale) |
(* 4 x-scale) |
(* 4 x-scale) |
(* 4 x-scale) |
(* 4 x-scale) |
(* 4 x-scale) |
(* 4 x-scale) |
(* 4 x-scale) |
(* 4 x-scale) |
(* 4 x-scale) |
a |
a |
a |
a |
a |
a |
a |
a |
a |
a |
a |
a |
a |
a |
a |
a |
a |
a |
a |
a |
a |
a |
a |
a |
x-scale |
x-scale |
x-scale |
x-scale |
x-scale |
x-scale |
x-scale |
x-scale |
x-scale |
x-scale |
x-scale |
x-scale |
x-scale |
x-scale |
x-scale |
x-scale |
x-scale |
x-scale |
x-scale |
x-scale |
x-scale |
x-scale |
x-scale |
x-scale |
(* a x-scale) |
(* a x-scale) |
(* a x-scale) |
(* a x-scale) |
(* a x-scale) |
(* a x-scale) |
(* a x-scale) |
(* a x-scale) |
(* a x-scale) |
(* a x-scale) |
(* a x-scale) |
(* a x-scale) |
(* a x-scale) |
(* a x-scale) |
(* a x-scale) |
(* a x-scale) |
(* a x-scale) |
(* a x-scale) |
(* a x-scale) |
(* a x-scale) |
(* a x-scale) |
(* a x-scale) |
(* a x-scale) |
(* a x-scale) |
(* a x-scale) |
(* a x-scale) |
(* a x-scale) |
(* a x-scale) |
(* a x-scale) |
(* a x-scale) |
(* a x-scale) |
(* a x-scale) |
(* a x-scale) |
(* a x-scale) |
(* a x-scale) |
(* a x-scale) |
(* a x-scale) |
(* a x-scale) |
(* a x-scale) |
(* a x-scale) |
(* 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))) |
(* 4 (* (pow a 3) (pow b 2))) |
(* 4 (* (pow a 3) (pow b 2))) |
(* 4 (* (pow a 3) (pow b 2))) |
(* 4 (* (pow a 3) (pow b 2))) |
(* 4 (* (pow a 3) (pow b 2))) |
(* 4 (* (pow a 3) (pow b 2))) |
(* 4 (* (pow a 3) (pow b 2))) |
(* 4 (* (pow a 3) (pow b 2))) |
(* 4 (* (pow a 3) (pow b 2))) |
(* 4 (* (pow a 3) (pow b 2))) |
(* 4 (* (pow a 3) (pow b 2))) |
(* 4 (* (pow a 3) (pow b 2))) |
(* 4 (* (pow a 3) (pow b 2))) |
(* 4 (* (pow a 3) (pow b 2))) |
(* 4 (* (pow a 3) (pow b 2))) |
(* 4 (* (pow a 3) (pow b 2))) |
(* 4 (* (pow a 3) (pow b 2))) |
(* 4 (* (pow a 3) (pow b 2))) |
(* 4 (* (pow a 3) (pow b 2))) |
(* 4 (* (pow a 3) (pow b 2))) |
(* 4 (* (pow a 3) (pow b 2))) |
(* 4 (* (pow a 3) (pow b 2))) |
(* 4 (* (pow a 3) (pow b 2))) |
(- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) |
(- (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (* (pow angle 2) (+ (* -1 (* (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/16200 (/ (pow (PI) 2) (pow y-scale 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) |
(- (+ (* 1/2 (/ 1 (pow x-scale 2))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (+ (* -1 (* (+ (* 1/1574640000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/1574640000 (/ (pow (PI) 4) (pow y-scale 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))) (+ (* -1/196830000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (pow (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/16200 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (* 1/4 (/ (pow (+ (* -1 (* (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/16200 (/ (pow (PI) 2) (pow y-scale 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 1/2 (/ (+ (* -1 (* (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/16200 (/ (pow (PI) 2) (pow y-scale 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2)))))))))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) |
(- (+ (* 1/2 (/ 1 (pow x-scale 2))) (* (pow angle 2) (+ (* 1/2 (/ (+ (* -1 (* (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/16200 (/ (pow (PI) 2) (pow y-scale 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (+ (* -1 (* (+ (* -1/382637520000000 (/ (pow (PI) 6) (pow x-scale 2))) (* -1/382637520000000 (/ (pow (PI) 6) (pow y-scale 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))) (+ (* 1/31886460000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/19131876000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/2 (* (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/16200 (/ (pow (PI) 2) (pow y-scale 2)))) (+ (* 1/1574640000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/1574640000 (/ (pow (PI) 4) (pow y-scale 2))))))))) (* 1/2 (/ (* (+ (* -1 (* (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/16200 (/ (pow (PI) 2) (pow y-scale 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* -1 (* (+ (* 1/1574640000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/1574640000 (/ (pow (PI) 4) (pow y-scale 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))) (+ (* -1/196830000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (pow (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/16200 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (* 1/4 (/ (pow (+ (* -1 (* (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/16200 (/ (pow (PI) 2) (pow y-scale 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2))))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 1/2 (/ (- (+ (* -1 (* (+ (* 1/1574640000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/1574640000 (/ (pow (PI) 4) (pow y-scale 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))) (+ (* -1/196830000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (pow (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/16200 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (* 1/4 (/ (pow (+ (* -1 (* (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/16200 (/ (pow (PI) 2) (pow y-scale 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2)))))))))))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) |
(sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2))) |
(sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2))) |
(sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2))) |
(sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2))) |
(sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2))) |
(sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2))) |
(sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2))) |
(sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2))) |
(/ (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2)) |
(/ (- (+ 1/2 (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2)) |
(/ (- (+ 1/2 (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (- (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2)) |
(/ (- (+ 1/2 (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 2) (* (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) (- (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)))))) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 3))) (* 1/2 (/ (- (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2)) |
(+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) |
(+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) (* (pow x-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))))) |
(+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) (* (pow x-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 1/2 (/ (- (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (* (pow x-scale 4) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))))) |
(+ (* -1/4 (/ (* (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) (- (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))) (* (pow x-scale 6) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 3)))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) (* (pow x-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 1/2 (/ (- (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (* (pow x-scale 4) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))))))) |
(+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) |
(+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) (* (pow x-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))))) |
(+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) (* (pow x-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 1/2 (/ (- (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (* (pow x-scale 4) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))))) |
(+ (* -1/4 (/ (* (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) (- (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))) (* (pow x-scale 6) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 3)))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) (* (pow x-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 1/2 (/ (- (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (* (pow x-scale 4) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))))))) |
(/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow y-scale 2)) |
(/ (+ 1/2 (+ (* 1/2 (cos (* 1/90 (* angle (PI))))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (pow y-scale 2)) |
(/ (+ 1/2 (+ (* 1/2 (cos (* 1/90 (* angle (PI))))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow y-scale 2) (- (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))) (pow y-scale 2)) |
(/ (+ 1/2 (+ (* 1/2 (cos (* 1/90 (* angle (PI))))) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow y-scale 2) (* (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (- (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)))))) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 3))) (* 1/2 (/ (- (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))) (pow y-scale 2)) |
(- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) |
(- (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 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) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) |
(- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 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) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) (* 1/2 (/ (- (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) 2) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 2)))) (* (pow y-scale 4) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) |
(- (+ (* -1/4 (/ (* (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (- (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) 2) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 2))))) (* (pow y-scale 6) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 3)))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 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) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) (* 1/2 (/ (- (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) 2) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 2)))) (* (pow y-scale 4) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 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 (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 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) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) |
(- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 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) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) (* 1/2 (/ (- (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) 2) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 2)))) (* (pow y-scale 4) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) |
(- (+ (* -1/4 (/ (* (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (- (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) 2) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 2))))) (* (pow y-scale 6) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 3)))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 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) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) (* 1/2 (/ (- (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) 2) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 2)))) (* (pow y-scale 4) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) |
(* (pow b 4) (- (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 4) (pow y-scale 2)))) (+ (* 1/2 (/ 1 (* (pow x-scale 2) (pow y-scale 4)))) (+ (* 1/2 (/ 1 (* (pow x-scale 4) (pow y-scale 2)))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 2) (pow y-scale 4))))))) (* (/ 1 (* (pow x-scale 2) (pow y-scale 2))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2)))))) |
(* (pow b 4) (- (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 4) (pow y-scale 2)))) (+ (* 1/2 (/ 1 (* (pow x-scale 2) (pow y-scale 4)))) (+ (* 1/2 (/ 1 (* (pow x-scale 4) (pow y-scale 2)))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 2) (pow y-scale 4))))))) (* (/ 1 (* (pow x-scale 2) (pow y-scale 2))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2)))))) |
(* (pow b 4) (- (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 4) (pow y-scale 2)))) (+ (* 1/2 (/ 1 (* (pow x-scale 2) (pow y-scale 4)))) (+ (* 1/2 (/ 1 (* (pow x-scale 4) (pow y-scale 2)))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 2) (pow y-scale 4))))))) (* (/ 1 (* (pow x-scale 2) (pow y-scale 2))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2)))))) |
(* (pow b 4) (- (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 4) (pow y-scale 2)))) (+ (* 1/2 (/ 1 (* (pow x-scale 2) (pow y-scale 4)))) (+ (* 1/2 (/ 1 (* (pow x-scale 4) (pow y-scale 2)))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 2) (pow y-scale 4))))))) (* (/ 1 (* (pow x-scale 2) (pow y-scale 2))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2)))))) |
(* (pow b 4) (- (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 4) (pow y-scale 2)))) (+ (* 1/2 (/ 1 (* (pow x-scale 2) (pow y-scale 4)))) (+ (* 1/2 (/ 1 (* (pow x-scale 4) (pow y-scale 2)))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 2) (pow y-scale 4))))))) (* (/ 1 (* (pow x-scale 2) (pow y-scale 2))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2)))))) |
(* (pow b 4) (- (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 4) (pow y-scale 2)))) (+ (* 1/2 (/ 1 (* (pow x-scale 2) (pow y-scale 4)))) (+ (* 1/2 (/ 1 (* (pow x-scale 4) (pow y-scale 2)))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 2) (pow y-scale 4))))))) (* (/ 1 (* (pow x-scale 2) (pow y-scale 2))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2)))))) |
(* (pow b 4) (- (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 4) (pow y-scale 2)))) (+ (* 1/2 (/ 1 (* (pow x-scale 2) (pow y-scale 4)))) (+ (* 1/2 (/ 1 (* (pow x-scale 4) (pow y-scale 2)))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 2) (pow y-scale 4))))))) (* (/ 1 (* (pow x-scale 2) (pow y-scale 2))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2)))))) |
(* (pow b 4) (- (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 4) (pow y-scale 2)))) (+ (* 1/2 (/ 1 (* (pow x-scale 2) (pow y-scale 4)))) (+ (* 1/2 (/ 1 (* (pow x-scale 4) (pow y-scale 2)))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 2) (pow y-scale 4))))))) (* (/ 1 (* (pow x-scale 2) (pow y-scale 2))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2)))))) |
(* (pow b 4) (- (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 4) (pow y-scale 2)))) (+ (* 1/2 (/ 1 (* (pow x-scale 2) (pow y-scale 4)))) (+ (* 1/2 (/ 1 (* (pow x-scale 4) (pow y-scale 2)))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 2) (pow y-scale 4))))))) (* (/ 1 (* (pow x-scale 2) (pow y-scale 2))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2)))))) |
(* (pow b 4) (- (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 4) (pow y-scale 2)))) (+ (* 1/2 (/ 1 (* (pow x-scale 2) (pow y-scale 4)))) (+ (* 1/2 (/ 1 (* (pow x-scale 4) (pow y-scale 2)))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 2) (pow y-scale 4))))))) (* (/ 1 (* (pow x-scale 2) (pow y-scale 2))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2)))))) |
(* (pow b 4) (- (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 4) (pow y-scale 2)))) (+ (* 1/2 (/ 1 (* (pow x-scale 2) (pow y-scale 4)))) (+ (* 1/2 (/ 1 (* (pow x-scale 4) (pow y-scale 2)))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 2) (pow y-scale 4))))))) (* (/ 1 (* (pow x-scale 2) (pow y-scale 2))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2)))))) |
(* (pow b 4) (- (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 4) (pow y-scale 2)))) (+ (* 1/2 (/ 1 (* (pow x-scale 2) (pow y-scale 4)))) (+ (* 1/2 (/ 1 (* (pow x-scale 4) (pow y-scale 2)))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 2) (pow y-scale 4))))))) (* (/ 1 (* (pow x-scale 2) (pow y-scale 2))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2)))))) |
(/ (* (pow b 4) (- (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 3/2 (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow x-scale 2))))) (* (pow x-scale 2) (pow y-scale 2))) |
(+ (* (pow angle 2) (+ (* 1/32400 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 4) (pow y-scale 2)))) (/ (* (pow b 4) (- (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (+ (* -1 (* (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/16200 (/ (pow (PI) 2) (pow y-scale 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))))) (* (pow x-scale 2) (pow y-scale 2))))) (/ (* (pow b 4) (- (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 3/2 (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow x-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))) |
(+ (* (pow angle 2) (+ (* 1/32400 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 4) (pow y-scale 2)))) (+ (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow b 4) (pow (PI) 4)) (* (pow x-scale 4) (pow y-scale 2)))) (/ (* (pow b 4) (- (* 1/3149280000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1 (* (+ (* 1/1574640000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/1574640000 (/ (pow (PI) 4) (pow y-scale 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))) (+ (* -1/196830000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (pow (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/16200 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (* 1/4 (/ (pow (+ (* -1 (* (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/16200 (/ (pow (PI) 2) (pow y-scale 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))))) (* (pow x-scale 2) (pow y-scale 2))))) (/ (* (pow b 4) (- (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (+ (* -1 (* (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/16200 (/ (pow (PI) 2) (pow y-scale 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))))) (* (pow x-scale 2) (pow y-scale 2)))))) (/ (* (pow b 4) (- (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 3/2 (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow x-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))) |
(+ (* (pow angle 2) (+ (* 1/32400 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 4) (pow y-scale 2)))) (+ (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow b 4) (pow (PI) 4)) (* (pow x-scale 4) (pow y-scale 2)))) (+ (* (pow angle 2) (+ (* 1/765275040000000 (/ (* (pow b 4) (pow (PI) 6)) (* (pow x-scale 4) (pow y-scale 2)))) (/ (* (pow b 4) (- (* -1/765275040000000 (/ (pow (PI) 6) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1 (* (+ (* -1/382637520000000 (/ (pow (PI) 6) (pow x-scale 2))) (* -1/382637520000000 (/ (pow (PI) 6) (pow y-scale 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))) (+ (* 1/31886460000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/19131876000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/2 (* (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/16200 (/ (pow (PI) 2) (pow y-scale 2)))) (+ (* 1/1574640000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/1574640000 (/ (pow (PI) 4) (pow y-scale 2))))))))) (* 1/2 (/ (* (+ (* -1 (* (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/16200 (/ (pow (PI) 2) (pow y-scale 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* -1 (* (+ (* 1/1574640000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/1574640000 (/ (pow (PI) 4) (pow y-scale 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))) (+ (* -1/196830000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (pow (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/16200 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (* 1/4 (/ (pow (+ (* -1 (* (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/16200 (/ (pow (PI) 2) (pow y-scale 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2))))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))))) (* (pow x-scale 2) (pow y-scale 2))))) (/ (* (pow b 4) (- (* 1/3149280000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1 (* (+ (* 1/1574640000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/1574640000 (/ (pow (PI) 4) (pow y-scale 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))) (+ (* -1/196830000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (pow (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/16200 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (* 1/4 (/ (pow (+ (* -1 (* (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/16200 (/ (pow (PI) 2) (pow y-scale 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))))) (* (pow x-scale 2) (pow y-scale 2)))))) (/ (* (pow b 4) (- (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (+ (* -1 (* (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/16200 (/ (pow (PI) 2) (pow y-scale 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))))) (* (pow x-scale 2) (pow y-scale 2)))))) (/ (* (pow b 4) (- (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 3/2 (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow x-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))) |
(+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))) (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))) |
(+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))) (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))) |
(+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))) (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))) |
(+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))) (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))) |
(+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))) (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))) |
(+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))) (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))) |
(+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))) (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))) |
(+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))) (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))) |
(/ (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 4) (- (* 1/2 (cos (* 1/90 (* angle (PI))))) 1/2)) (pow y-scale 2))) (pow x-scale 4)) |
(/ (+ (/ (* (pow b 4) (* (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 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow y-scale 2)) (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 4) (- (* 1/2 (cos (* 1/90 (* angle (PI))))) 1/2)) (pow y-scale 2)))) (pow x-scale 4)) |
(/ (+ (* (pow x-scale 2) (+ (* -1/2 (/ (* (pow b 4) (* (pow x-scale 2) (- (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)))))) (* (pow y-scale 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (pow y-scale 2)))) (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 4) (- (* 1/2 (cos (* 1/90 (* angle (PI))))) 1/2)) (pow y-scale 2)))) (pow x-scale 4)) |
(/ (+ (* (pow x-scale 2) (+ (* (pow x-scale 2) (+ (* -1/2 (/ (* (pow b 4) (- (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2))))) (* (pow y-scale 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* 1/4 (/ (* (pow b 4) (* (pow x-scale 2) (* (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) (- (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2))))))) (* (pow y-scale 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 3)))))) (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (pow y-scale 2)))) (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 4) (- (* 1/2 (cos (* 1/90 (* angle (PI))))) 1/2)) (pow y-scale 2)))) (pow x-scale 4)) |
(/ (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (pow x-scale 4)) |
(/ (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (+ (* -1/2 (/ (* (pow b 4) (- (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (pow x-scale 4)) |
(/ (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (+ (* -1/2 (/ (* (pow b 4) (- (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (+ (* 1/4 (/ (* (pow b 4) (* (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) (- (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 3))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (pow x-scale 4)) |
(/ (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (+ (* -1/2 (/ (* (pow b 4) (- (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (+ (* 1/4 (/ (* (pow b 4) (* (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) (- (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 3))))) (+ (* 1/2 (/ (* (pow b 4) (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (- (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 4))) (* 1/4 (/ (pow (- (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))) (* (pow x-scale 6) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (pow x-scale 4)) |
(/ (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (pow x-scale 4)) |
(/ (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (+ (* -1/2 (/ (* (pow b 4) (- (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (pow x-scale 4)) |
(/ (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (+ (* -1/2 (/ (* (pow b 4) (- (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (+ (* 1/4 (/ (* (pow b 4) (* (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) (- (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 3))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (pow x-scale 4)) |
(/ (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (+ (* -1/2 (/ (* (pow b 4) (- (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (+ (* 1/4 (/ (* (pow b 4) (* (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) (- (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 3))))) (+ (* 1/2 (/ (* (pow b 4) (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (- (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 4))) (* 1/4 (/ (pow (- (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))) (* (pow x-scale 6) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (pow x-scale 4)) |
(/ (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)))) (* (pow x-scale 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4))) (pow y-scale 2)) |
(/ (+ (* -1/2 (/ (* (pow b 4) (* (pow y-scale 2) (- (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)))))) (* (pow x-scale 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)))) (* (pow x-scale 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4)))) (pow y-scale 2)) |
(/ (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)))) (* (pow x-scale 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (+ (* (pow y-scale 2) (+ (* -1/2 (/ (* (pow b 4) (- (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2))))) (* (pow x-scale 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* 1/4 (/ (* (pow b 4) (* (pow y-scale 2) (* (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (- (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2))))))) (* (pow x-scale 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 3)))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4)))) (pow y-scale 2)) |
(/ (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)))) (* (pow x-scale 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (+ (* (pow y-scale 2) (+ (* -1/2 (/ (* (pow b 4) (- (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2))))) (* (pow x-scale 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow y-scale 2) (+ (* 1/4 (/ (* (pow b 4) (* (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (- (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)))))) (* (pow x-scale 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 3)))) (* 1/2 (/ (* (pow b 4) (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) 2) (- (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2))))) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 4))) (* 1/4 (/ (pow (- (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)))) 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)))))) (* (pow x-scale 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4)))) (pow y-scale 2)) |
(/ (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4)) (/ (* (pow b 4) (- (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (pow x-scale 2))) (pow y-scale 2)) |
(/ (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4)) (+ (/ (* (pow b 4) (- (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (pow x-scale 2)) (/ (* (pow b 4) (- (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (* 1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))) (* (pow x-scale 2) (pow y-scale 2))))) (pow y-scale 2)) |
(/ (+ (* -1/2 (/ (* (pow b 4) (- (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) 2) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 2))))) (* (pow x-scale 2) (* (pow y-scale 4) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))) (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4)) (+ (/ (* (pow b 4) (- (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (pow x-scale 2)) (/ (* (pow b 4) (- (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (* 1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow y-scale 2)) |
(/ (+ (* -1/2 (/ (* (pow b 4) (- (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) 2) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 2))))) (* (pow x-scale 2) (* (pow y-scale 4) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))) (+ (* 1/4 (/ (* (pow b 4) (* (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (- (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) 2) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 6) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 3))))) (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4)) (+ (/ (* (pow b 4) (- (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (pow x-scale 2)) (/ (* (pow b 4) (- (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (* 1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow y-scale 2)) |
(/ (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4)) (/ (* (pow b 4) (- (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (pow x-scale 2))) (pow y-scale 2)) |
(/ (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4)) (+ (/ (* (pow b 4) (- (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (pow x-scale 2)) (/ (* (pow b 4) (- (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (* 1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))) (* (pow x-scale 2) (pow y-scale 2))))) (pow y-scale 2)) |
(/ (+ (* -1/2 (/ (* (pow b 4) (- (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) 2) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 2))))) (* (pow x-scale 2) (* (pow y-scale 4) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))) (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4)) (+ (/ (* (pow b 4) (- (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (pow x-scale 2)) (/ (* (pow b 4) (- (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (* 1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow y-scale 2)) |
(/ (+ (* -1/2 (/ (* (pow b 4) (- (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) 2) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 2))))) (* (pow x-scale 2) (* (pow y-scale 4) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))) (+ (* 1/4 (/ (* (pow b 4) (* (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (- (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) 2) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 6) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 3))))) (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4)) (+ (/ (* (pow b 4) (- (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (pow x-scale 2)) (/ (* (pow b 4) (- (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (* 1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow y-scale 2)) |
(/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow y-scale 2)) |
(/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow y-scale 2)) |
(/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow y-scale 2)) |
(/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow y-scale 2)) |
(/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow y-scale 2)) |
(/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow y-scale 2)) |
(/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow y-scale 2)) |
(/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow y-scale 2)) |
(/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow y-scale 2)) |
(/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow y-scale 2)) |
(/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow y-scale 2)) |
(/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow y-scale 2)) |
(/ 1 (pow y-scale 2)) |
(+ (* -1/32400 (/ (* (pow angle 2) (pow (PI) 2)) (pow y-scale 2))) (/ 1 (pow y-scale 2))) |
(+ (* (pow angle 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow angle 2) (pow (PI) 4)) (pow y-scale 2))))) (/ 1 (pow y-scale 2))) |
(+ (* (pow angle 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* (pow angle 2) (+ (* -1/765275040000000 (/ (* (pow angle 2) (pow (PI) 6)) (pow y-scale 2))) (* 1/3149280000 (/ (pow (PI) 4) (pow y-scale 2))))))) (/ 1 (pow y-scale 2))) |
(+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) |
(+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) |
(+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) |
(+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) |
(+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) |
(+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) |
(+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) |
(+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) |
(/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow y-scale 2)) |
(/ (+ 1/2 (+ (* 1/2 (cos (* 1/90 (* angle (PI))))) (* 1/2 (/ (* (pow y-scale 2) (cos (* 1/90 (* angle (PI))))) (pow x-scale 2))))) (pow y-scale 2)) |
(/ (+ 1/2 (+ (* 1/2 (cos (* 1/90 (* angle (PI))))) (* 1/2 (/ (* (pow y-scale 2) (cos (* 1/90 (* angle (PI))))) (pow x-scale 2))))) (pow y-scale 2)) |
(/ (+ 1/2 (+ (* 1/2 (cos (* 1/90 (* angle (PI))))) (* 1/2 (/ (* (pow y-scale 2) (cos (* 1/90 (* angle (PI))))) (pow x-scale 2))))) (pow y-scale 2)) |
(* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) |
(+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))) |
(+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))) |
(+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))) |
(* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) |
(+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))) |
(+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))) |
(+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))) |
(+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2)))) |
(+ (* 1/2 (* (pow angle 2) (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/16200 (/ (pow (PI) 2) (pow y-scale 2)))))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) |
(+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* (pow angle 2) (+ (* 1/2 (* (pow angle 2) (+ (* 1/1574640000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/1574640000 (/ (pow (PI) 4) (pow y-scale 2)))))) (* 1/2 (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/16200 (/ (pow (PI) 2) (pow y-scale 2))))))))) |
(+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* (pow angle 2) (+ (* 1/2 (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/16200 (/ (pow (PI) 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* 1/2 (* (pow angle 2) (+ (* -1/382637520000000 (/ (pow (PI) 6) (pow x-scale 2))) (* -1/382637520000000 (/ (pow (PI) 6) (pow y-scale 2)))))) (* 1/2 (+ (* 1/1574640000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/1574640000 (/ (pow (PI) 4) (pow y-scale 2))))))))))) |
(+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2)))) |
(+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2)))) |
(+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2)))) |
(+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2)))) |
(+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2)))) |
(+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2)))) |
(+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2)))) |
(+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2)))) |
(* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) |
(/ (+ (* 1/2 (cos (* 1/90 (* angle (PI))))) (* (pow x-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (pow x-scale 2)) |
(/ (+ (* 1/2 (cos (* 1/90 (* angle (PI))))) (* (pow x-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (pow x-scale 2)) |
(/ (+ (* 1/2 (cos (* 1/90 (* angle (PI))))) (* (pow x-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (pow x-scale 2)) |
(+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) |
(+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) |
(+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) |
(+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) |
(+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) |
(+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) |
(+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) |
(+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) |
(pow b 2) |
(pow b 2) |
(pow b 2) |
(pow b 2) |
(pow b 2) |
(pow b 2) |
(pow b 2) |
(pow b 2) |
(pow b 2) |
(pow b 2) |
(pow b 2) |
(pow b 2) |
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow b 2)))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) |
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow b 2)))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) |
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow b 2)))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) |
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow b 2)))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) |
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow b 2)))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) |
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow b 2)))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) |
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow b 2)))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) |
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow b 2)))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) |
(* -1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow b 2)))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) |
(* -1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow b 2)))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) |
(* -1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow b 2)))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) |
(* -1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow b 2)))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) |
(+ (* -1/4 (* (/ (* a (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))))) (* (pow b 2) x-scale)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* a (+ (* -1/4 (* (/ (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))))) (* (pow b 2) x-scale)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* 1/8 (* (* a (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow b 2) (pow x-scale 2))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow b 4) (* (pow x-scale 4) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* a (+ (* -1/4 (* (/ (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))))) (* (pow b 2) x-scale)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* a (+ (* 1/8 (* (* a (* x-scale (* y-scale (* (sqrt 8) (- (* -1/2 (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* (pow b 2) (pow x-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow b 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (+ (* -2 (pow b 3)) (* 2 (pow b 3))) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow b 2) (pow x-scale 2))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow b 4) (* (pow x-scale 4) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (* (pow b 2) (* (pow x-scale 2) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))))) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow b 2) (pow x-scale 2))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow b 4) (* (pow x-scale 4) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))))) |
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) |
(* a (+ (* -1/4 (* (/ (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b))))) (* a x-scale)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) |
(* a (+ (* -1/4 (* (/ (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b))))) (* a x-scale)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (pow x-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) (pow a 2)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) |
(* a (+ (* -1/4 (* (/ (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b))))) (* a x-scale)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/2 (- (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (pow x-scale 2))) (* 4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (+ (* -2 b) (* 2 b)))) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* -1 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -2 b) (* 2 b)) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (pow x-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* (pow x-scale 2) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 3)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (pow x-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) (pow a 2)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) |
(* -1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) |
(* -1 (* a (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* 1/4 (* (/ (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b))))) (* a x-scale)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) |
(* -1 (* a (+ (* -1 (/ (+ (* -1/4 (* (/ (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b))))) x-scale) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (pow x-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) a) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) a)) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) |
(* -1 (* a (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/2 (- (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (pow x-scale 2))) (* 4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (+ (* -2 b) (* 2 b)))) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* -1 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -2 b) (* 2 b)) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (pow x-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* (pow x-scale 2) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) a) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (pow x-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) a)) (* -1/4 (* (/ (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b))))) x-scale) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) a)) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) |
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) |
(+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/2 (- (+ (* -2 (/ (+ (* 1/32400 (/ (* (pow a 4) (pow (PI) 2)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2))) (pow a 2))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow a 2) (pow x-scale 2))))) (* -2 (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow a 2) (pow x-scale 2)))))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))))))))) (* b (sqrt 2)))) (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))) |
(+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (* -1/3149280000 (/ (* (pow a 4) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))))) (pow x-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow x-scale 2)))) (pow a 2))) (* 4 (/ (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))) (pow a 2)))) (+ (* -2 (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow a 2) (pow x-scale 2)))) (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (- (+ (* -2 (/ (+ (* 1/32400 (/ (* (pow a 4) (pow (PI) 2)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2))) (pow a 2))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow a 2) (pow x-scale 2))))) (* -2 (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow a 2) (pow x-scale 2)))))) (pow a 2))))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/2 (- (+ (* -2 (/ (+ (* 1/32400 (/ (* (pow a 4) (pow (PI) 2)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2))) (pow a 2))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow a 2) (pow x-scale 2))))) (* -2 (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow a 2) (pow x-scale 2)))))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/2 (- (+ (* -2 (/ (+ (* 1/32400 (/ (* (pow a 4) (pow (PI) 2)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2))) (pow a 2))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow a 2) (pow x-scale 2))))) (* -2 (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow a 2) (pow x-scale 2)))))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))))))) (* b (sqrt 2))))))) |
(+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/2 (- (+ (* -2 (/ (+ (* 1/32400 (/ (* (pow a 4) (pow (PI) 2)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2))) (pow a 2))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow a 2) (pow x-scale 2))))) (* -2 (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow a 2) (pow x-scale 2)))))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))))))) (* b (sqrt 2)))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (* -1/3149280000 (/ (* (pow a 2) (* (pow (PI) 4) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))))) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (pow x-scale 2))) (+ (/ (* (pow a 4) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))) (pow x-scale 2))))) (pow a 2))) (* 4 (/ (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- b a) 2)))) (pow x-scale 2))) (/ (* (pow (+ a b) 2) (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- b a) 2))) (pow x-scale 2)))) (pow a 2)))) (+ (* -2 (/ (* (pow b 2) (+ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))) (* (pow a 2) (pow x-scale 2)))) (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (- (+ (* -2 (/ (+ (* -1/3149280000 (/ (* (pow a 4) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))))) (pow x-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow x-scale 2)))) (pow a 2))) (* 4 (/ (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))) (pow a 2)))) (+ (* -2 (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow a 2) (pow x-scale 2)))) (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (- (+ (* -2 (/ (+ (* 1/32400 (/ (* (pow a 4) (pow (PI) 2)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2))) (pow a 2))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow a 2) (pow x-scale 2))))) (* -2 (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow a 2) (pow x-scale 2)))))) (pow a 2))))) (pow a 2)) (/ (* (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (- (+ (* -2 (/ (+ (* 1/32400 (/ (* (pow a 4) (pow (PI) 2)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2))) (pow a 2))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow a 2) (pow x-scale 2))))) (* -2 (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow a 2) (pow x-scale 2)))))) (pow a 2)))))) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2)))) (* 1/2 (/ (* (pow x-scale 2) (* (+ (* -1/2 (- (+ (* -2 (/ (+ (* 1/32400 (/ (* (pow a 4) (pow (PI) 2)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2))) (pow a 2))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow a 2) (pow x-scale 2))))) (* -2 (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow a 2) (pow x-scale 2)))))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))))) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (* -1/3149280000 (/ (* (pow a 4) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))))) (pow x-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow x-scale 2)))) (pow a 2))) (* 4 (/ (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))) (pow a 2)))) (+ (* -2 (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow a 2) (pow x-scale 2)))) (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (- (+ (* -2 (/ (+ (* 1/32400 (/ (* (pow a 4) (pow (PI) 2)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2))) (pow a 2))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow a 2) (pow x-scale 2))))) (* -2 (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow a 2) (pow x-scale 2)))))) (pow a 2))))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/2 (- (+ (* -2 (/ (+ (* 1/32400 (/ (* (pow a 4) (pow (PI) 2)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2))) (pow a 2))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow a 2) (pow x-scale 2))))) (* -2 (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow a 2) (pow x-scale 2)))))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (* -1/3149280000 (/ (* (pow a 4) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))))) (pow x-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow x-scale 2)))) (pow a 2))) (* 4 (/ (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))) (pow a 2)))) (+ (* -2 (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow a 2) (pow x-scale 2)))) (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (- (+ (* -2 (/ (+ (* 1/32400 (/ (* (pow a 4) (pow (PI) 2)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2))) (pow a 2))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow a 2) (pow x-scale 2))))) (* -2 (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow a 2) (pow x-scale 2)))))) (pow a 2))))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/2 (- (+ (* -2 (/ (+ (* 1/32400 (/ (* (pow a 4) (pow (PI) 2)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2))) (pow a 2))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow a 2) (pow x-scale 2))))) (* -2 (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow a 2) (pow x-scale 2)))))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))))) 2)) (* (pow b 2) (pow (sqrt 2) 2)))))))) (* b (sqrt 2))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) |
(+ (* -1/4 (* (/ (* b (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))))) (* (pow a 2) x-scale)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* b (+ (* -1/4 (* (/ (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))))) (* (pow a 2) x-scale)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* 1/8 (* (* b (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow a 2) (pow x-scale 2))))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))) (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow a 4) (* (pow x-scale 4) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* b (+ (* -1/4 (* (/ (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))))) (* (pow a 2) x-scale)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* b (+ (* 1/8 (* (* b (* x-scale (* y-scale (* (sqrt 8) (- (* -1/2 (- (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* (pow a 2) (pow x-scale 2)))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow a 4) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* -1 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -2 (pow a 3)) (* 2 (pow a 3))) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow a 2) (pow x-scale 2))))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))) (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow a 4) (* (pow x-scale 4) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (* (pow a 2) (* (pow x-scale 2) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))))) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow a 2) (pow x-scale 2))))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))) (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow a 4) (* (pow x-scale 4) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))))) |
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) |
(* b (+ (* -1/4 (* (/ (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a))))) (* b x-scale)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) |
(* b (+ (* -1/4 (* (/ (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a))))) (* b x-scale)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (pow x-scale 2)))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (+ (* -1/2 (/ (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) (pow b 2)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) |
(* b (+ (* -1/4 (* (/ (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a))))) (* b x-scale)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/2 (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (pow x-scale 2))) (* 4 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (+ (* -2 a) (* 2 a)))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (+ (* -2 a) (* 2 a)) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (pow x-scale 2)))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (+ (* -1/2 (/ (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* (pow x-scale 2) (+ (* -1/2 (/ (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow b 3)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (pow x-scale 2)))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (+ (* -1/2 (/ (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) (pow b 2)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) |
(* -1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) |
(* -1 (* b (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* 1/4 (* (/ (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a))))) (* b x-scale)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) |
(* -1 (* b (+ (* -1 (/ (+ (* -1/4 (* (/ (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a))))) x-scale) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (pow x-scale 2)))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (+ (* -1/2 (/ (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) b) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) b)) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) |
(* -1 (* b (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/2 (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (pow x-scale 2))) (* 4 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (+ (* -2 a) (* 2 a)))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (+ (* -2 a) (* 2 a)) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (pow x-scale 2)))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (+ (* -1/2 (/ (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* (pow x-scale 2) (+ (* -1/2 (/ (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) b) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (pow x-scale 2)))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (+ (* -1/2 (/ (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) b)) (* -1/4 (* (/ (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a))))) x-scale) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) b)) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(* 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) |
(* 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) |
(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 |
(+ 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)))) |
(* (* (pow b 2) (sqrt 8)) (sqrt (- (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 4) (pow y-scale 2)))) (+ (* 1/2 (/ 1 (* (pow x-scale 2) (pow y-scale 4)))) (+ (* 1/2 (/ 1 (* (pow x-scale 4) (pow y-scale 2)))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 2) (pow y-scale 4))))))) (* (/ 1 (* (pow x-scale 2) (pow y-scale 2))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2))))))) |
(* (* (pow b 2) (sqrt 8)) (sqrt (- (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 4) (pow y-scale 2)))) (+ (* 1/2 (/ 1 (* (pow x-scale 2) (pow y-scale 4)))) (+ (* 1/2 (/ 1 (* (pow x-scale 4) (pow y-scale 2)))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 2) (pow y-scale 4))))))) (* (/ 1 (* (pow x-scale 2) (pow y-scale 2))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2))))))) |
(* (* (pow b 2) (sqrt 8)) (sqrt (- (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 4) (pow y-scale 2)))) (+ (* 1/2 (/ 1 (* (pow x-scale 2) (pow y-scale 4)))) (+ (* 1/2 (/ 1 (* (pow x-scale 4) (pow y-scale 2)))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 2) (pow y-scale 4))))))) (* (/ 1 (* (pow x-scale 2) (pow y-scale 2))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2))))))) |
(* (* (pow b 2) (sqrt 8)) (sqrt (- (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 4) (pow y-scale 2)))) (+ (* 1/2 (/ 1 (* (pow x-scale 2) (pow y-scale 4)))) (+ (* 1/2 (/ 1 (* (pow x-scale 4) (pow y-scale 2)))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 2) (pow y-scale 4))))))) (* (/ 1 (* (pow x-scale 2) (pow y-scale 2))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2))))))) |
(* (* (pow b 2) (sqrt 8)) (sqrt (- (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 4) (pow y-scale 2)))) (+ (* 1/2 (/ 1 (* (pow x-scale 2) (pow y-scale 4)))) (+ (* 1/2 (/ 1 (* (pow x-scale 4) (pow y-scale 2)))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 2) (pow y-scale 4))))))) (* (/ 1 (* (pow x-scale 2) (pow y-scale 2))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2))))))) |
(* (* (pow b 2) (sqrt 8)) (sqrt (- (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 4) (pow y-scale 2)))) (+ (* 1/2 (/ 1 (* (pow x-scale 2) (pow y-scale 4)))) (+ (* 1/2 (/ 1 (* (pow x-scale 4) (pow y-scale 2)))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 2) (pow y-scale 4))))))) (* (/ 1 (* (pow x-scale 2) (pow y-scale 2))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2))))))) |
(* (* (pow b 2) (sqrt 8)) (sqrt (- (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 4) (pow y-scale 2)))) (+ (* 1/2 (/ 1 (* (pow x-scale 2) (pow y-scale 4)))) (+ (* 1/2 (/ 1 (* (pow x-scale 4) (pow y-scale 2)))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 2) (pow y-scale 4))))))) (* (/ 1 (* (pow x-scale 2) (pow y-scale 2))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2))))))) |
(* (* (pow b 2) (sqrt 8)) (sqrt (- (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 4) (pow y-scale 2)))) (+ (* 1/2 (/ 1 (* (pow x-scale 2) (pow y-scale 4)))) (+ (* 1/2 (/ 1 (* (pow x-scale 4) (pow y-scale 2)))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 2) (pow y-scale 4))))))) (* (/ 1 (* (pow x-scale 2) (pow y-scale 2))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2))))))) |
(* (* (pow b 2) (sqrt 8)) (sqrt (- (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 4) (pow y-scale 2)))) (+ (* 1/2 (/ 1 (* (pow x-scale 2) (pow y-scale 4)))) (+ (* 1/2 (/ 1 (* (pow x-scale 4) (pow y-scale 2)))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 2) (pow y-scale 4))))))) (* (/ 1 (* (pow x-scale 2) (pow y-scale 2))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2))))))) |
(* (* (pow b 2) (sqrt 8)) (sqrt (- (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 4) (pow y-scale 2)))) (+ (* 1/2 (/ 1 (* (pow x-scale 2) (pow y-scale 4)))) (+ (* 1/2 (/ 1 (* (pow x-scale 4) (pow y-scale 2)))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 2) (pow y-scale 4))))))) (* (/ 1 (* (pow x-scale 2) (pow y-scale 2))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2))))))) |
(* (* (pow b 2) (sqrt 8)) (sqrt (- (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 4) (pow y-scale 2)))) (+ (* 1/2 (/ 1 (* (pow x-scale 2) (pow y-scale 4)))) (+ (* 1/2 (/ 1 (* (pow x-scale 4) (pow y-scale 2)))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 2) (pow y-scale 4))))))) (* (/ 1 (* (pow x-scale 2) (pow y-scale 2))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2))))))) |
(* (* (pow b 2) (sqrt 8)) (sqrt (- (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 4) (pow y-scale 2)))) (+ (* 1/2 (/ 1 (* (pow x-scale 2) (pow y-scale 4)))) (+ (* 1/2 (/ 1 (* (pow x-scale 4) (pow y-scale 2)))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 2) (pow y-scale 4))))))) (* (/ 1 (* (pow x-scale 2) (pow y-scale 2))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2))))))) |
(* (/ (* (pow b 2) (sqrt 8)) (* x-scale y-scale)) (sqrt (- (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 3/2 (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow x-scale 2)))))) |
(+ (* 1/2 (* (/ (* (pow angle 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/32400 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 4) (pow y-scale 2)))) (/ (* (pow b 4) (- (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (+ (* -1 (* (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/16200 (/ (pow (PI) 2) (pow y-scale 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)) (sqrt (/ 1 (- (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 3/2 (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow x-scale 2)))))))) (* (/ (* (pow b 2) (sqrt 8)) (* x-scale y-scale)) (sqrt (- (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 3/2 (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow x-scale 2))))))) |
(+ (* (/ (* (pow b 2) (sqrt 8)) (* x-scale y-scale)) (sqrt (- (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 3/2 (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow x-scale 2)))))) (* (pow angle 2) (+ (* 1/2 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/32400 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 4) (pow y-scale 2)))) (/ (* (pow b 4) (- (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (+ (* -1 (* (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/16200 (/ (pow (PI) 2) (pow y-scale 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow b 2)) (sqrt (/ 1 (- (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 3/2 (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow x-scale 2)))))))) (* 1/2 (* (/ (* (pow angle 2) (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow b 4) (pow (PI) 4)) (* (pow x-scale 4) (pow y-scale 2)))) (/ (* (pow b 4) (- (* 1/3149280000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1 (* (+ (* 1/1574640000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/1574640000 (/ (pow (PI) 4) (pow y-scale 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))) (+ (* -1/196830000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (pow (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/16200 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (* 1/4 (/ (pow (+ (* -1 (* (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/16200 (/ (pow (PI) 2) (pow y-scale 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (pow (+ (* 1/32400 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 4) (pow y-scale 2)))) (/ (* (pow b 4) (- (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (+ (* -1 (* (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/16200 (/ (pow (PI) 2) (pow y-scale 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))))) (* (pow x-scale 2) (pow y-scale 2)))) 2))) (* (pow b 4) (- (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 3/2 (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow x-scale 2)))))))))))) (pow b 2)) (sqrt (/ 1 (- (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 3/2 (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow x-scale 2))))))))))) |
(+ (* (/ (* (pow b 2) (sqrt 8)) (* x-scale y-scale)) (sqrt (- (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 3/2 (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow x-scale 2)))))) (* (pow angle 2) (+ (* 1/2 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/32400 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 4) (pow y-scale 2)))) (/ (* (pow b 4) (- (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (+ (* -1 (* (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/16200 (/ (pow (PI) 2) (pow y-scale 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow b 2)) (sqrt (/ 1 (- (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 3/2 (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow x-scale 2)))))))) (* (pow angle 2) (+ (* 1/2 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow b 4) (pow (PI) 4)) (* (pow x-scale 4) (pow y-scale 2)))) (/ (* (pow b 4) (- (* 1/3149280000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1 (* (+ (* 1/1574640000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/1574640000 (/ (pow (PI) 4) (pow y-scale 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))) (+ (* -1/196830000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (pow (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/16200 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (* 1/4 (/ (pow (+ (* -1 (* (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/16200 (/ (pow (PI) 2) (pow y-scale 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (pow (+ (* 1/32400 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 4) (pow y-scale 2)))) (/ (* (pow b 4) (- (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (+ (* -1 (* (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/16200 (/ (pow (PI) 2) (pow y-scale 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))))) (* (pow x-scale 2) (pow y-scale 2)))) 2))) (* (pow b 4) (- (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 3/2 (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow x-scale 2))))))))))) (pow b 2)) (sqrt (/ 1 (- (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 3/2 (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow x-scale 2)))))))) (* 1/2 (* (/ (* (pow angle 2) (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/765275040000000 (/ (* (pow b 4) (pow (PI) 6)) (* (pow x-scale 4) (pow y-scale 2)))) (/ (* (pow b 4) (- (* -1/765275040000000 (/ (pow (PI) 6) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1 (* (+ (* -1/382637520000000 (/ (pow (PI) 6) (pow x-scale 2))) (* -1/382637520000000 (/ (pow (PI) 6) (pow y-scale 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))) (+ (* 1/31886460000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/19131876000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/2 (* (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/16200 (/ (pow (PI) 2) (pow y-scale 2)))) (+ (* 1/1574640000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/1574640000 (/ (pow (PI) 4) (pow y-scale 2))))))))) (* 1/2 (/ (* (+ (* -1 (* (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/16200 (/ (pow (PI) 2) (pow y-scale 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* -1 (* (+ (* 1/1574640000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/1574640000 (/ (pow (PI) 4) (pow y-scale 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))) (+ (* -1/196830000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (pow (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/16200 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (* 1/4 (/ (pow (+ (* -1 (* (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/16200 (/ (pow (PI) 2) (pow y-scale 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2))))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (* (+ (* 1/32400 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 4) (pow y-scale 2)))) (/ (* (pow b 4) (- (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (+ (* -1 (* (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/16200 (/ (pow (PI) 2) (pow y-scale 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (- (+ (* -1/3149280000 (/ (* (pow b 4) (pow (PI) 4)) (* (pow x-scale 4) (pow y-scale 2)))) (/ (* (pow b 4) (- (* 1/3149280000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1 (* (+ (* 1/1574640000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/1574640000 (/ (pow (PI) 4) (pow y-scale 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))) (+ (* -1/196830000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (pow (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/16200 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (* 1/4 (/ (pow (+ (* -1 (* (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/16200 (/ (pow (PI) 2) (pow y-scale 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (pow (+ (* 1/32400 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 4) (pow y-scale 2)))) (/ (* (pow b 4) (- (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (+ (* -1 (* (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/16200 (/ (pow (PI) 2) (pow y-scale 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))))) (* (pow x-scale 2) (pow y-scale 2)))) 2))) (* (pow b 4) (- (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 3/2 (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow x-scale 2))))))))))) (* (pow b 4) (- (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 3/2 (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow x-scale 2)))))))))))) (pow b 2)) (sqrt (/ 1 (- (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 3/2 (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow x-scale 2))))))))))))) |
(* (sqrt 8) (sqrt (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))) (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) |
(* (sqrt 8) (sqrt (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))) (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) |
(* (sqrt 8) (sqrt (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))) (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) |
(* (sqrt 8) (sqrt (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))) (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) |
(* (sqrt 8) (sqrt (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))) (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) |
(* (sqrt 8) (sqrt (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))) (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) |
(* (sqrt 8) (sqrt (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))) (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) |
(* (sqrt 8) (sqrt (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))) (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) |
(* (/ (sqrt 8) (pow x-scale 2)) (sqrt (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 4) (- (* 1/2 (cos (* 1/90 (* angle (PI))))) 1/2)) (pow y-scale 2))))) |
(/ (+ (* 1/2 (* (/ (* (pow b 4) (* (pow x-scale 2) (* (sqrt 8) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))) (pow y-scale 2)) (sqrt (/ 1 (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 4) (- (* 1/2 (cos (* 1/90 (* angle (PI))))) 1/2)) (pow y-scale 2))))))) (* (sqrt 8) (sqrt (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 4) (- (* 1/2 (cos (* 1/90 (* angle (PI))))) 1/2)) (pow y-scale 2)))))) (pow x-scale 2)) |
(/ (+ (* (sqrt 8) (sqrt (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 4) (- (* 1/2 (cos (* 1/90 (* angle (PI))))) 1/2)) (pow y-scale 2))))) (* (pow x-scale 2) (+ (* 1/2 (* (* (pow x-scale 2) (* (sqrt 8) (- (* -1/2 (/ (* (pow b 4) (- (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2))))) (* (pow y-scale 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* 1/4 (/ (* (pow b 8) (pow (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2)) (* (pow y-scale 4) (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 4) (- (* 1/2 (cos (* 1/90 (* angle (PI))))) 1/2)) (pow y-scale 2))))))))) (sqrt (/ 1 (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 4) (- (* 1/2 (cos (* 1/90 (* angle (PI))))) 1/2)) (pow y-scale 2))))))) (* 1/2 (* (/ (* (pow b 4) (* (sqrt 8) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow y-scale 2)) (sqrt (/ 1 (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 4) (- (* 1/2 (cos (* 1/90 (* angle (PI))))) 1/2)) (pow y-scale 2)))))))))) (pow x-scale 2)) |
(/ (+ (* (sqrt 8) (sqrt (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 4) (- (* 1/2 (cos (* 1/90 (* angle (PI))))) 1/2)) (pow y-scale 2))))) (* (pow x-scale 2) (+ (* 1/2 (* (/ (* (pow b 4) (* (sqrt 8) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow y-scale 2)) (sqrt (/ 1 (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 4) (- (* 1/2 (cos (* 1/90 (* angle (PI))))) 1/2)) (pow y-scale 2))))))) (* (pow x-scale 2) (+ (* 1/2 (* (* (sqrt 8) (- (* -1/2 (/ (* (pow b 4) (- (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2))))) (* (pow y-scale 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* 1/4 (/ (* (pow b 8) (pow (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2)) (* (pow y-scale 4) (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 4) (- (* 1/2 (cos (* 1/90 (* angle (PI))))) 1/2)) (pow y-scale 2)))))))) (sqrt (/ 1 (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 4) (- (* 1/2 (cos (* 1/90 (* angle (PI))))) 1/2)) (pow y-scale 2))))))) (* 1/2 (* (* (pow x-scale 2) (* (sqrt 8) (- (* 1/4 (/ (* (pow b 4) (* (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) (- (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)))))) (* (pow y-scale 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 3)))) (* 1/2 (/ (* (pow b 4) (* (- (* -1/2 (/ (* (pow b 4) (- (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2))))) (* (pow y-scale 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* 1/4 (/ (* (pow b 8) (pow (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2)) (* (pow y-scale 4) (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 4) (- (* 1/2 (cos (* 1/90 (* angle (PI))))) 1/2)) (pow y-scale 2))))))) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* (pow y-scale 2) (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 4) (- (* 1/2 (cos (* 1/90 (* angle (PI))))) 1/2)) (pow y-scale 2))))))))) (sqrt (/ 1 (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 4) (- (* 1/2 (cos (* 1/90 (* angle (PI))))) 1/2)) (pow y-scale 2)))))))))))) (pow x-scale 2)) |
(* (/ (sqrt 8) (pow x-scale 2)) (sqrt (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) |
(/ (+ (* -1/4 (* (/ (* (pow b 4) (* (sqrt 8) (- (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))) (* (sqrt 8) (sqrt (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (pow x-scale 2)) |
(/ (+ (* -1/4 (* (/ (* (pow b 4) (* (sqrt 8) (- (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))) (+ (* 1/2 (* (/ (* (sqrt 8) (- (* 1/4 (/ (* (pow b 4) (* (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) (- (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (* (pow y-scale 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 3)))) (* 1/16 (/ (* (pow b 8) (pow (- (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) 2)) (* (pow y-scale 4) (* (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))) (* (sqrt 8) (sqrt (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))) (pow x-scale 2)) |
(/ (+ (* -1/4 (* (/ (* (pow b 4) (* (sqrt 8) (- (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))) (+ (* 1/2 (* (/ (* (sqrt 8) (- (* 1/4 (/ (* (pow b 4) (* (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) (- (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (* (pow y-scale 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 3)))) (* 1/16 (/ (* (pow b 8) (pow (- (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) 2)) (* (pow y-scale 4) (* (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))) (+ (* 1/2 (* (/ (* (sqrt 8) (- (* 1/2 (/ (* (pow b 4) (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (- (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 4))) (* 1/4 (/ (pow (- (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -1/4 (/ (* (pow b 4) (* (- (* 1/4 (/ (* (pow b 4) (* (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) (- (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (* (pow y-scale 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 3)))) (* 1/16 (/ (* (pow b 8) (pow (- (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) 2)) (* (pow y-scale 4) (* (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (- (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (* (pow y-scale 2) (* (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))))) (pow x-scale 6)) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))) (* (sqrt 8) (sqrt (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (pow x-scale 2)) |
(* (/ (sqrt 8) (pow x-scale 2)) (sqrt (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) |
(/ (+ (* -1/4 (* (/ (* (pow b 4) (* (sqrt 8) (- (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))) (* (sqrt 8) (sqrt (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (pow x-scale 2)) |
(/ (+ (* -1/4 (* (/ (* (pow b 4) (* (sqrt 8) (- (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))) (+ (* 1/2 (* (/ (* (sqrt 8) (- (* 1/4 (/ (* (pow b 4) (* (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) (- (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (* (pow y-scale 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 3)))) (* 1/16 (/ (* (pow b 8) (pow (- (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) 2)) (* (pow y-scale 4) (* (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))) (* (sqrt 8) (sqrt (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))) (pow x-scale 2)) |
(/ (+ (* -1/4 (* (/ (* (pow b 4) (* (sqrt 8) (- (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))) (+ (* 1/2 (* (/ (* (sqrt 8) (- (* 1/4 (/ (* (pow b 4) (* (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) (- (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (* (pow y-scale 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 3)))) (* 1/16 (/ (* (pow b 8) (pow (- (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) 2)) (* (pow y-scale 4) (* (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))) (+ (* 1/2 (* (/ (* (sqrt 8) (- (* 1/2 (/ (* (pow b 4) (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (- (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 4))) (* 1/4 (/ (pow (- (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -1/4 (/ (* (pow b 4) (* (- (* 1/4 (/ (* (pow b 4) (* (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) (- (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (* (pow y-scale 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 3)))) (* 1/16 (/ (* (pow b 8) (pow (- (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) 2)) (* (pow y-scale 4) (* (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (- (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (* (pow y-scale 2) (* (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))))) (pow x-scale 6)) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))) (* (sqrt 8) (sqrt (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (pow x-scale 2)) |
(* (/ (sqrt 8) y-scale) (sqrt (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)))) (* (pow x-scale 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4))))) |
(/ (+ (* -1/4 (* (/ (* (pow b 4) (* (pow y-scale 2) (* (sqrt 8) (- (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2))))))) (* (pow x-scale 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)))) (* (pow x-scale 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4))))))) (* (sqrt 8) (sqrt (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)))) (* (pow x-scale 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4)))))) y-scale) |
(/ (+ (* (sqrt 8) (sqrt (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)))) (* (pow x-scale 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4))))) (* (pow y-scale 2) (+ (* -1/4 (* (/ (* (pow b 4) (* (sqrt 8) (- (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)))))) (* (pow x-scale 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)))) (* (pow x-scale 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4))))))) (* 1/2 (* (* (pow y-scale 2) (* (sqrt 8) (- (* 1/4 (/ (* (pow b 4) (* (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (- (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)))))) (* (pow x-scale 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 3)))) (* 1/16 (/ (* (pow b 8) (pow (- (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)))) 2)) (* (pow x-scale 4) (* (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)))) (* (pow x-scale 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4)))))))))) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)))) (* (pow x-scale 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4)))))))))) y-scale) |
(/ (+ (* (sqrt 8) (sqrt (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)))) (* (pow x-scale 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4))))) (* (pow y-scale 2) (+ (* -1/4 (* (/ (* (pow b 4) (* (sqrt 8) (- (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)))))) (* (pow x-scale 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)))) (* (pow x-scale 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4))))))) (* (pow y-scale 2) (+ (* 1/2 (* (* (sqrt 8) (- (* 1/4 (/ (* (pow b 4) (* (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (- (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)))))) (* (pow x-scale 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 3)))) (* 1/16 (/ (* (pow b 8) (pow (- (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)))) 2)) (* (pow x-scale 4) (* (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)))) (* (pow x-scale 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4))))))))) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)))) (* (pow x-scale 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4))))))) (* 1/2 (* (* (pow y-scale 2) (* (sqrt 8) (- (* 1/2 (/ (* (pow b 4) (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) 2) (- (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2))))) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 4))) (* 1/4 (/ (pow (- (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)))) 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2))))) (* (pow x-scale 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* -1/4 (/ (* (pow b 4) (* (- (* 1/4 (/ (* (pow b 4) (* (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (- (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)))))) (* (pow x-scale 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 3)))) (* 1/16 (/ (* (pow b 8) (pow (- (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)))) 2)) (* (pow x-scale 4) (* (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)))) (* (pow x-scale 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4)))))))) (- (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)))))) (* (pow x-scale 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)))) (* (pow x-scale 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4)))))))))) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)))) (* (pow x-scale 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4)))))))))))) y-scale) |
(* (/ (sqrt 8) y-scale) (sqrt (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4)) (/ (* (pow b 4) (- (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (pow x-scale 2))))) |
(/ (+ (* 1/2 (* (/ (* (pow b 4) (* (sqrt 8) (- (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (* 1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4)) (/ (* (pow b 4) (- (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (pow x-scale 2))))))) (* (sqrt 8) (sqrt (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4)) (/ (* (pow b 4) (- (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (pow x-scale 2)))))) y-scale) |
(/ (+ (* 1/2 (* (/ (* (sqrt 8) (- (* -1/2 (/ (* (pow b 4) (- (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) 2) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 2))))) (* (pow x-scale 2) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) (* 1/4 (/ (* (pow b 8) (pow (- (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (* 1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) 2)) (* (pow x-scale 4) (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4)) (/ (* (pow b 4) (- (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (pow x-scale 2)))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4)) (/ (* (pow b 4) (- (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (pow x-scale 2))))))) (+ (* 1/2 (* (/ (* (pow b 4) (* (sqrt 8) (- (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (* 1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4)) (/ (* (pow b 4) (- (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (pow x-scale 2))))))) (* (sqrt 8) (sqrt (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4)) (/ (* (pow b 4) (- (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (pow x-scale 2))))))) y-scale) |
(/ (+ (* 1/2 (* (/ (* (sqrt 8) (- (* -1/2 (/ (* (pow b 4) (- (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) 2) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 2))))) (* (pow x-scale 2) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) (* 1/4 (/ (* (pow b 8) (pow (- (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (* 1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) 2)) (* (pow x-scale 4) (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4)) (/ (* (pow b 4) (- (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (pow x-scale 2)))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4)) (/ (* (pow b 4) (- (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (pow x-scale 2))))))) (+ (* 1/2 (* (/ (* (sqrt 8) (- (* 1/4 (/ (* (pow b 4) (* (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (- (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) 2) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 2)))))) (* (pow x-scale 2) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 3)))) (* 1/2 (/ (* (pow b 4) (* (- (* -1/2 (/ (* (pow b 4) (- (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) 2) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 2))))) (* (pow x-scale 2) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) (* 1/4 (/ (* (pow b 8) (pow (- (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (* 1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) 2)) (* (pow x-scale 4) (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4)) (/ (* (pow b 4) (- (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (pow x-scale 2))))))) (- (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (* 1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (* (pow x-scale 2) (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4)) (/ (* (pow b 4) (- (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (pow x-scale 2)))))))) (pow y-scale 6)) (sqrt (/ 1 (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4)) (/ (* (pow b 4) (- (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (pow x-scale 2))))))) (+ (* 1/2 (* (/ (* (pow b 4) (* (sqrt 8) (- (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (* 1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4)) (/ (* (pow b 4) (- (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (pow x-scale 2))))))) (* (sqrt 8) (sqrt (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4)) (/ (* (pow b 4) (- (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (pow x-scale 2)))))))) y-scale) |
(* -1 (* (/ (sqrt 8) y-scale) (sqrt (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4)) (/ (* (pow b 4) (- (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (pow x-scale 2)))))) |
(* -1 (/ (+ (* 1/2 (* (/ (* (pow b 4) (* (sqrt 8) (- (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (* 1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4)) (/ (* (pow b 4) (- (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (pow x-scale 2))))))) (* (sqrt 8) (sqrt (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4)) (/ (* (pow b 4) (- (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (pow x-scale 2)))))) y-scale)) |
(* -1 (/ (+ (* 1/2 (* (/ (* (sqrt 8) (- (* -1/2 (/ (* (pow b 4) (- (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) 2) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 2))))) (* (pow x-scale 2) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) (* 1/4 (/ (* (pow b 8) (pow (- (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (* 1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) 2)) (* (pow x-scale 4) (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4)) (/ (* (pow b 4) (- (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (pow x-scale 2)))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4)) (/ (* (pow b 4) (- (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (pow x-scale 2))))))) (+ (* 1/2 (* (/ (* (pow b 4) (* (sqrt 8) (- (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (* 1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4)) (/ (* (pow b 4) (- (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (pow x-scale 2))))))) (* (sqrt 8) (sqrt (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4)) (/ (* (pow b 4) (- (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (pow x-scale 2))))))) y-scale)) |
(* -1 (/ (+ (* 1/2 (* (/ (* (sqrt 8) (- (* -1/2 (/ (* (pow b 4) (- (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) 2) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 2))))) (* (pow x-scale 2) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) (* 1/4 (/ (* (pow b 8) (pow (- (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (* 1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) 2)) (* (pow x-scale 4) (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4)) (/ (* (pow b 4) (- (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (pow x-scale 2)))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4)) (/ (* (pow b 4) (- (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (pow x-scale 2))))))) (+ (* 1/2 (* (/ (* (sqrt 8) (- (* 1/4 (/ (* (pow b 4) (* (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (- (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) 2) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 2)))))) (* (pow x-scale 2) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 3)))) (* 1/2 (/ (* (pow b 4) (* (- (* -1/2 (/ (* (pow b 4) (- (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) 2) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 2))))) (* (pow x-scale 2) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) (* 1/4 (/ (* (pow b 8) (pow (- (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (* 1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) 2)) (* (pow x-scale 4) (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4)) (/ (* (pow b 4) (- (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (pow x-scale 2))))))) (- (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (* 1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (* (pow x-scale 2) (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4)) (/ (* (pow b 4) (- (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (pow x-scale 2)))))))) (pow y-scale 6)) (sqrt (/ 1 (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4)) (/ (* (pow b 4) (- (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (pow x-scale 2))))))) (+ (* 1/2 (* (/ (* (pow b 4) (* (sqrt 8) (- (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (* 1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4)) (/ (* (pow b 4) (- (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (pow x-scale 2))))))) (* (sqrt 8) (sqrt (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4)) (/ (* (pow b 4) (- (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (pow x-scale 2)))))))) y-scale)) |
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) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 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) |
(*.f64 a #s(literal 1/4 binary64)) |
(* 1/4 a) |
(*.f64 a #s(literal 1/4 binary64)) |
(* 1/4 a) |
(*.f64 a #s(literal 1/4 binary64)) |
(* 1/4 a) |
(*.f64 a #s(literal 1/4 binary64)) |
(* 1/4 a) |
(*.f64 a #s(literal 1/4 binary64)) |
(* 1/4 a) |
(*.f64 a #s(literal 1/4 binary64)) |
(* 1/4 a) |
(*.f64 a #s(literal 1/4 binary64)) |
(* 1/4 a) |
(*.f64 a #s(literal 1/4 binary64)) |
(* 1/4 a) |
(*.f64 a #s(literal 1/4 binary64)) |
(* 1/4 a) |
(*.f64 a #s(literal 1/4 binary64)) |
(* 1/4 a) |
(*.f64 a #s(literal 1/4 binary64)) |
(* 1/4 a) |
(*.f64 a #s(literal 1/4 binary64)) |
(* 4 x-scale) |
(*.f64 x-scale #s(literal 4 binary64)) |
(* 4 x-scale) |
(*.f64 x-scale #s(literal 4 binary64)) |
(* 4 x-scale) |
(*.f64 x-scale #s(literal 4 binary64)) |
(* 4 x-scale) |
(*.f64 x-scale #s(literal 4 binary64)) |
(* 4 x-scale) |
(*.f64 x-scale #s(literal 4 binary64)) |
(* 4 x-scale) |
(*.f64 x-scale #s(literal 4 binary64)) |
(* 4 x-scale) |
(*.f64 x-scale #s(literal 4 binary64)) |
(* 4 x-scale) |
(*.f64 x-scale #s(literal 4 binary64)) |
(* 4 x-scale) |
(*.f64 x-scale #s(literal 4 binary64)) |
(* 4 x-scale) |
(*.f64 x-scale #s(literal 4 binary64)) |
(* 4 x-scale) |
(*.f64 x-scale #s(literal 4 binary64)) |
(* 4 x-scale) |
(*.f64 x-scale #s(literal 4 binary64)) |
a |
a |
a |
a |
a |
a |
a |
a |
a |
a |
a |
a |
a |
a |
a |
a |
a |
a |
a |
a |
a |
a |
a |
a |
x-scale |
x-scale |
x-scale |
x-scale |
x-scale |
x-scale |
x-scale |
x-scale |
x-scale |
x-scale |
x-scale |
x-scale |
x-scale |
x-scale |
x-scale |
x-scale |
x-scale |
x-scale |
x-scale |
x-scale |
x-scale |
x-scale |
x-scale |
x-scale |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 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))) |
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a a))) (*.f64 b b)) |
(* 4 (* (pow a 3) (pow b 2))) |
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a a))) (*.f64 b b)) |
(* 4 (* (pow a 3) (pow b 2))) |
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a a))) (*.f64 b b)) |
(* 4 (* (pow a 3) (pow b 2))) |
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a a))) (*.f64 b b)) |
(* 4 (* (pow a 3) (pow b 2))) |
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a a))) (*.f64 b b)) |
(* 4 (* (pow a 3) (pow b 2))) |
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a a))) (*.f64 b b)) |
(* 4 (* (pow a 3) (pow b 2))) |
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a a))) (*.f64 b b)) |
(* 4 (* (pow a 3) (pow b 2))) |
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a a))) (*.f64 b b)) |
(* 4 (* (pow a 3) (pow b 2))) |
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a a))) (*.f64 b b)) |
(* 4 (* (pow a 3) (pow b 2))) |
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a a))) (*.f64 b b)) |
(* 4 (* (pow a 3) (pow b 2))) |
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a a))) (*.f64 b b)) |
(* 4 (* (pow a 3) (pow b 2))) |
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a a))) (*.f64 b b)) |
(* 4 (* (pow a 3) (pow b 2))) |
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a a))) (*.f64 b b)) |
(* 4 (* (pow a 3) (pow b 2))) |
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a a))) (*.f64 b b)) |
(* 4 (* (pow a 3) (pow b 2))) |
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a a))) (*.f64 b b)) |
(* 4 (* (pow a 3) (pow b 2))) |
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a a))) (*.f64 b b)) |
(* 4 (* (pow a 3) (pow b 2))) |
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a a))) (*.f64 b b)) |
(* 4 (* (pow a 3) (pow b 2))) |
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a a))) (*.f64 b b)) |
(* 4 (* (pow a 3) (pow b 2))) |
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a a))) (*.f64 b b)) |
(* 4 (* (pow a 3) (pow b 2))) |
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a a))) (*.f64 b b)) |
(* 4 (* (pow a 3) (pow b 2))) |
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a a))) (*.f64 b b)) |
(* 4 (* (pow a 3) (pow b 2))) |
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a a))) (*.f64 b b)) |
(* 4 (* (pow a 3) (pow b 2))) |
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a a))) (*.f64 b b)) |
(* 4 (* (pow a 3) (pow b 2))) |
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a a))) (*.f64 b b)) |
(- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) |
(-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) |
(- (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (* (pow angle 2) (+ (* -1 (* (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/16200 (/ (pow (PI) 2) (pow y-scale 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) |
(+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 angle angle) (-.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 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/16200 binary64) (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.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/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))))) (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))))) |
(- (+ (* 1/2 (/ 1 (pow x-scale 2))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (+ (* -1 (* (+ (* 1/1574640000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/1574640000 (/ (pow (PI) 4) (pow y-scale 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))) (+ (* -1/196830000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (pow (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/16200 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (* 1/4 (/ (pow (+ (* -1 (* (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/16200 (/ (pow (PI) 2) (pow y-scale 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 1/2 (/ (+ (* -1 (* (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/16200 (/ (pow (PI) 2) (pow y-scale 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2)))))))))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) |
(+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 (*.f64 angle angle) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 angle angle) (+.f64 (-.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/196830000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/262440000 binary64) (*.f64 (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale))))))) (*.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/1574640000 binary64) (+.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))))) (*.f64 (/.f64 (*.f64 (-.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 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/16200 binary64) (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale)))))) (-.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 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/16200 binary64) (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale))))))) (*.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))))) #s(literal -1/4 binary64)))) (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))))) (/.f64 (-.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 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/16200 binary64) (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.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/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))))))) (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))))) |
(- (+ (* 1/2 (/ 1 (pow x-scale 2))) (* (pow angle 2) (+ (* 1/2 (/ (+ (* -1 (* (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/16200 (/ (pow (PI) 2) (pow y-scale 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (+ (* -1 (* (+ (* -1/382637520000000 (/ (pow (PI) 6) (pow x-scale 2))) (* -1/382637520000000 (/ (pow (PI) 6) (pow y-scale 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))) (+ (* 1/31886460000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/19131876000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/2 (* (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/16200 (/ (pow (PI) 2) (pow y-scale 2)))) (+ (* 1/1574640000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/1574640000 (/ (pow (PI) 4) (pow y-scale 2))))))))) (* 1/2 (/ (* (+ (* -1 (* (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/16200 (/ (pow (PI) 2) (pow y-scale 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* -1 (* (+ (* 1/1574640000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/1574640000 (/ (pow (PI) 4) (pow y-scale 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))) (+ (* -1/196830000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (pow (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/16200 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (* 1/4 (/ (pow (+ (* -1 (* (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/16200 (/ (pow (PI) 2) (pow y-scale 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2))))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 1/2 (/ (- (+ (* -1 (* (+ (* 1/1574640000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/1574640000 (/ (pow (PI) 4) (pow y-scale 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))) (+ (* -1/196830000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (pow (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/16200 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (* 1/4 (/ (pow (+ (* -1 (* (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/16200 (/ (pow (PI) 2) (pow y-scale 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2)))))))))))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) |
(+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (*.f64 (*.f64 angle angle) (+.f64 (/.f64 (*.f64 #s(literal 1/2 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 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/16200 binary64) (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.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/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 angle angle) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 angle angle) (+.f64 (-.f64 (+.f64 (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal 1/11957422500000 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 #s(literal -1/16200 binary64) (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/1574640000 binary64) (+.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 y-scale y-scale))))))) (*.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/382637520000000 binary64) (+.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 y-scale y-scale)))))) (*.f64 (/.f64 (*.f64 (-.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 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/16200 binary64) (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale)))))) (+.f64 (-.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/196830000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/262440000 binary64) (*.f64 (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale))))))) (*.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/1574640000 binary64) (+.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))))) (*.f64 (/.f64 (*.f64 (-.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 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/16200 binary64) (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale)))))) (-.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 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/16200 binary64) (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale))))))) (*.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))))) #s(literal -1/4 binary64)))) (*.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))))) #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 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))))) (/.f64 (+.f64 (-.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/196830000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/262440000 binary64) (*.f64 (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale))))))) (*.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/1574640000 binary64) (+.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))))) (*.f64 (/.f64 (*.f64 (-.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 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/16200 binary64) (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale)))))) (-.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 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/16200 binary64) (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale))))))) (*.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))))) #s(literal -1/4 binary64))) (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))))))))) (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))))) |
(sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2))) |
(sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1/2 binary64) (+.f64 (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) |
(sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2))) |
(sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1/2 binary64) (+.f64 (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) |
(sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2))) |
(sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1/2 binary64) (+.f64 (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) |
(sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2))) |
(sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1/2 binary64) (+.f64 (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) |
(sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2))) |
(sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1/2 binary64) (+.f64 (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) |
(sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2))) |
(sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1/2 binary64) (+.f64 (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) |
(sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2))) |
(sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1/2 binary64) (+.f64 (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) |
(sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2))) |
(sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1/2 binary64) (+.f64 (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) |
(/ (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2)) |
(/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)) |
(/ (- (+ 1/2 (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2)) |
(/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64)))) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) |
(/ (- (+ 1/2 (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (- (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2)) |
(/.f64 (+.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) (+.f64 (pow.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))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) #s(literal 2 binary64))) #s(literal -1/4 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64)))) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64)))) (*.f64 x-scale x-scale)) |
(/ (- (+ 1/2 (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 2) (* (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) (- (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)))))) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 3))) (* 1/2 (/ (- (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2)) |
(/.f64 (+.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (*.f64 x-scale x-scale) (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (+.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (*.f64 x-scale x-scale) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (+.f64 (pow.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))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) #s(literal 2 binary64))) #s(literal -1/4 binary64))))) (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) #s(literal 3 binary64))) (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (pow.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))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) #s(literal 2 binary64))) #s(literal -1/4 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64)))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64)))) (*.f64 x-scale x-scale)) |
(+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) |
(+.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))) |
(+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) (* (pow x-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))))) |
(*.f64 #s(literal 1/2 binary64) (+.f64 (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (*.f64 (*.f64 x-scale x-scale) (+.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))))))) |
(+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) (* (pow x-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 1/2 (/ (- (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (* (pow x-scale 4) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))))) |
(+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (*.f64 (*.f64 x-scale x-scale) (+.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 (+.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.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))) #s(literal 2 binary64))))) (*.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))) (pow.f64 x-scale #s(literal 4 binary64))))))) |
(+ (* -1/4 (/ (* (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) (- (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))) (* (pow x-scale 6) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 3)))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) (* (pow x-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 1/2 (/ (- (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (* (pow x-scale 4) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))))))) |
(+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (*.f64 (*.f64 x-scale x-scale) (+.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 (+.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.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))) #s(literal 2 binary64))))) (*.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))) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (+.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.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))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.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))) #s(literal 3 binary64))))) |
(+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) |
(+.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))) |
(+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) (* (pow x-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))))) |
(*.f64 #s(literal 1/2 binary64) (+.f64 (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (*.f64 (*.f64 x-scale x-scale) (+.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))))))) |
(+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) (* (pow x-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 1/2 (/ (- (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (* (pow x-scale 4) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))))) |
(+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (*.f64 (*.f64 x-scale x-scale) (+.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 (+.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.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))) #s(literal 2 binary64))))) (*.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))) (pow.f64 x-scale #s(literal 4 binary64))))))) |
(+ (* -1/4 (/ (* (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) (- (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))) (* (pow x-scale 6) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 3)))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) (* (pow x-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 1/2 (/ (- (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) (* (pow x-scale 4) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))))))) |
(+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (*.f64 (*.f64 x-scale x-scale) (+.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 (+.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.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))) #s(literal 2 binary64))))) (*.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))) (pow.f64 x-scale #s(literal 4 binary64))))))) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (+.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.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))) #s(literal 2 binary64))))))) (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.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))) #s(literal 3 binary64))))) |
(/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow y-scale 2)) |
(/.f64 (+.f64 #s(literal 1/2 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/2 (+ (* 1/2 (cos (* 1/90 (* angle (PI))))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (pow y-scale 2)) |
(/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (+.f64 #s(literal 1/2 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/2 (+ (* 1/2 (cos (* 1/90 (* angle (PI))))) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow y-scale 2) (- (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))) (pow y-scale 2)) |
(/.f64 (+.f64 (+.f64 #s(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 y-scale y-scale) (+.f64 (pow.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.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 #s(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/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) #s(literal 2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) (+.f64 #s(literal 1/2 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/2 (+ (* 1/2 (cos (* 1/90 (* angle (PI))))) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow y-scale 2) (* (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (- (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)))))) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 3))) (* 1/2 (/ (- (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))))) (pow y-scale 2)) |
(/.f64 (+.f64 (+.f64 #s(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/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 1/90 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (+.f64 #s(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/4 binary64) (*.f64 (*.f64 (*.f64 y-scale y-scale) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (+.f64 (pow.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.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 #s(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/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 #s(literal 1/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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) #s(literal 3 binary64))) (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (pow.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.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 #s(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/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) #s(literal 2 binary64)))))) (+.f64 #s(literal 1/2 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/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) |
(/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)) |
(- (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 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) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) |
(+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) (*.f64 (*.f64 y-scale y-scale) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))))) |
(- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 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) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) (* 1/2 (/ (- (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) 2) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 2)))) (* (pow y-scale 4) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) |
(+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) (*.f64 (*.f64 y-scale y-scale) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (+.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))))) (*.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)) (pow.f64 y-scale #s(literal 4 binary64))))) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))))) |
(- (+ (* -1/4 (/ (* (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (- (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) 2) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 2))))) (* (pow y-scale 6) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 3)))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 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) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) (* 1/2 (/ (- (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) 2) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 2)))) (* (pow y-scale 4) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) |
(+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) (/.f64 (+.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)) #s(literal 3 binary64)))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) (*.f64 (*.f64 y-scale y-scale) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (+.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))))) (*.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)) (pow.f64 y-scale #s(literal 4 binary64))))) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)))))) |
(- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) |
(/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)) |
(- (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 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) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) |
(+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) (*.f64 (*.f64 y-scale y-scale) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))))) |
(- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 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) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) (* 1/2 (/ (- (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) 2) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 2)))) (* (pow y-scale 4) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) |
(+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) (*.f64 (*.f64 y-scale y-scale) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (+.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))))) (*.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)) (pow.f64 y-scale #s(literal 4 binary64))))) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale))))) |
(- (+ (* -1/4 (/ (* (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (- (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) 2) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 2))))) (* (pow y-scale 6) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 3)))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 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) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) (* 1/2 (/ (- (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) 2) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 2)))) (* (pow y-scale 4) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) |
(+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) (/.f64 (+.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))))) (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)) #s(literal 3 binary64)))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) (*.f64 (*.f64 y-scale y-scale) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (+.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))))) (*.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)) (pow.f64 y-scale #s(literal 4 binary64))))) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)))))) |
(* (pow b 4) (- (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 4) (pow y-scale 2)))) (+ (* 1/2 (/ 1 (* (pow x-scale 2) (pow y-scale 4)))) (+ (* 1/2 (/ 1 (* (pow x-scale 4) (pow y-scale 2)))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 2) (pow y-scale 4))))))) (* (/ 1 (* (pow x-scale 2) (pow y-scale 2))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2)))))) |
(*.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 y-scale y-scale) (pow.f64 x-scale #s(literal 4 binary64))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x-scale x-scale) (pow.f64 y-scale #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 y-scale y-scale)))))) (/.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1/2 binary64) (+.f64 (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) |
(* (pow b 4) (- (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 4) (pow y-scale 2)))) (+ (* 1/2 (/ 1 (* (pow x-scale 2) (pow y-scale 4)))) (+ (* 1/2 (/ 1 (* (pow x-scale 4) (pow y-scale 2)))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 2) (pow y-scale 4))))))) (* (/ 1 (* (pow x-scale 2) (pow y-scale 2))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2)))))) |
(*.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 y-scale y-scale) (pow.f64 x-scale #s(literal 4 binary64))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x-scale x-scale) (pow.f64 y-scale #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 y-scale y-scale)))))) (/.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1/2 binary64) (+.f64 (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) |
(* (pow b 4) (- (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 4) (pow y-scale 2)))) (+ (* 1/2 (/ 1 (* (pow x-scale 2) (pow y-scale 4)))) (+ (* 1/2 (/ 1 (* (pow x-scale 4) (pow y-scale 2)))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 2) (pow y-scale 4))))))) (* (/ 1 (* (pow x-scale 2) (pow y-scale 2))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2)))))) |
(*.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 y-scale y-scale) (pow.f64 x-scale #s(literal 4 binary64))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x-scale x-scale) (pow.f64 y-scale #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 y-scale y-scale)))))) (/.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1/2 binary64) (+.f64 (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) |
(* (pow b 4) (- (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 4) (pow y-scale 2)))) (+ (* 1/2 (/ 1 (* (pow x-scale 2) (pow y-scale 4)))) (+ (* 1/2 (/ 1 (* (pow x-scale 4) (pow y-scale 2)))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 2) (pow y-scale 4))))))) (* (/ 1 (* (pow x-scale 2) (pow y-scale 2))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2)))))) |
(*.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 y-scale y-scale) (pow.f64 x-scale #s(literal 4 binary64))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x-scale x-scale) (pow.f64 y-scale #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 y-scale y-scale)))))) (/.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1/2 binary64) (+.f64 (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) |
(* (pow b 4) (- (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 4) (pow y-scale 2)))) (+ (* 1/2 (/ 1 (* (pow x-scale 2) (pow y-scale 4)))) (+ (* 1/2 (/ 1 (* (pow x-scale 4) (pow y-scale 2)))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 2) (pow y-scale 4))))))) (* (/ 1 (* (pow x-scale 2) (pow y-scale 2))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2)))))) |
(*.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 y-scale y-scale) (pow.f64 x-scale #s(literal 4 binary64))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x-scale x-scale) (pow.f64 y-scale #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 y-scale y-scale)))))) (/.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1/2 binary64) (+.f64 (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) |
(* (pow b 4) (- (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 4) (pow y-scale 2)))) (+ (* 1/2 (/ 1 (* (pow x-scale 2) (pow y-scale 4)))) (+ (* 1/2 (/ 1 (* (pow x-scale 4) (pow y-scale 2)))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 2) (pow y-scale 4))))))) (* (/ 1 (* (pow x-scale 2) (pow y-scale 2))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2)))))) |
(*.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 y-scale y-scale) (pow.f64 x-scale #s(literal 4 binary64))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x-scale x-scale) (pow.f64 y-scale #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 y-scale y-scale)))))) (/.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1/2 binary64) (+.f64 (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) |
(* (pow b 4) (- (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 4) (pow y-scale 2)))) (+ (* 1/2 (/ 1 (* (pow x-scale 2) (pow y-scale 4)))) (+ (* 1/2 (/ 1 (* (pow x-scale 4) (pow y-scale 2)))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 2) (pow y-scale 4))))))) (* (/ 1 (* (pow x-scale 2) (pow y-scale 2))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2)))))) |
(*.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 y-scale y-scale) (pow.f64 x-scale #s(literal 4 binary64))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x-scale x-scale) (pow.f64 y-scale #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 y-scale y-scale)))))) (/.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1/2 binary64) (+.f64 (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) |
(* (pow b 4) (- (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 4) (pow y-scale 2)))) (+ (* 1/2 (/ 1 (* (pow x-scale 2) (pow y-scale 4)))) (+ (* 1/2 (/ 1 (* (pow x-scale 4) (pow y-scale 2)))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 2) (pow y-scale 4))))))) (* (/ 1 (* (pow x-scale 2) (pow y-scale 2))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2)))))) |
(*.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 y-scale y-scale) (pow.f64 x-scale #s(literal 4 binary64))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x-scale x-scale) (pow.f64 y-scale #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 y-scale y-scale)))))) (/.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1/2 binary64) (+.f64 (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) |
(* (pow b 4) (- (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 4) (pow y-scale 2)))) (+ (* 1/2 (/ 1 (* (pow x-scale 2) (pow y-scale 4)))) (+ (* 1/2 (/ 1 (* (pow x-scale 4) (pow y-scale 2)))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 2) (pow y-scale 4))))))) (* (/ 1 (* (pow x-scale 2) (pow y-scale 2))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2)))))) |
(*.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 y-scale y-scale) (pow.f64 x-scale #s(literal 4 binary64))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x-scale x-scale) (pow.f64 y-scale #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 y-scale y-scale)))))) (/.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1/2 binary64) (+.f64 (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) |
(* (pow b 4) (- (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 4) (pow y-scale 2)))) (+ (* 1/2 (/ 1 (* (pow x-scale 2) (pow y-scale 4)))) (+ (* 1/2 (/ 1 (* (pow x-scale 4) (pow y-scale 2)))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 2) (pow y-scale 4))))))) (* (/ 1 (* (pow x-scale 2) (pow y-scale 2))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2)))))) |
(*.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 y-scale y-scale) (pow.f64 x-scale #s(literal 4 binary64))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x-scale x-scale) (pow.f64 y-scale #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 y-scale y-scale)))))) (/.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1/2 binary64) (+.f64 (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) |
(* (pow b 4) (- (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 4) (pow y-scale 2)))) (+ (* 1/2 (/ 1 (* (pow x-scale 2) (pow y-scale 4)))) (+ (* 1/2 (/ 1 (* (pow x-scale 4) (pow y-scale 2)))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 2) (pow y-scale 4))))))) (* (/ 1 (* (pow x-scale 2) (pow y-scale 2))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2)))))) |
(*.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 y-scale y-scale) (pow.f64 x-scale #s(literal 4 binary64))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x-scale x-scale) (pow.f64 y-scale #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 y-scale y-scale)))))) (/.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1/2 binary64) (+.f64 (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) |
(* (pow b 4) (- (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 4) (pow y-scale 2)))) (+ (* 1/2 (/ 1 (* (pow x-scale 2) (pow y-scale 4)))) (+ (* 1/2 (/ 1 (* (pow x-scale 4) (pow y-scale 2)))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 2) (pow y-scale 4))))))) (* (/ 1 (* (pow x-scale 2) (pow y-scale 2))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2)))))) |
(*.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 y-scale y-scale) (pow.f64 x-scale #s(literal 4 binary64))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x-scale x-scale) (pow.f64 y-scale #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 y-scale y-scale)))))) (/.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1/2 binary64) (+.f64 (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) |
(/ (* (pow b 4) (- (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 3/2 (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow x-scale 2))))) (* (pow x-scale 2) (pow y-scale 2))) |
(*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.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 3/2 binary64) (*.f64 y-scale y-scale)) (/.f64 #s(literal -1/2 binary64) (*.f64 x-scale x-scale)))) (*.f64 y-scale y-scale))) |
(+ (* (pow angle 2) (+ (* 1/32400 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 4) (pow y-scale 2)))) (/ (* (pow b 4) (- (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (+ (* -1 (* (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/16200 (/ (pow (PI) 2) (pow y-scale 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))))) (* (pow x-scale 2) (pow y-scale 2))))) (/ (* (pow b 4) (- (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 3/2 (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow x-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))) |
(+.f64 (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.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 3/2 binary64) (*.f64 y-scale y-scale)) (/.f64 #s(literal -1/2 binary64) (*.f64 x-scale x-scale)))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 angle angle) (+.f64 (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (pow.f64 b #s(literal 4 binary64)))) (*.f64 (*.f64 y-scale y-scale) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 (/.f64 (-.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 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/16200 binary64) (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.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/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) |
(+ (* (pow angle 2) (+ (* 1/32400 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 4) (pow y-scale 2)))) (+ (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow b 4) (pow (PI) 4)) (* (pow x-scale 4) (pow y-scale 2)))) (/ (* (pow b 4) (- (* 1/3149280000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1 (* (+ (* 1/1574640000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/1574640000 (/ (pow (PI) 4) (pow y-scale 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))) (+ (* -1/196830000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (pow (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/16200 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (* 1/4 (/ (pow (+ (* -1 (* (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/16200 (/ (pow (PI) 2) (pow y-scale 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))))) (* (pow x-scale 2) (pow y-scale 2))))) (/ (* (pow b 4) (- (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (+ (* -1 (* (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/16200 (/ (pow (PI) 2) (pow y-scale 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))))) (* (pow x-scale 2) (pow y-scale 2)))))) (/ (* (pow b 4) (- (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 3/2 (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow x-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))) |
(+.f64 (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.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 3/2 binary64) (*.f64 y-scale y-scale)) (/.f64 #s(literal -1/2 binary64) (*.f64 x-scale x-scale)))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 angle angle) (+.f64 (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (pow.f64 b #s(literal 4 binary64)))) (*.f64 (*.f64 y-scale y-scale) (pow.f64 x-scale #s(literal 4 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 (/.f64 (-.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 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/16200 binary64) (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.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/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 angle angle) (+.f64 (/.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64)))) (*.f64 (*.f64 y-scale y-scale) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 #s(literal 1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (*.f64 (/.f64 (+.f64 (-.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/196830000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/262440000 binary64) (*.f64 (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale))))))) (*.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/1574640000 binary64) (+.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))))) (*.f64 (/.f64 (*.f64 (-.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 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/16200 binary64) (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale)))))) (-.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 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/16200 binary64) (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale))))))) (*.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))))) #s(literal -1/4 binary64))) (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))))) |
(+ (* (pow angle 2) (+ (* 1/32400 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 4) (pow y-scale 2)))) (+ (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow b 4) (pow (PI) 4)) (* (pow x-scale 4) (pow y-scale 2)))) (+ (* (pow angle 2) (+ (* 1/765275040000000 (/ (* (pow b 4) (pow (PI) 6)) (* (pow x-scale 4) (pow y-scale 2)))) (/ (* (pow b 4) (- (* -1/765275040000000 (/ (pow (PI) 6) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1 (* (+ (* -1/382637520000000 (/ (pow (PI) 6) (pow x-scale 2))) (* -1/382637520000000 (/ (pow (PI) 6) (pow y-scale 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))) (+ (* 1/31886460000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/19131876000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/2 (* (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/16200 (/ (pow (PI) 2) (pow y-scale 2)))) (+ (* 1/1574640000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/1574640000 (/ (pow (PI) 4) (pow y-scale 2))))))))) (* 1/2 (/ (* (+ (* -1 (* (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/16200 (/ (pow (PI) 2) (pow y-scale 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* -1 (* (+ (* 1/1574640000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/1574640000 (/ (pow (PI) 4) (pow y-scale 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))) (+ (* -1/196830000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (pow (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/16200 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (* 1/4 (/ (pow (+ (* -1 (* (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/16200 (/ (pow (PI) 2) (pow y-scale 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2))))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))))) (* (pow x-scale 2) (pow y-scale 2))))) (/ (* (pow b 4) (- (* 1/3149280000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1 (* (+ (* 1/1574640000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/1574640000 (/ (pow (PI) 4) (pow y-scale 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))) (+ (* -1/196830000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (pow (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/16200 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (* 1/4 (/ (pow (+ (* -1 (* (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/16200 (/ (pow (PI) 2) (pow y-scale 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))))) (* (pow x-scale 2) (pow y-scale 2)))))) (/ (* (pow b 4) (- (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (+ (* -1 (* (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/16200 (/ (pow (PI) 2) (pow y-scale 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))))) (* (pow x-scale 2) (pow y-scale 2)))))) (/ (* (pow b 4) (- (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 3/2 (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow x-scale 2))))) (* (pow x-scale 2) (pow y-scale 2)))) |
(+.f64 (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.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 3/2 binary64) (*.f64 y-scale y-scale)) (/.f64 #s(literal -1/2 binary64) (*.f64 x-scale x-scale)))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 angle angle) (+.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (pow.f64 b #s(literal 4 binary64)))) (*.f64 (*.f64 y-scale y-scale) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 (/.f64 (-.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 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/16200 binary64) (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.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/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 angle angle) (+.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64)))) (*.f64 (*.f64 y-scale y-scale) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 #s(literal 1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (*.f64 (/.f64 (+.f64 (-.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/196830000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/262440000 binary64) (*.f64 (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale))))))) (*.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/1574640000 binary64) (+.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))))) (*.f64 (/.f64 (*.f64 (-.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 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/16200 binary64) (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale)))))) (-.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 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/16200 binary64) (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale))))))) (*.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))))) #s(literal -1/4 binary64))) (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 angle angle) (+.f64 (/.f64 (*.f64 #s(literal 1/765275040000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 b #s(literal 4 binary64)))) (*.f64 (*.f64 y-scale y-scale) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 #s(literal -1/765275040000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (-.f64 (+.f64 (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal 1/11957422500000 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 #s(literal -1/16200 binary64) (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/1574640000 binary64) (+.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 y-scale y-scale))))))) (*.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/382637520000000 binary64) (+.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 y-scale y-scale)))))) (*.f64 (/.f64 (*.f64 (-.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 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/16200 binary64) (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale)))))) (+.f64 (-.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/196830000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/262440000 binary64) (*.f64 (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale))))))) (*.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/1574640000 binary64) (+.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))))) (*.f64 (/.f64 (*.f64 (-.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 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/16200 binary64) (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale)))))) (-.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 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/16200 binary64) (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale))))))) (*.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))))) #s(literal -1/4 binary64)))) (*.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))))) #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 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))))) |
(+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))) (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (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 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 (*.f64 y-scale y-scale) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (-.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))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1/2 binary64) (+.f64 (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) |
(+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))) (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (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 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 (*.f64 y-scale y-scale) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (-.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))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1/2 binary64) (+.f64 (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) |
(+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))) (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (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 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 (*.f64 y-scale y-scale) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (-.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))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1/2 binary64) (+.f64 (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) |
(+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))) (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (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 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 (*.f64 y-scale y-scale) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (-.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))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1/2 binary64) (+.f64 (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) |
(+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))) (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (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 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 (*.f64 y-scale y-scale) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (-.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))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1/2 binary64) (+.f64 (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) |
(+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))) (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (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 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 (*.f64 y-scale y-scale) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (-.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))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1/2 binary64) (+.f64 (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) |
(+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))) (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (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 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 (*.f64 y-scale y-scale) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (-.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))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1/2 binary64) (+.f64 (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) |
(+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))) (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (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 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 (*.f64 y-scale y-scale) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (-.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))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1/2 binary64) (+.f64 (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) |
(/ (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 4) (- (* 1/2 (cos (* 1/90 (* angle (PI))))) 1/2)) (pow y-scale 2))) (pow x-scale 4)) |
(/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.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))))) #s(literal -1/2 binary64)) (*.f64 y-scale y-scale)))) (pow.f64 x-scale #s(literal 4 binary64))) |
(/ (+ (/ (* (pow b 4) (* (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 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow y-scale 2)) (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 4) (- (* 1/2 (cos (* 1/90 (* angle (PI))))) 1/2)) (pow y-scale 2)))) (pow x-scale 4)) |
(/.f64 (+.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.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))))) #s(literal -1/2 binary64)) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (*.f64 x-scale x-scale) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))))))))) (*.f64 y-scale y-scale))) (pow.f64 x-scale #s(literal 4 binary64))) |
(/ (+ (* (pow x-scale 2) (+ (* -1/2 (/ (* (pow b 4) (* (pow x-scale 2) (- (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)))))) (* (pow y-scale 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (pow y-scale 2)))) (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 4) (- (* 1/2 (cos (* 1/90 (* angle (PI))))) 1/2)) (pow y-scale 2)))) (pow x-scale 4)) |
(/.f64 (+.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.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))))) #s(literal -1/2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 x-scale x-scale) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (+.f64 (pow.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))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) #s(literal 2 binary64))) #s(literal -1/4 binary64))))) (*.f64 (*.f64 y-scale y-scale) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64)))))))) (*.f64 y-scale y-scale))))) (pow.f64 x-scale #s(literal 4 binary64))) |
(/ (+ (* (pow x-scale 2) (+ (* (pow x-scale 2) (+ (* -1/2 (/ (* (pow b 4) (- (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2))))) (* (pow y-scale 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* 1/4 (/ (* (pow b 4) (* (pow x-scale 2) (* (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) (- (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2))))))) (* (pow y-scale 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 3)))))) (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))) (pow y-scale 2)))) (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 4) (- (* 1/2 (cos (* 1/90 (* angle (PI))))) 1/2)) (pow y-scale 2)))) (pow x-scale 4)) |
(/.f64 (+.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.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))))) #s(literal -1/2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 x-scale x-scale) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64)))))))) (*.f64 y-scale y-scale)) (*.f64 (*.f64 x-scale x-scale) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 (pow.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))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) #s(literal 2 binary64))) #s(literal -1/4 binary64))) (pow.f64 b #s(literal 4 binary64)))) (*.f64 (*.f64 y-scale y-scale) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (*.f64 (*.f64 x-scale x-scale) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (+.f64 (pow.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))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) #s(literal 2 binary64))) #s(literal -1/4 binary64)))) (pow.f64 b #s(literal 4 binary64)))) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) #s(literal 3 binary64))))))))) (pow.f64 x-scale #s(literal 4 binary64))) |
(/ (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (pow x-scale 4)) |
(/.f64 (+.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (pow.f64 b #s(literal 4 binary64)))) (*.f64 (*.f64 y-scale y-scale) (+.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)))))) (pow.f64 x-scale #s(literal 4 binary64))) |
(/ (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (+ (* -1/2 (/ (* (pow b 4) (- (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (pow x-scale 4)) |
(/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (pow.f64 b #s(literal 4 binary64))) (*.f64 (*.f64 y-scale y-scale) (+.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 (*.f64 (+.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.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))) #s(literal 2 binary64))))) (pow.f64 b #s(literal 4 binary64))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (+.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 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 y-scale y-scale))) (pow.f64 x-scale #s(literal 4 binary64))) |
(/ (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (+ (* -1/2 (/ (* (pow b 4) (- (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (+ (* 1/4 (/ (* (pow b 4) (* (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) (- (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 3))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (pow x-scale 4)) |
(/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (pow.f64 b #s(literal 4 binary64))) (*.f64 (*.f64 y-scale y-scale) (+.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 (*.f64 (+.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.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))) #s(literal 2 binary64))))) (pow.f64 b #s(literal 4 binary64))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (+.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 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (pow.f64 b #s(literal 4 binary64))) (+.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.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))) #s(literal 2 binary64))))))) (*.f64 (*.f64 (*.f64 y-scale y-scale) (pow.f64 x-scale #s(literal 4 binary64))) (pow.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))) #s(literal 3 binary64)))))) (pow.f64 x-scale #s(literal 4 binary64))) |
(/ (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (+ (* -1/2 (/ (* (pow b 4) (- (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (+ (* 1/4 (/ (* (pow b 4) (* (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) (- (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 3))))) (+ (* 1/2 (/ (* (pow b 4) (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (- (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 4))) (* 1/4 (/ (pow (- (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))) (* (pow x-scale 6) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (pow x-scale 4)) |
(/.f64 (+.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (pow.f64 b #s(literal 4 binary64))) (*.f64 (*.f64 y-scale y-scale) (+.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 (*.f64 (+.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.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))) #s(literal 2 binary64))))) (pow.f64 b #s(literal 4 binary64))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (+.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 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (pow.f64 b #s(literal 4 binary64))) (+.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.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))) #s(literal 2 binary64))))))) (*.f64 (*.f64 (*.f64 y-scale y-scale) (pow.f64 x-scale #s(literal 4 binary64))) (pow.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))) #s(literal 3 binary64))))) (+.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (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 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (+.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.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))) #s(literal 2 binary64))))))) (pow.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))) #s(literal 4 binary64))) (/.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.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))) #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.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))) #s(literal 2 binary64)))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 y-scale y-scale)) (+.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))))))) (pow.f64 x-scale #s(literal 4 binary64))) |
(/ (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (pow x-scale 4)) |
(/.f64 (+.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (pow.f64 b #s(literal 4 binary64)))) (*.f64 (*.f64 y-scale y-scale) (+.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)))))) (pow.f64 x-scale #s(literal 4 binary64))) |
(/ (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (+ (* -1/2 (/ (* (pow b 4) (- (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))) (pow x-scale 4)) |
(/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (pow.f64 b #s(literal 4 binary64))) (*.f64 (*.f64 y-scale y-scale) (+.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 (*.f64 (+.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.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))) #s(literal 2 binary64))))) (pow.f64 b #s(literal 4 binary64))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (+.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 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 y-scale y-scale))) (pow.f64 x-scale #s(literal 4 binary64))) |
(/ (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (+ (* -1/2 (/ (* (pow b 4) (- (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (+ (* 1/4 (/ (* (pow b 4) (* (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) (- (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 3))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) (pow x-scale 4)) |
(/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (pow.f64 b #s(literal 4 binary64))) (*.f64 (*.f64 y-scale y-scale) (+.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 (*.f64 (+.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.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))) #s(literal 2 binary64))))) (pow.f64 b #s(literal 4 binary64))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (+.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 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (pow.f64 b #s(literal 4 binary64))) (+.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.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))) #s(literal 2 binary64))))))) (*.f64 (*.f64 (*.f64 y-scale y-scale) (pow.f64 x-scale #s(literal 4 binary64))) (pow.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))) #s(literal 3 binary64)))))) (pow.f64 x-scale #s(literal 4 binary64))) |
(/ (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (+ (* -1/2 (/ (* (pow b 4) (- (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (+ (* 1/4 (/ (* (pow b 4) (* (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) (- (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (* (pow x-scale 4) (* (pow y-scale 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 3))))) (+ (* 1/2 (/ (* (pow b 4) (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (- (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 4))) (* 1/4 (/ (pow (- (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))) (* (pow x-scale 6) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (pow x-scale 4)) |
(/.f64 (+.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (pow.f64 b #s(literal 4 binary64))) (*.f64 (*.f64 y-scale y-scale) (+.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 (*.f64 (+.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.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))) #s(literal 2 binary64))))) (pow.f64 b #s(literal 4 binary64))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (+.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 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (pow.f64 b #s(literal 4 binary64))) (+.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.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))) #s(literal 2 binary64))))))) (*.f64 (*.f64 (*.f64 y-scale y-scale) (pow.f64 x-scale #s(literal 4 binary64))) (pow.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))) #s(literal 3 binary64))))) (+.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (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 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (+.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.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))) #s(literal 2 binary64))))))) (pow.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))) #s(literal 4 binary64))) (/.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.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))) #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.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))) #s(literal 2 binary64)))))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 y-scale y-scale)) (+.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))))))) (pow.f64 x-scale #s(literal 4 binary64))) |
(/ (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)))) (* (pow x-scale 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4))) (pow y-scale 2)) |
(/.f64 (+.f64 (/.f64 (*.f64 #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 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) (pow.f64 b #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale x-scale) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (pow.f64 b #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64)))) (*.f64 y-scale y-scale)) |
(/ (+ (* -1/2 (/ (* (pow b 4) (* (pow y-scale 2) (- (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)))))) (* (pow x-scale 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)))) (* (pow x-scale 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4)))) (pow y-scale 2)) |
(/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.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 #s(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/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 #s(literal 1/2 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 x-scale) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) (pow.f64 b #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (pow.f64 b #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64)))) (*.f64 y-scale y-scale)) |
(/ (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)))) (* (pow x-scale 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (+ (* (pow y-scale 2) (+ (* -1/2 (/ (* (pow b 4) (- (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2))))) (* (pow x-scale 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* 1/4 (/ (* (pow b 4) (* (pow y-scale 2) (* (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (- (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2))))))) (* (pow x-scale 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 3)))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4)))) (pow y-scale 2)) |
(/.f64 (+.f64 (+.f64 (/.f64 (*.f64 #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 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) (pow.f64 b #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale x-scale) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (pow.f64 b #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64)))) (*.f64 (*.f64 y-scale y-scale) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 (pow.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.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 #s(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/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 #s(literal 1/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 b #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale x-scale) (+.f64 #s(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 (*.f64 (*.f64 (*.f64 y-scale y-scale) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (+.f64 (pow.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.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 #s(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/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 #s(literal 1/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 b #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale x-scale) (pow.f64 (+.f64 #s(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 y-scale y-scale)) |
(/ (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)))) (* (pow x-scale 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (+ (* (pow y-scale 2) (+ (* -1/2 (/ (* (pow b 4) (- (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2))))) (* (pow x-scale 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* (pow y-scale 2) (+ (* 1/4 (/ (* (pow b 4) (* (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (- (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)))))) (* (pow x-scale 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 3)))) (* 1/2 (/ (* (pow b 4) (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) 2) (- (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2))))) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 4))) (* 1/4 (/ (pow (- (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)))) 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)))))) (* (pow x-scale 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4)))) (pow y-scale 2)) |
(/.f64 (+.f64 (+.f64 (/.f64 (*.f64 #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 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) (pow.f64 b #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale x-scale) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (pow.f64 b #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64)))) (*.f64 (*.f64 y-scale y-scale) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 (pow.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.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 #s(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/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 #s(literal 1/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 b #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale x-scale) (+.f64 #s(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/4 binary64) (*.f64 (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) (pow.f64 b #s(literal 4 binary64))) (+.f64 (pow.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.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 #s(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/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 #s(literal 1/2 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 x-scale) (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) #s(literal 3 binary64)))) (/.f64 (*.f64 #s(literal 1/2 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 #s(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/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (+.f64 (pow.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.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 #s(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/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 #s(literal 1/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 #s(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 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.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 #s(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/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 #s(literal 1/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 #s(literal 1/2 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 x-scale) (+.f64 #s(literal 1/2 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 b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4)) (/ (* (pow b 4) (- (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (pow x-scale 2))) (pow y-scale 2)) |
(/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (+.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)) (/.f64 #s(literal -1/2 binary64) (*.f64 x-scale x-scale))) (*.f64 x-scale x-scale)))) (*.f64 y-scale y-scale)) |
(/ (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4)) (+ (/ (* (pow b 4) (- (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (pow x-scale 2)) (/ (* (pow b 4) (- (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (* 1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))) (* (pow x-scale 2) (pow y-scale 2))))) (pow y-scale 2)) |
(/.f64 (+.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (+.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)) (/.f64 #s(literal -1/2 binary64) (*.f64 x-scale x-scale))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 y-scale y-scale)) |
(/ (+ (* -1/2 (/ (* (pow b 4) (- (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) 2) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 2))))) (* (pow x-scale 2) (* (pow y-scale 4) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))) (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4)) (+ (/ (* (pow b 4) (- (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (pow x-scale 2)) (/ (* (pow b 4) (- (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (* 1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow y-scale 2)) |
(/.f64 (+.f64 (+.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (+.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)) (/.f64 #s(literal -1/2 binary64) (*.f64 x-scale x-scale))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))))) (pow.f64 b #s(literal 4 binary64)))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale))))) (*.f64 y-scale y-scale)) |
(/ (+ (* -1/2 (/ (* (pow b 4) (- (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) 2) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 2))))) (* (pow x-scale 2) (* (pow y-scale 4) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))) (+ (* 1/4 (/ (* (pow b 4) (* (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (- (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) 2) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 6) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 3))))) (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4)) (+ (/ (* (pow b 4) (- (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (pow x-scale 2)) (/ (* (pow b 4) (- (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (* 1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow y-scale 2)) |
(/.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))))) (pow.f64 b #s(literal 4 binary64)))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)))) (+.f64 (+.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (+.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)) (/.f64 #s(literal -1/2 binary64) (*.f64 x-scale x-scale))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) (pow.f64 b #s(literal 4 binary64))) (+.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))))))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (pow.f64 y-scale #s(literal 6 binary64))) (pow.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)) #s(literal 3 binary64)))))) (*.f64 y-scale y-scale)) |
(/ (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4)) (/ (* (pow b 4) (- (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (pow x-scale 2))) (pow y-scale 2)) |
(/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (+.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)) (/.f64 #s(literal -1/2 binary64) (*.f64 x-scale x-scale))) (*.f64 x-scale x-scale)))) (*.f64 y-scale y-scale)) |
(/ (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4)) (+ (/ (* (pow b 4) (- (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (pow x-scale 2)) (/ (* (pow b 4) (- (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (* 1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))) (* (pow x-scale 2) (pow y-scale 2))))) (pow y-scale 2)) |
(/.f64 (+.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (+.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)) (/.f64 #s(literal -1/2 binary64) (*.f64 x-scale x-scale))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 y-scale y-scale)) |
(/ (+ (* -1/2 (/ (* (pow b 4) (- (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) 2) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 2))))) (* (pow x-scale 2) (* (pow y-scale 4) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))) (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4)) (+ (/ (* (pow b 4) (- (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (pow x-scale 2)) (/ (* (pow b 4) (- (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (* 1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))) (* (pow x-scale 2) (pow y-scale 2)))))) (pow y-scale 2)) |
(/.f64 (+.f64 (+.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (+.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)) (/.f64 #s(literal -1/2 binary64) (*.f64 x-scale x-scale))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))))) (pow.f64 b #s(literal 4 binary64)))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale))))) (*.f64 y-scale y-scale)) |
(/ (+ (* -1/2 (/ (* (pow b 4) (- (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) 2) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 2))))) (* (pow x-scale 2) (* (pow y-scale 4) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))) (+ (* 1/4 (/ (* (pow b 4) (* (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (- (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) 2) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 6) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 3))))) (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4)) (+ (/ (* (pow b 4) (- (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (pow x-scale 2)) (/ (* (pow b 4) (- (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (* 1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow y-scale 2)) |
(/.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))))) (pow.f64 b #s(literal 4 binary64)))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (pow.f64 y-scale #s(literal 4 binary64))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)))) (+.f64 (+.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (+.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)) (/.f64 #s(literal -1/2 binary64) (*.f64 x-scale x-scale))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) (pow.f64 b #s(literal 4 binary64))) (+.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))))))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (pow.f64 y-scale #s(literal 6 binary64))) (pow.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)) #s(literal 3 binary64)))))) (*.f64 y-scale y-scale)) |
(/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow y-scale 2)) |
(/.f64 (+.f64 #s(literal 1/2 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/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow y-scale 2)) |
(/.f64 (+.f64 #s(literal 1/2 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/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow y-scale 2)) |
(/.f64 (+.f64 #s(literal 1/2 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/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow y-scale 2)) |
(/.f64 (+.f64 #s(literal 1/2 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/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow y-scale 2)) |
(/.f64 (+.f64 #s(literal 1/2 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/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow y-scale 2)) |
(/.f64 (+.f64 #s(literal 1/2 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/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow y-scale 2)) |
(/.f64 (+.f64 #s(literal 1/2 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/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow y-scale 2)) |
(/.f64 (+.f64 #s(literal 1/2 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/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow y-scale 2)) |
(/.f64 (+.f64 #s(literal 1/2 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/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow y-scale 2)) |
(/.f64 (+.f64 #s(literal 1/2 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/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow y-scale 2)) |
(/.f64 (+.f64 #s(literal 1/2 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/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow y-scale 2)) |
(/.f64 (+.f64 #s(literal 1/2 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 (pow y-scale 2)) |
(/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) |
(+ (* -1/32400 (/ (* (pow angle 2) (pow (PI) 2)) (pow y-scale 2))) (/ 1 (pow y-scale 2))) |
(+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 angle angle) (*.f64 (PI.f64) (PI.f64)))) (*.f64 y-scale y-scale))) |
(+ (* (pow angle 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/3149280000 (/ (* (pow angle 2) (pow (PI) 4)) (pow y-scale 2))))) (/ 1 (pow y-scale 2))) |
(+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 (*.f64 angle angle) (+.f64 (/.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/3149280000 binary64) (*.f64 (*.f64 angle angle) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 y-scale y-scale))))) |
(+ (* (pow angle 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* (pow angle 2) (+ (* -1/765275040000000 (/ (* (pow angle 2) (pow (PI) 6)) (pow y-scale 2))) (* 1/3149280000 (/ (pow (PI) 4) (pow y-scale 2))))))) (/ 1 (pow y-scale 2))) |
(+.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 (*.f64 angle angle) (+.f64 (/.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 (*.f64 angle angle) (+.f64 (/.f64 (*.f64 #s(literal 1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/765275040000000 binary64) (/.f64 (*.f64 (*.f64 angle angle) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 y-scale y-scale)))))))) |
(+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) |
(+.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))) |
(+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) |
(+.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))) |
(+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) |
(+.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))) |
(+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) |
(+.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))) |
(+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) |
(+.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))) |
(+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) |
(+.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))) |
(+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) |
(+.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))) |
(+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) |
(+.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))) |
(/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow y-scale 2)) |
(/.f64 (+.f64 #s(literal 1/2 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/2 (+ (* 1/2 (cos (* 1/90 (* angle (PI))))) (* 1/2 (/ (* (pow y-scale 2) (cos (* 1/90 (* angle (PI))))) (pow x-scale 2))))) (pow y-scale 2)) |
(/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))))) (*.f64 y-scale y-scale)) |
(/ (+ 1/2 (+ (* 1/2 (cos (* 1/90 (* angle (PI))))) (* 1/2 (/ (* (pow y-scale 2) (cos (* 1/90 (* angle (PI))))) (pow x-scale 2))))) (pow y-scale 2)) |
(/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))))) (*.f64 y-scale y-scale)) |
(/ (+ 1/2 (+ (* 1/2 (cos (* 1/90 (* angle (PI))))) (* 1/2 (/ (* (pow y-scale 2) (cos (* 1/90 (* angle (PI))))) (pow x-scale 2))))) (pow y-scale 2)) |
(/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale))))) (*.f64 y-scale y-scale)) |
(* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) |
(/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) |
(+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))) |
(+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) |
(+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))) |
(+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) |
(+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))) |
(+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) |
(* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) |
(/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) |
(+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))) |
(+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) |
(+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))) |
(+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) |
(+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))) |
(+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) |
(+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2)))) |
(+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) |
(+ (* 1/2 (* (pow angle 2) (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/16200 (/ (pow (PI) 2) (pow y-scale 2)))))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) |
(+.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 angle angle)) (*.f64 #s(literal -1/16200 binary64) (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale)))))) |
(+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* (pow angle 2) (+ (* 1/2 (* (pow angle 2) (+ (* 1/1574640000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/1574640000 (/ (pow (PI) 4) (pow y-scale 2)))))) (* 1/2 (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/16200 (/ (pow (PI) 2) (pow y-scale 2))))))))) |
(+.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 (*.f64 angle angle) (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (*.f64 angle angle) (*.f64 #s(literal 1/1574640000 binary64) (+.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -1/16200 binary64) (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale)))))))) |
(+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* (pow angle 2) (+ (* 1/2 (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/16200 (/ (pow (PI) 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* 1/2 (* (pow angle 2) (+ (* -1/382637520000000 (/ (pow (PI) 6) (pow x-scale 2))) (* -1/382637520000000 (/ (pow (PI) 6) (pow y-scale 2)))))) (* 1/2 (+ (* 1/1574640000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/1574640000 (/ (pow (PI) 4) (pow y-scale 2))))))))))) |
(+.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 (*.f64 angle angle) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/16200 binary64) (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale))))) (*.f64 (*.f64 angle angle) (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (*.f64 angle angle) (*.f64 #s(literal -1/382637520000000 binary64) (+.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/1574640000 binary64) (+.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))))))))) |
(+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2)))) |
(+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) |
(+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2)))) |
(+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) |
(+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2)))) |
(+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) |
(+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2)))) |
(+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) |
(+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2)))) |
(+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) |
(+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2)))) |
(+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) |
(+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2)))) |
(+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) |
(+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2)))) |
(+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) |
(* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) |
(/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale x-scale)) |
(/ (+ (* 1/2 (cos (* 1/90 (* angle (PI))))) (* (pow x-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (pow x-scale 2)) |
(/.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 #s(literal 1/2 binary64) (*.f64 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 x-scale x-scale)) |
(/ (+ (* 1/2 (cos (* 1/90 (* angle (PI))))) (* (pow x-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (pow x-scale 2)) |
(/.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 #s(literal 1/2 binary64) (*.f64 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 x-scale x-scale)) |
(/ (+ (* 1/2 (cos (* 1/90 (* angle (PI))))) (* (pow x-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))) (pow x-scale 2)) |
(/.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 #s(literal 1/2 binary64) (*.f64 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 x-scale x-scale)) |
(+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) |
(+.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))) |
(+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) |
(+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) |
(+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) |
(+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) |
(+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) |
(+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) |
(+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) |
(+.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))) |
(+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) |
(+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) |
(+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) |
(+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) |
(+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) |
(+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))))) |
(pow b 2) |
(*.f64 b b) |
(pow b 2) |
(*.f64 b b) |
(pow b 2) |
(*.f64 b b) |
(pow b 2) |
(*.f64 b b) |
(pow b 2) |
(*.f64 b b) |
(pow b 2) |
(*.f64 b b) |
(pow b 2) |
(*.f64 b b) |
(pow b 2) |
(*.f64 b b) |
(pow b 2) |
(*.f64 b b) |
(pow b 2) |
(*.f64 b b) |
(pow b 2) |
(*.f64 b b) |
(pow b 2) |
(*.f64 b b) |
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow b 2)))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (+.f64 (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)))))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))))) |
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow b 2)))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (+.f64 (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)))))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))))) |
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow b 2)))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (+.f64 (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)))))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))))) |
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow b 2)))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (+.f64 (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)))))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))))) |
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow b 2)))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (+.f64 (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)))))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))))) |
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow b 2)))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (+.f64 (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)))))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))))) |
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow b 2)))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (+.f64 (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)))))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))))) |
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow b 2)))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (+.f64 (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)))))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))))) |
(* -1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow b 2)))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) |
(*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (+.f64 (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)))))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))))) |
(* -1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow b 2)))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) |
(*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (+.f64 (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)))))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))))) |
(* -1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow b 2)))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) |
(*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (+.f64 (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)))))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))))) |
(* -1/4 (* (* y-scale (sqrt 8)) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow b 2)))) (* 4 (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) |
(*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (+.f64 (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)))))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))))) (*.f64 x-scale x-scale)))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))))) (*.f64 x-scale x-scale)))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))))) (*.f64 x-scale x-scale)))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))))) (*.f64 x-scale x-scale)))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))))) (*.f64 x-scale x-scale)))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))))) (*.f64 x-scale x-scale)))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))))) (*.f64 x-scale x-scale)))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))))) (*.f64 x-scale x-scale)))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))))) (*.f64 x-scale x-scale)))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))))) (*.f64 x-scale x-scale)))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))))) (*.f64 x-scale x-scale)))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))))) (*.f64 x-scale x-scale)))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) |
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))))) |
(+ (* -1/4 (* (/ (* a (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))))) (* (pow b 2) x-scale)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(+.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))))) (*.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 a y-scale) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) #s(literal 0 binary64)))) (*.f64 x-scale (*.f64 b b)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* a (+ (* -1/4 (* (/ (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))))) (* (pow b 2) x-scale)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* 1/8 (* (* a (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow b 2) (pow x-scale 2))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow b 4) (* (pow x-scale 4) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) |
(+.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))))) (*.f64 a (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) #s(literal 0 binary64)))) (*.f64 x-scale (*.f64 b b)))) (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 a x-scale) (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 4 binary64)) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 b b) #s(literal -2 binary64)) (*.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 4 binary64)))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 4 binary64)) #s(literal 0 binary64)) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))))))))))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* a (+ (* -1/4 (* (/ (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))))) (* (pow b 2) x-scale)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* a (+ (* 1/8 (* (* a (* x-scale (* y-scale (* (sqrt 8) (- (* -1/2 (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* (pow b 2) (pow x-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow b 4) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (+ (* -2 (pow b 3)) (* 2 (pow b 3))) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow b 2) (pow x-scale 2))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow b 4) (* (pow x-scale 4) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (* (pow b 2) (* (pow x-scale 2) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))))) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow b 2) (pow x-scale 2))))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow b 3)) (* 2 (pow b 3))) 2)) (* (pow b 4) (* (pow x-scale 4) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))))) |
(+.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))))) (*.f64 a (+.f64 (*.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) #s(literal 0 binary64)))) (*.f64 x-scale (*.f64 b b)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)))))))) (*.f64 a (*.f64 #s(literal 1/8 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))))) (+.f64 (*.f64 (*.f64 a x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 4 binary64)) #s(literal 0 binary64)) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))))) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) #s(literal 0 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 4 binary64)) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 b b) #s(literal -2 binary64)) (*.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 4 binary64)))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 4 binary64)) #s(literal 0 binary64)) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)))))))))) (*.f64 (*.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)))))))))) (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 4 binary64)) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 b b) #s(literal -2 binary64)) (*.f64 (*.f64 b b) (*.f64 x-scale x-scale)))))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 4 binary64)))))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 4 binary64)) #s(literal 0 binary64)) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))))))))))))))))) |
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)))))) |
(* a (+ (* -1/4 (* (/ (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b))))) (* a x-scale)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) |
(*.f64 a (+.f64 (*.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) #s(literal 0 binary64)))) (*.f64 a x-scale))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))))) (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)))))))) |
(* a (+ (* -1/4 (* (/ (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b))))) (* a x-scale)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (pow x-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) (pow a 2)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) |
(*.f64 a (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) #s(literal 0 binary64)))) (*.f64 a x-scale))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 4 binary64)) (*.f64 x-scale x-scale))))) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 b b) #s(literal -2 binary64)) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 4 binary64)))))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 4 binary64)) #s(literal 0 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))))))) (*.f64 a a))))) (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)))))))) |
(* a (+ (* -1/4 (* (/ (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b))))) (* a x-scale)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/2 (- (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (pow x-scale 2))) (* 4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (+ (* -2 b) (* 2 b)))) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* -1 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -2 b) (* 2 b)) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (pow x-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* (pow x-scale 2) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow a 3)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (pow x-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) (pow a 2)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) |
(*.f64 a (+.f64 (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) #s(literal 0 binary64)))) (*.f64 a x-scale))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 4 binary64)) (*.f64 x-scale x-scale))))) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 b b) #s(literal -2 binary64)) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 4 binary64)))))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 4 binary64)) #s(literal 0 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))))))) (*.f64 a a))))) (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #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 #s(literal -1/2 binary64) (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 4 binary64)) #s(literal 0 binary64))) (*.f64 (*.f64 x-scale x-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))))) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) #s(literal 0 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 4 binary64)) (*.f64 x-scale x-scale))))) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 b b) #s(literal -2 binary64)) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 4 binary64)))))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 4 binary64)) #s(literal 0 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 x-scale x-scale) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))))) (*.f64 a (*.f64 a a)))))) |
(* -1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) |
(*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 a x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)))))) |
(* -1 (* a (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* 1/4 (* (/ (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b))))) (* a x-scale)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 (*.f64 (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)))))) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) #s(literal 0 binary64)))) (*.f64 a x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))))))) (-.f64 #s(literal 0 binary64) a)) |
(* -1 (* a (+ (* -1 (/ (+ (* -1/4 (* (/ (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b))))) x-scale) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (pow x-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) a) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) a)) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) |
(*.f64 (-.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) #s(literal 0 binary64)))) x-scale)) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 4 binary64)) (*.f64 x-scale x-scale))))) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 b b) #s(literal -2 binary64)) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 4 binary64)))))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 4 binary64)) #s(literal 0 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))))))) a)))) a)) (-.f64 #s(literal 0 binary64) a)) |
(* -1 (* a (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/2 (- (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (pow x-scale 2))) (* 4 (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (+ (* -2 b) (* 2 b)))) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* -1 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -2 b) (* 2 b)) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (pow x-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* (pow x-scale 2) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) a) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (pow x-scale 2)))) (/ (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (pow (cos (* 1/180 (* angle (PI)))) 4)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 b) (* 2 b)) 2)) (* (pow x-scale 4) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) a)) (* -1/4 (* (/ (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 b) (* 2 b))))) x-scale) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) a)) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) |
(*.f64 (-.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)))))) (/.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) #s(literal 0 binary64)))) x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))))) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #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 #s(literal -1/2 binary64) (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 4 binary64)) #s(literal 0 binary64))) (*.f64 (*.f64 x-scale x-scale) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))))) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) #s(literal 0 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 4 binary64)) (*.f64 x-scale x-scale))))) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 b b) #s(literal -2 binary64)) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 4 binary64)))))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 4 binary64)) #s(literal 0 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 x-scale x-scale) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))))))) a)) (*.f64 #s(literal 1/8 binary64) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 4 binary64)) (*.f64 x-scale x-scale))))) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 b b) #s(literal -2 binary64)) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 4 binary64)))))) (-.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 4 binary64)) #s(literal 0 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)))))))))))) a)) a)) (-.f64 #s(literal 0 binary64) a)) |
(* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) |
(+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/2 (- (+ (* -2 (/ (+ (* 1/32400 (/ (* (pow a 4) (pow (PI) 2)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2))) (pow a 2))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow a 2) (pow x-scale 2))))) (* -2 (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow a 2) (pow x-scale 2)))))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))))))))) (* b (sqrt 2)))) (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8)))))) |
(+.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (*.f64 angle angle) (*.f64 x-scale x-scale)) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 a a)) (*.f64 #s(literal 1/32400 binary64) (*.f64 b b))))) (*.f64 x-scale x-scale)))) (*.f64 a a)) (+.f64 (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 a x-scale) (*.f64 a x-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 a a)) (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)))) (*.f64 (*.f64 a x-scale) (*.f64 a 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 (PI.f64) (PI.f64)) (*.f64 a a)) (*.f64 x-scale x-scale)))))))) (*.f64 b (sqrt.f64 #s(literal 2 binary64))))) |
(+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (* -1/3149280000 (/ (* (pow a 4) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))))) (pow x-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow x-scale 2)))) (pow a 2))) (* 4 (/ (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))) (pow a 2)))) (+ (* -2 (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow a 2) (pow x-scale 2)))) (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (- (+ (* -2 (/ (+ (* 1/32400 (/ (* (pow a 4) (pow (PI) 2)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2))) (pow a 2))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow a 2) (pow x-scale 2))))) (* -2 (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow a 2) (pow x-scale 2)))))) (pow a 2))))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/2 (- (+ (* -2 (/ (+ (* 1/32400 (/ (* (pow a 4) (pow (PI) 2)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2))) (pow a 2))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow a 2) (pow x-scale 2))))) (* -2 (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow a 2) (pow x-scale 2)))))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/2 (- (+ (* -2 (/ (+ (* 1/32400 (/ (* (pow a 4) (pow (PI) 2)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2))) (pow a 2))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow a 2) (pow x-scale 2))))) (* -2 (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow a 2) (pow x-scale 2)))))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))))))) (* b (sqrt 2))))))) |
(+.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (*.f64 angle angle) (*.f64 #s(literal 1/8 binary64) (+.f64 (/.f64 (*.f64 (*.f64 (*.f64 angle angle) (*.f64 x-scale x-scale)) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (+.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (+.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 a #s(literal 4 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 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 a a)) (*.f64 (*.f64 (PI.f64) (PI.f64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 a a)) (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)))))) (*.f64 x-scale x-scale)))) (*.f64 a a)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)) #s(literal -1/787320000 binary64))) (*.f64 a a))) (*.f64 #s(literal 2 binary64) (/.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 (*.f64 a x-scale) (*.f64 a x-scale))))) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 a a)) (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)))) (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 a a)) (*.f64 #s(literal 1/32400 binary64) (*.f64 b b))))) (*.f64 x-scale x-scale)))) (*.f64 a a)) (+.f64 (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 a x-scale) (*.f64 a x-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 a a)) (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)))) (*.f64 (*.f64 a x-scale) (*.f64 a x-scale)))))))) (*.f64 a a)))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (pow.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 a a)) (*.f64 #s(literal 1/32400 binary64) (*.f64 b b))))) (*.f64 x-scale x-scale)))) (*.f64 a a)) (+.f64 (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 a x-scale) (*.f64 a x-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 a a)) (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)))) (*.f64 (*.f64 a x-scale) (*.f64 a 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 (PI.f64) (PI.f64)) (*.f64 a a)) (*.f64 x-scale x-scale))))) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 b b))))))) (*.f64 b (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 a a)) (*.f64 #s(literal 1/32400 binary64) (*.f64 b b))))) (*.f64 x-scale x-scale)))) (*.f64 a a)) (+.f64 (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 a x-scale) (*.f64 a x-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 a a)) (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)))) (*.f64 (*.f64 a x-scale) (*.f64 a 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 (PI.f64) (PI.f64)) (*.f64 a a)) (*.f64 x-scale x-scale))))))) (*.f64 b (sqrt.f64 #s(literal 2 binary64)))))))) |
(+ (* 1/4 (* b (* y-scale (* (sqrt 2) (sqrt 8))))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (+ (* -1/2 (- (+ (* -2 (/ (+ (* 1/32400 (/ (* (pow a 4) (pow (PI) 2)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2))) (pow a 2))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow a 2) (pow x-scale 2))))) (* -2 (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow a 2) (pow x-scale 2)))))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))))))) (* b (sqrt 2)))) (* (pow angle 2) (+ (* 1/8 (/ (* (pow angle 2) (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (* -1/3149280000 (/ (* (pow a 2) (* (pow (PI) 4) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))))) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (pow x-scale 2))) (+ (/ (* (pow a 4) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))) (pow x-scale 2))))) (pow a 2))) (* 4 (/ (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- b a) 2)))) (pow x-scale 2))) (/ (* (pow (+ a b) 2) (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- b a) 2))) (pow x-scale 2)))) (pow a 2)))) (+ (* -2 (/ (* (pow b 2) (+ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))) (* (pow a 2) (pow x-scale 2)))) (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (- (+ (* -2 (/ (+ (* -1/3149280000 (/ (* (pow a 4) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))))) (pow x-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow x-scale 2)))) (pow a 2))) (* 4 (/ (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))) (pow a 2)))) (+ (* -2 (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow a 2) (pow x-scale 2)))) (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (- (+ (* -2 (/ (+ (* 1/32400 (/ (* (pow a 4) (pow (PI) 2)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2))) (pow a 2))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow a 2) (pow x-scale 2))))) (* -2 (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow a 2) (pow x-scale 2)))))) (pow a 2))))) (pow a 2)) (/ (* (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (- (+ (* -2 (/ (+ (* 1/32400 (/ (* (pow a 4) (pow (PI) 2)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2))) (pow a 2))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow a 2) (pow x-scale 2))))) (* -2 (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow a 2) (pow x-scale 2)))))) (pow a 2)))))) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2)))) (* 1/2 (/ (* (pow x-scale 2) (* (+ (* -1/2 (- (+ (* -2 (/ (+ (* 1/32400 (/ (* (pow a 4) (pow (PI) 2)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2))) (pow a 2))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow a 2) (pow x-scale 2))))) (* -2 (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow a 2) (pow x-scale 2)))))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))))) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (* -1/3149280000 (/ (* (pow a 4) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))))) (pow x-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow x-scale 2)))) (pow a 2))) (* 4 (/ (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))) (pow a 2)))) (+ (* -2 (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow a 2) (pow x-scale 2)))) (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (- (+ (* -2 (/ (+ (* 1/32400 (/ (* (pow a 4) (pow (PI) 2)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2))) (pow a 2))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow a 2) (pow x-scale 2))))) (* -2 (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow a 2) (pow x-scale 2)))))) (pow a 2))))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/2 (- (+ (* -2 (/ (+ (* 1/32400 (/ (* (pow a 4) (pow (PI) 2)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2))) (pow a 2))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow a 2) (pow x-scale 2))))) (* -2 (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow a 2) (pow x-scale 2)))))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))))) 2)) (* (pow b 2) (pow (sqrt 2) 2))))))) (* (pow b 2) (pow (sqrt 2) 2))))))))) (* b (sqrt 2)))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (* -1/3149280000 (/ (* (pow a 4) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (* (pow (PI) 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))))) (pow x-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (pow x-scale 2)))) (pow a 2))) (* 4 (/ (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))) (pow a 2)))) (+ (* -2 (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow a 2) (pow x-scale 2)))) (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (- (+ (* -2 (/ (+ (* 1/32400 (/ (* (pow a 4) (pow (PI) 2)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2))) (pow a 2))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow a 2) (pow x-scale 2))))) (* -2 (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow a 2) (pow x-scale 2)))))) (pow a 2))))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))) (* 1/4 (/ (* (pow x-scale 2) (pow (+ (* -1/2 (- (+ (* -2 (/ (+ (* 1/32400 (/ (* (pow a 4) (pow (PI) 2)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2))) (pow a 2))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow a 2) (pow x-scale 2))))) (* -2 (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow a 2) (pow x-scale 2)))))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))))) 2)) (* (pow b 2) (pow (sqrt 2) 2)))))))) (* b (sqrt 2))))))))) |
(+.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (*.f64 angle angle) (+.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 a a)) (*.f64 #s(literal 1/32400 binary64) (*.f64 b b))))) (*.f64 x-scale x-scale)))) (*.f64 a a)) (+.f64 (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 a x-scale) (*.f64 a x-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 a a)) (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)))) (*.f64 (*.f64 a x-scale) (*.f64 a 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 (PI.f64) (PI.f64)) (*.f64 a a)) (*.f64 x-scale x-scale)))))))) (*.f64 b (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 angle angle) (*.f64 #s(literal 1/8 binary64) (+.f64 (/.f64 (*.f64 (*.f64 (*.f64 angle angle) (*.f64 x-scale x-scale)) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 a a)) (*.f64 (*.f64 (PI.f64) (PI.f64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 a a)) (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)))))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 a a)) (+.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 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))))) (*.f64 x-scale x-scale)))))) (*.f64 a a)) (/.f64 (*.f64 #s(literal 4 binary64) (+.f64 (/.f64 (*.f64 #s(literal 1/102036672000000 binary64) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))))) (*.f64 a a))) (+.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) (/.f64 (+.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))) (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)))) (*.f64 (*.f64 a x-scale) (*.f64 a x-scale))))) (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 a a)) (*.f64 #s(literal 1/32400 binary64) (*.f64 b b))))) (*.f64 x-scale x-scale)))) (*.f64 a a)) (+.f64 (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 a x-scale) (*.f64 a x-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 a a)) (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)))) (*.f64 (*.f64 a x-scale) (*.f64 a 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 a a))) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 a a)) (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)))) (-.f64 (+.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (+.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 a #s(literal 4 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 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 a a)) (*.f64 (*.f64 (PI.f64) (PI.f64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 a a)) (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)))))) (*.f64 x-scale x-scale)))) (*.f64 a a)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)) #s(literal -1/787320000 binary64))) (*.f64 a a))) (*.f64 #s(literal 2 binary64) (/.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 (*.f64 a x-scale) (*.f64 a x-scale))))) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 a a)) (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)))) (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 a a)) (*.f64 #s(literal 1/32400 binary64) (*.f64 b b))))) (*.f64 x-scale x-scale)))) (*.f64 a a)) (+.f64 (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 a x-scale) (*.f64 a x-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 a a)) (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)))) (*.f64 (*.f64 a x-scale) (*.f64 a x-scale)))))))) (*.f64 a a)))) (*.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 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x-scale x-scale) (+.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 a a)) (*.f64 #s(literal 1/32400 binary64) (*.f64 b b))))) (*.f64 x-scale x-scale)))) (*.f64 a a)) (+.f64 (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 a x-scale) (*.f64 a x-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 a a)) (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)))) (*.f64 (*.f64 a x-scale) (*.f64 a 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 (PI.f64) (PI.f64)) (*.f64 a a)) (*.f64 x-scale x-scale)))))) (+.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (+.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (+.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 a #s(literal 4 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 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 a a)) (*.f64 (*.f64 (PI.f64) (PI.f64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 a a)) (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)))))) (*.f64 x-scale x-scale)))) (*.f64 a a)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)) #s(literal -1/787320000 binary64))) (*.f64 a a))) (*.f64 #s(literal 2 binary64) (/.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 (*.f64 a x-scale) (*.f64 a x-scale))))) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 a a)) (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)))) (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 a a)) (*.f64 #s(literal 1/32400 binary64) (*.f64 b b))))) (*.f64 x-scale x-scale)))) (*.f64 a a)) (+.f64 (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 a x-scale) (*.f64 a x-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 a a)) (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)))) (*.f64 (*.f64 a x-scale) (*.f64 a x-scale)))))))) (*.f64 a a)))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (pow.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 a a)) (*.f64 #s(literal 1/32400 binary64) (*.f64 b b))))) (*.f64 x-scale x-scale)))) (*.f64 a a)) (+.f64 (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 a x-scale) (*.f64 a x-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 a a)) (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)))) (*.f64 (*.f64 a x-scale) (*.f64 a 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 (PI.f64) (PI.f64)) (*.f64 a a)) (*.f64 x-scale x-scale))))) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 b b)))))) (*.f64 #s(literal 2 binary64) (*.f64 b b))))))) (*.f64 b (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (+.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (+.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 a #s(literal 4 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 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 a a)) (*.f64 (*.f64 (PI.f64) (PI.f64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 a a)) (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)))))) (*.f64 x-scale x-scale)))) (*.f64 a a)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)) #s(literal -1/787320000 binary64))) (*.f64 a a))) (*.f64 #s(literal 2 binary64) (/.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 (*.f64 a x-scale) (*.f64 a x-scale))))) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 a a)) (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)))) (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 a a)) (*.f64 #s(literal 1/32400 binary64) (*.f64 b b))))) (*.f64 x-scale x-scale)))) (*.f64 a a)) (+.f64 (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 a x-scale) (*.f64 a x-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 a a)) (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)))) (*.f64 (*.f64 a x-scale) (*.f64 a x-scale)))))))) (*.f64 a a)))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 a a)) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (pow.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 a a)) (*.f64 #s(literal 1/32400 binary64) (*.f64 b b))))) (*.f64 x-scale x-scale)))) (*.f64 a a)) (+.f64 (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 a b) (+.f64 a b))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 a x-scale) (*.f64 a x-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 b b) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 a a)) (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)))) (*.f64 (*.f64 a x-scale) (*.f64 a 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 (PI.f64) (PI.f64)) (*.f64 a a)) (*.f64 x-scale x-scale))))) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 b b))))))) (*.f64 b (sqrt.f64 #s(literal 2 binary64)))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))))) (*.f64 x-scale x-scale)))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))))) (*.f64 x-scale x-scale)))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))))) (*.f64 x-scale x-scale)))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))))) (*.f64 x-scale x-scale)))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))))) (*.f64 x-scale x-scale)))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))))) (*.f64 x-scale x-scale)))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))))) (*.f64 x-scale x-scale)))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (pow b 2) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))))) (*.f64 x-scale x-scale)))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) |
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 a #s(literal 4 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))))) |
(+ (* -1/4 (* (/ (* b (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))))) (* (pow a 2) x-scale)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) |
(+.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 a #s(literal 4 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))))) (*.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 b y-scale) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) #s(literal 0 binary64)))) (*.f64 x-scale (*.f64 a a)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 a #s(literal 4 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* b (+ (* -1/4 (* (/ (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))))) (* (pow a 2) x-scale)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* 1/8 (* (* b (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow a 2) (pow x-scale 2))))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))) (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow a 4) (* (pow x-scale 4) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))))) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) |
(+.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 a #s(literal 4 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))))) (*.f64 b (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 a #s(literal 4 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) #s(literal 0 binary64)))) (*.f64 x-scale (*.f64 a a)))) (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 x-scale b) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 4 binary64)) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 (*.f64 a x-scale) (*.f64 a x-scale)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 a #s(literal 4 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 4 binary64)) (pow.f64 a #s(literal 4 binary64)))))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 4 binary64)) #s(literal 0 binary64)) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 a #s(literal 4 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)))))))))))))))) |
(+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* b (+ (* -1/4 (* (/ (* y-scale (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))))) (* (pow a 2) x-scale)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* b (+ (* 1/8 (* (* b (* x-scale (* y-scale (* (sqrt 8) (- (* -1/2 (- (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* (pow a 2) (pow x-scale 2)))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow a 4) (* (pow x-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* -1 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ (* -2 (pow a 3)) (* 2 (pow a 3))) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow a 2) (pow x-scale 2))))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))) (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow a 4) (* (pow x-scale 4) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))) (* (pow a 2) (* (pow x-scale 2) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))))) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* 4 (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow a 2) (pow x-scale 2))))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))) (* (pow a 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (* (pow (sin (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 (pow a 3)) (* 2 (pow a 3))) 2)) (* (pow a 4) (* (pow x-scale 4) (+ (* -1/2 (/ (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))))) |
(+.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 a #s(literal 4 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))))) (*.f64 b (+.f64 (*.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) #s(literal 0 binary64)))) (*.f64 x-scale (*.f64 a a)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 a #s(literal 4 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)))))))) (*.f64 b (*.f64 #s(literal 1/8 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 a #s(literal 4 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))))) (+.f64 (*.f64 (*.f64 x-scale b) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 a x-scale) (*.f64 a x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 4 binary64)) #s(literal 0 binary64)) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))))) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) #s(literal 0 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 4 binary64)) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 (*.f64 a x-scale) (*.f64 a x-scale)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 a #s(literal 4 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 4 binary64)) (pow.f64 a #s(literal 4 binary64)))))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 4 binary64)) #s(literal 0 binary64)) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 a #s(literal 4 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)))))))))) (*.f64 (*.f64 (*.f64 a x-scale) (*.f64 a x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 a #s(literal 4 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)))))))))) (*.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 -2 binary64) (*.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 4 binary64)) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 (*.f64 a x-scale) (*.f64 a x-scale)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 a #s(literal 4 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 4 binary64)) (pow.f64 a #s(literal 4 binary64)))))) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 4 binary64)) #s(literal 0 binary64)) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 a #s(literal 4 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)))))))))))))))))) |
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale b) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -2 binary64) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)))))) |
(* b (+ (* -1/4 (* (/ (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a))))) (* b x-scale)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) |
(*.f64 b (+.f64 (*.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) #s(literal 0 binary64)))) (*.f64 x-scale b))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -2 binary64) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))))) (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -2 binary64) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)))))))) |
(* b (+ (* -1/4 (* (/ (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a))))) (* b x-scale)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (pow x-scale 2)))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (+ (* -1/2 (/ (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) (pow b 2)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) |
(*.f64 b (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -2 binary64) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) #s(literal 0 binary64)))) (*.f64 x-scale b))) (*.f64 #s(literal 1/8 binary64) (/.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 -2 binary64) (*.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 4 binary64)) (*.f64 x-scale x-scale))))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -2 binary64) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 4 binary64))))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 4 binary64)) #s(literal 0 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -2 binary64) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))))))) (*.f64 b b))))) (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -2 binary64) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)))))))) |
(* b (+ (* -1/4 (* (/ (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a))))) (* b x-scale)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/2 (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (pow x-scale 2))) (* 4 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (+ (* -2 a) (* 2 a)))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (+ (* -2 a) (* 2 a)) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (pow x-scale 2)))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (+ (* -1/2 (/ (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* (pow x-scale 2) (+ (* -1/2 (/ (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) (pow b 3)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (pow x-scale 2)))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (+ (* -1/2 (/ (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) (pow b 2)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) |
(*.f64 b (+.f64 (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -2 binary64) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) #s(literal 0 binary64)))) (*.f64 x-scale b))) (*.f64 #s(literal 1/8 binary64) (/.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 -2 binary64) (*.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 4 binary64)) (*.f64 x-scale x-scale))))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -2 binary64) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 4 binary64))))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 4 binary64)) #s(literal 0 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -2 binary64) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))))))) (*.f64 b b))))) (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -2 binary64) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #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 #s(literal -1/2 binary64) (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 4 binary64)) #s(literal 0 binary64))) (*.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))))) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) #s(literal 0 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 4 binary64)) (*.f64 x-scale x-scale))))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -2 binary64) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 4 binary64))))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 4 binary64)) #s(literal 0 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -2 binary64) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 x-scale x-scale) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -2 binary64) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -2 binary64) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))))) (*.f64 b (*.f64 b b)))))) |
(* -1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) |
(*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 x-scale b) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -2 binary64) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)))))) |
(* -1 (* b (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* 1/4 (* (/ (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a))))) (* b x-scale)) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) |
(-.f64 #s(literal 0 binary64) (*.f64 b (*.f64 #s(literal 1/4 binary64) (+.f64 (*.f64 (*.f64 (*.f64 x-scale y-scale) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -2 binary64) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)))))) (*.f64 (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) #s(literal 0 binary64)))) (*.f64 x-scale b)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -2 binary64) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))))))))) |
(* -1 (* b (+ (* -1 (/ (+ (* -1/4 (* (/ (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a))))) x-scale) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (pow x-scale 2)))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (+ (* -1/2 (/ (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) b) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) b)) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) |
(*.f64 (-.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -2 binary64) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -2 binary64) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) #s(literal 0 binary64)))) x-scale)) (*.f64 #s(literal -1/8 binary64) (/.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 -2 binary64) (*.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 4 binary64)) (*.f64 x-scale x-scale))))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -2 binary64) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 4 binary64))))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 4 binary64)) #s(literal 0 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -2 binary64) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))))))) b)))) b)) (neg.f64 b)) |
(* -1 (* b (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (* -1/2 (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (pow x-scale 2))) (* 4 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (+ (* -2 a) (* 2 a)))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))) (* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (+ (* -2 a) (* 2 a)) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (pow x-scale 2)))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (+ (* -1/2 (/ (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) (* (pow x-scale 2) (+ (* -1/2 (/ (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))) b) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1/2 (- (+ (* -2 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow x-scale 2))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (pow x-scale 2)))) (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (pow (sin (* 1/180 (* angle (PI)))) 4)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (+ (* -2 a) (* 2 a)) 2)) (* (pow x-scale 4) (+ (* -1/2 (/ (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) b)) (* -1/4 (* (/ (* y-scale (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (sqrt 8) (+ (* -2 a) (* 2 a))))) x-scale) (sqrt (/ 1 (+ (* -1/2 (/ (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))) b)) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (+ (* -1/2 (/ (+ (* -2 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))) |
(*.f64 (-.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -2 binary64) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)))))) (/.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) #s(literal 0 binary64)))) x-scale)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -2 binary64) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))))) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -2 binary64) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #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 #s(literal -1/2 binary64) (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 4 binary64)) #s(literal 0 binary64))) (*.f64 (*.f64 x-scale x-scale) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))))) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) #s(literal 0 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 4 binary64)) (*.f64 x-scale x-scale))))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -2 binary64) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 4 binary64))))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 4 binary64)) #s(literal 0 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -2 binary64) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 x-scale x-scale) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -2 binary64) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))))))) b)) (*.f64 #s(literal 1/8 binary64) (*.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 -2 binary64) (*.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 4 binary64)) (*.f64 x-scale x-scale))))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -2 binary64) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 4 binary64))))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 4 binary64)) #s(literal 0 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -2 binary64) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)))))))))))) b)) b)) (neg.f64 b)) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-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) |
(* 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) |
(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 |
#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 (PI.f64) #s(literal 1/90 binary64)))) |
(* angle (+ (* 1/90 (PI)) (* (pow angle 2) (+ (* -1/4374000 (pow (PI) 3)) (* 1/708588000000 (* (pow angle 2) (pow (PI) 5))))))) |
(*.f64 angle (+.f64 (*.f64 (PI.f64) #s(literal 1/90 binary64)) (*.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 (PI.f64) #s(literal 1/90 binary64)) (*.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)))) |
(* (* (pow b 2) (sqrt 8)) (sqrt (- (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 4) (pow y-scale 2)))) (+ (* 1/2 (/ 1 (* (pow x-scale 2) (pow y-scale 4)))) (+ (* 1/2 (/ 1 (* (pow x-scale 4) (pow y-scale 2)))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 2) (pow y-scale 4))))))) (* (/ 1 (* (pow x-scale 2) (pow y-scale 2))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2))))))) |
(*.f64 (*.f64 (*.f64 b b) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 y-scale y-scale) (pow.f64 x-scale #s(literal 4 binary64))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x-scale x-scale) (pow.f64 y-scale #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 y-scale y-scale)))))) (/.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1/2 binary64) (+.f64 (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) |
(* (* (pow b 2) (sqrt 8)) (sqrt (- (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 4) (pow y-scale 2)))) (+ (* 1/2 (/ 1 (* (pow x-scale 2) (pow y-scale 4)))) (+ (* 1/2 (/ 1 (* (pow x-scale 4) (pow y-scale 2)))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 2) (pow y-scale 4))))))) (* (/ 1 (* (pow x-scale 2) (pow y-scale 2))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2))))))) |
(*.f64 (*.f64 (*.f64 b b) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 y-scale y-scale) (pow.f64 x-scale #s(literal 4 binary64))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x-scale x-scale) (pow.f64 y-scale #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 y-scale y-scale)))))) (/.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1/2 binary64) (+.f64 (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) |
(* (* (pow b 2) (sqrt 8)) (sqrt (- (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 4) (pow y-scale 2)))) (+ (* 1/2 (/ 1 (* (pow x-scale 2) (pow y-scale 4)))) (+ (* 1/2 (/ 1 (* (pow x-scale 4) (pow y-scale 2)))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 2) (pow y-scale 4))))))) (* (/ 1 (* (pow x-scale 2) (pow y-scale 2))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2))))))) |
(*.f64 (*.f64 (*.f64 b b) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 y-scale y-scale) (pow.f64 x-scale #s(literal 4 binary64))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x-scale x-scale) (pow.f64 y-scale #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 y-scale y-scale)))))) (/.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1/2 binary64) (+.f64 (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) |
(* (* (pow b 2) (sqrt 8)) (sqrt (- (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 4) (pow y-scale 2)))) (+ (* 1/2 (/ 1 (* (pow x-scale 2) (pow y-scale 4)))) (+ (* 1/2 (/ 1 (* (pow x-scale 4) (pow y-scale 2)))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 2) (pow y-scale 4))))))) (* (/ 1 (* (pow x-scale 2) (pow y-scale 2))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2))))))) |
(*.f64 (*.f64 (*.f64 b b) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 y-scale y-scale) (pow.f64 x-scale #s(literal 4 binary64))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x-scale x-scale) (pow.f64 y-scale #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 y-scale y-scale)))))) (/.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1/2 binary64) (+.f64 (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) |
(* (* (pow b 2) (sqrt 8)) (sqrt (- (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 4) (pow y-scale 2)))) (+ (* 1/2 (/ 1 (* (pow x-scale 2) (pow y-scale 4)))) (+ (* 1/2 (/ 1 (* (pow x-scale 4) (pow y-scale 2)))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 2) (pow y-scale 4))))))) (* (/ 1 (* (pow x-scale 2) (pow y-scale 2))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2))))))) |
(*.f64 (*.f64 (*.f64 b b) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 y-scale y-scale) (pow.f64 x-scale #s(literal 4 binary64))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x-scale x-scale) (pow.f64 y-scale #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 y-scale y-scale)))))) (/.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1/2 binary64) (+.f64 (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) |
(* (* (pow b 2) (sqrt 8)) (sqrt (- (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 4) (pow y-scale 2)))) (+ (* 1/2 (/ 1 (* (pow x-scale 2) (pow y-scale 4)))) (+ (* 1/2 (/ 1 (* (pow x-scale 4) (pow y-scale 2)))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 2) (pow y-scale 4))))))) (* (/ 1 (* (pow x-scale 2) (pow y-scale 2))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2))))))) |
(*.f64 (*.f64 (*.f64 b b) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 y-scale y-scale) (pow.f64 x-scale #s(literal 4 binary64))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x-scale x-scale) (pow.f64 y-scale #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 y-scale y-scale)))))) (/.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1/2 binary64) (+.f64 (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) |
(* (* (pow b 2) (sqrt 8)) (sqrt (- (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 4) (pow y-scale 2)))) (+ (* 1/2 (/ 1 (* (pow x-scale 2) (pow y-scale 4)))) (+ (* 1/2 (/ 1 (* (pow x-scale 4) (pow y-scale 2)))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 2) (pow y-scale 4))))))) (* (/ 1 (* (pow x-scale 2) (pow y-scale 2))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2))))))) |
(*.f64 (*.f64 (*.f64 b b) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 y-scale y-scale) (pow.f64 x-scale #s(literal 4 binary64))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x-scale x-scale) (pow.f64 y-scale #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 y-scale y-scale)))))) (/.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1/2 binary64) (+.f64 (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) |
(* (* (pow b 2) (sqrt 8)) (sqrt (- (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 4) (pow y-scale 2)))) (+ (* 1/2 (/ 1 (* (pow x-scale 2) (pow y-scale 4)))) (+ (* 1/2 (/ 1 (* (pow x-scale 4) (pow y-scale 2)))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 2) (pow y-scale 4))))))) (* (/ 1 (* (pow x-scale 2) (pow y-scale 2))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2))))))) |
(*.f64 (*.f64 (*.f64 b b) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 y-scale y-scale) (pow.f64 x-scale #s(literal 4 binary64))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x-scale x-scale) (pow.f64 y-scale #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 y-scale y-scale)))))) (/.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1/2 binary64) (+.f64 (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) |
(* (* (pow b 2) (sqrt 8)) (sqrt (- (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 4) (pow y-scale 2)))) (+ (* 1/2 (/ 1 (* (pow x-scale 2) (pow y-scale 4)))) (+ (* 1/2 (/ 1 (* (pow x-scale 4) (pow y-scale 2)))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 2) (pow y-scale 4))))))) (* (/ 1 (* (pow x-scale 2) (pow y-scale 2))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2))))))) |
(*.f64 (*.f64 (*.f64 b b) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 y-scale y-scale) (pow.f64 x-scale #s(literal 4 binary64))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x-scale x-scale) (pow.f64 y-scale #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 y-scale y-scale)))))) (/.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1/2 binary64) (+.f64 (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) |
(* (* (pow b 2) (sqrt 8)) (sqrt (- (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 4) (pow y-scale 2)))) (+ (* 1/2 (/ 1 (* (pow x-scale 2) (pow y-scale 4)))) (+ (* 1/2 (/ 1 (* (pow x-scale 4) (pow y-scale 2)))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 2) (pow y-scale 4))))))) (* (/ 1 (* (pow x-scale 2) (pow y-scale 2))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2))))))) |
(*.f64 (*.f64 (*.f64 b b) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 y-scale y-scale) (pow.f64 x-scale #s(literal 4 binary64))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x-scale x-scale) (pow.f64 y-scale #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 y-scale y-scale)))))) (/.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1/2 binary64) (+.f64 (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) |
(* (* (pow b 2) (sqrt 8)) (sqrt (- (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 4) (pow y-scale 2)))) (+ (* 1/2 (/ 1 (* (pow x-scale 2) (pow y-scale 4)))) (+ (* 1/2 (/ 1 (* (pow x-scale 4) (pow y-scale 2)))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 2) (pow y-scale 4))))))) (* (/ 1 (* (pow x-scale 2) (pow y-scale 2))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2))))))) |
(*.f64 (*.f64 (*.f64 b b) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 y-scale y-scale) (pow.f64 x-scale #s(literal 4 binary64))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x-scale x-scale) (pow.f64 y-scale #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 y-scale y-scale)))))) (/.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1/2 binary64) (+.f64 (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) |
(* (* (pow b 2) (sqrt 8)) (sqrt (- (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 4) (pow y-scale 2)))) (+ (* 1/2 (/ 1 (* (pow x-scale 2) (pow y-scale 4)))) (+ (* 1/2 (/ 1 (* (pow x-scale 4) (pow y-scale 2)))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow x-scale 2) (pow y-scale 4))))))) (* (/ 1 (* (pow x-scale 2) (pow y-scale 2))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2))))))) |
(*.f64 (*.f64 (*.f64 b b) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 y-scale y-scale) (pow.f64 x-scale #s(literal 4 binary64))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x-scale x-scale) (pow.f64 y-scale #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) (pow.f64 y-scale #s(literal 4 binary64)))) (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 y-scale y-scale)))))) (/.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1/2 binary64) (+.f64 (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) |
(* (/ (* (pow b 2) (sqrt 8)) (* x-scale y-scale)) (sqrt (- (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 3/2 (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow x-scale 2)))))) |
(*.f64 (/.f64 (*.f64 (*.f64 b b) (sqrt.f64 #s(literal 8 binary64))) (*.f64 x-scale y-scale)) (sqrt.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (+.f64 (/.f64 #s(literal 3/2 binary64) (*.f64 y-scale y-scale)) (/.f64 #s(literal -1/2 binary64) (*.f64 x-scale x-scale)))))) |
(+ (* 1/2 (* (/ (* (pow angle 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/32400 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 4) (pow y-scale 2)))) (/ (* (pow b 4) (- (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (+ (* -1 (* (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/16200 (/ (pow (PI) 2) (pow y-scale 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))))) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)) (sqrt (/ 1 (- (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 3/2 (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow x-scale 2)))))))) (* (/ (* (pow b 2) (sqrt 8)) (* x-scale y-scale)) (sqrt (- (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 3/2 (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow x-scale 2))))))) |
(+.f64 (*.f64 (/.f64 (*.f64 (*.f64 b b) (sqrt.f64 #s(literal 8 binary64))) (*.f64 x-scale y-scale)) (sqrt.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (+.f64 (/.f64 #s(literal 3/2 binary64) (*.f64 y-scale y-scale)) (/.f64 #s(literal -1/2 binary64) (*.f64 x-scale x-scale)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 angle angle) x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (pow.f64 b #s(literal 4 binary64)))) (*.f64 (*.f64 y-scale y-scale) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 (/.f64 (-.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 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/16200 binary64) (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.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/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (+.f64 (/.f64 #s(literal 3/2 binary64) (*.f64 y-scale y-scale)) (/.f64 #s(literal -1/2 binary64) (*.f64 x-scale x-scale))))))) (*.f64 b b)))) |
(+ (* (/ (* (pow b 2) (sqrt 8)) (* x-scale y-scale)) (sqrt (- (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 3/2 (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow x-scale 2)))))) (* (pow angle 2) (+ (* 1/2 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/32400 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 4) (pow y-scale 2)))) (/ (* (pow b 4) (- (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (+ (* -1 (* (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/16200 (/ (pow (PI) 2) (pow y-scale 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow b 2)) (sqrt (/ 1 (- (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 3/2 (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow x-scale 2)))))))) (* 1/2 (* (/ (* (pow angle 2) (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow b 4) (pow (PI) 4)) (* (pow x-scale 4) (pow y-scale 2)))) (/ (* (pow b 4) (- (* 1/3149280000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1 (* (+ (* 1/1574640000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/1574640000 (/ (pow (PI) 4) (pow y-scale 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))) (+ (* -1/196830000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (pow (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/16200 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (* 1/4 (/ (pow (+ (* -1 (* (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/16200 (/ (pow (PI) 2) (pow y-scale 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (pow (+ (* 1/32400 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 4) (pow y-scale 2)))) (/ (* (pow b 4) (- (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (+ (* -1 (* (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/16200 (/ (pow (PI) 2) (pow y-scale 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))))) (* (pow x-scale 2) (pow y-scale 2)))) 2))) (* (pow b 4) (- (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 3/2 (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow x-scale 2)))))))))))) (pow b 2)) (sqrt (/ 1 (- (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 3/2 (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow x-scale 2))))))))))) |
(+.f64 (*.f64 (/.f64 (*.f64 (*.f64 b b) (sqrt.f64 #s(literal 8 binary64))) (*.f64 x-scale y-scale)) (sqrt.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (+.f64 (/.f64 #s(literal 3/2 binary64) (*.f64 y-scale y-scale)) (/.f64 #s(literal -1/2 binary64) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 angle angle) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (+.f64 (/.f64 #s(literal 3/2 binary64) (*.f64 y-scale y-scale)) (/.f64 #s(literal -1/2 binary64) (*.f64 x-scale x-scale)))))) (+.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (pow.f64 b #s(literal 4 binary64)))) (*.f64 (*.f64 y-scale y-scale) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 (/.f64 (-.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 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/16200 binary64) (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.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/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (*.f64 b b)) (/.f64 (*.f64 (*.f64 (*.f64 angle angle) x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64)))) (*.f64 (*.f64 y-scale y-scale) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 #s(literal 1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (*.f64 (/.f64 (+.f64 (-.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/196830000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/262440000 binary64) (*.f64 (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale))))))) (*.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/1574640000 binary64) (+.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))))) (*.f64 (/.f64 (*.f64 (-.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 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/16200 binary64) (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale)))))) (-.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 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/16200 binary64) (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale))))))) (*.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))))) #s(literal -1/4 binary64))) (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (pow.f64 b #s(literal 4 binary64)))) (*.f64 (*.f64 y-scale y-scale) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 (/.f64 (-.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 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/16200 binary64) (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.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/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (+.f64 (/.f64 #s(literal 3/2 binary64) (*.f64 y-scale y-scale)) (/.f64 #s(literal -1/2 binary64) (*.f64 x-scale x-scale)))))))))) (*.f64 b b))))))) |
(+ (* (/ (* (pow b 2) (sqrt 8)) (* x-scale y-scale)) (sqrt (- (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 3/2 (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow x-scale 2)))))) (* (pow angle 2) (+ (* 1/2 (* (/ (* x-scale (* y-scale (* (sqrt 8) (+ (* 1/32400 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 4) (pow y-scale 2)))) (/ (* (pow b 4) (- (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (+ (* -1 (* (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/16200 (/ (pow (PI) 2) (pow y-scale 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))))) (* (pow x-scale 2) (pow y-scale 2))))))) (pow b 2)) (sqrt (/ 1 (- (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 3/2 (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow x-scale 2)))))))) (* (pow angle 2) (+ (* 1/2 (* (/ (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1/3149280000 (/ (* (pow b 4) (pow (PI) 4)) (* (pow x-scale 4) (pow y-scale 2)))) (/ (* (pow b 4) (- (* 1/3149280000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1 (* (+ (* 1/1574640000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/1574640000 (/ (pow (PI) 4) (pow y-scale 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))) (+ (* -1/196830000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (pow (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/16200 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (* 1/4 (/ (pow (+ (* -1 (* (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/16200 (/ (pow (PI) 2) (pow y-scale 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (pow (+ (* 1/32400 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 4) (pow y-scale 2)))) (/ (* (pow b 4) (- (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (+ (* -1 (* (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/16200 (/ (pow (PI) 2) (pow y-scale 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))))) (* (pow x-scale 2) (pow y-scale 2)))) 2))) (* (pow b 4) (- (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 3/2 (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow x-scale 2))))))))))) (pow b 2)) (sqrt (/ 1 (- (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 3/2 (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow x-scale 2)))))))) (* 1/2 (* (/ (* (pow angle 2) (* x-scale (* y-scale (* (sqrt 8) (- (+ (* 1/765275040000000 (/ (* (pow b 4) (pow (PI) 6)) (* (pow x-scale 4) (pow y-scale 2)))) (/ (* (pow b 4) (- (* -1/765275040000000 (/ (pow (PI) 6) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1 (* (+ (* -1/382637520000000 (/ (pow (PI) 6) (pow x-scale 2))) (* -1/382637520000000 (/ (pow (PI) 6) (pow y-scale 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))) (+ (* 1/31886460000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/19131876000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/2 (* (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/16200 (/ (pow (PI) 2) (pow y-scale 2)))) (+ (* 1/1574640000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/1574640000 (/ (pow (PI) 4) (pow y-scale 2))))))))) (* 1/2 (/ (* (+ (* -1 (* (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/16200 (/ (pow (PI) 2) (pow y-scale 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (+ (* -1 (* (+ (* 1/1574640000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/1574640000 (/ (pow (PI) 4) (pow y-scale 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))) (+ (* -1/196830000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (pow (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/16200 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (* 1/4 (/ (pow (+ (* -1 (* (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/16200 (/ (pow (PI) 2) (pow y-scale 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2))))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/2 (/ (* (pow x-scale 2) (* (pow y-scale 2) (* (+ (* 1/32400 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 4) (pow y-scale 2)))) (/ (* (pow b 4) (- (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (+ (* -1 (* (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/16200 (/ (pow (PI) 2) (pow y-scale 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (- (+ (* -1/3149280000 (/ (* (pow b 4) (pow (PI) 4)) (* (pow x-scale 4) (pow y-scale 2)))) (/ (* (pow b 4) (- (* 1/3149280000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/2 (/ (- (+ (* -1 (* (+ (* 1/1574640000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/1574640000 (/ (pow (PI) 4) (pow y-scale 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))) (+ (* -1/196830000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (pow (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/16200 (/ (pow (PI) 2) (pow y-scale 2)))) 2)))) (* 1/4 (/ (pow (+ (* -1 (* (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/16200 (/ (pow (PI) 2) (pow y-scale 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) 2) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4 (/ (* (pow x-scale 2) (* (pow y-scale 2) (pow (+ (* 1/32400 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 4) (pow y-scale 2)))) (/ (* (pow b 4) (- (* -1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (* 1/2 (/ (+ (* -1 (* (+ (* -1/16200 (/ (pow (PI) 2) (pow x-scale 2))) (* -1/16200 (/ (pow (PI) 2) (pow y-scale 2)))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* 1/8100 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))))))) (* (pow x-scale 2) (pow y-scale 2)))) 2))) (* (pow b 4) (- (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 3/2 (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow x-scale 2))))))))))) (* (pow b 4) (- (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 3/2 (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow x-scale 2)))))))))))) (pow b 2)) (sqrt (/ 1 (- (+ (* 1/2 (+ (/ 1 (pow x-scale 2)) (/ 1 (pow y-scale 2)))) (* 3/2 (/ 1 (pow y-scale 2)))) (* 1/2 (/ 1 (pow x-scale 2))))))))))))) |
(+.f64 (*.f64 (/.f64 (*.f64 (*.f64 b b) (sqrt.f64 #s(literal 8 binary64))) (*.f64 x-scale y-scale)) (sqrt.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (+.f64 (/.f64 #s(literal 3/2 binary64) (*.f64 y-scale y-scale)) (/.f64 #s(literal -1/2 binary64) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 angle angle) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (pow.f64 b #s(literal 4 binary64)))) (*.f64 (*.f64 y-scale y-scale) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 (/.f64 (-.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 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/16200 binary64) (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.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/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (+.f64 (/.f64 #s(literal 3/2 binary64) (*.f64 y-scale y-scale)) (/.f64 #s(literal -1/2 binary64) (*.f64 x-scale x-scale))))))) (*.f64 b b))) (*.f64 (*.f64 angle angle) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (+.f64 (/.f64 #s(literal 3/2 binary64) (*.f64 y-scale y-scale)) (/.f64 #s(literal -1/2 binary64) (*.f64 x-scale x-scale)))))) (+.f64 (/.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64)))) (*.f64 (*.f64 y-scale y-scale) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 #s(literal 1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (*.f64 (/.f64 (+.f64 (-.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/196830000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/262440000 binary64) (*.f64 (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale))))))) (*.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/1574640000 binary64) (+.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))))) (*.f64 (/.f64 (*.f64 (-.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 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/16200 binary64) (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale)))))) (-.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 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/16200 binary64) (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale))))))) (*.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))))) #s(literal -1/4 binary64))) (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (pow.f64 b #s(literal 4 binary64)))) (*.f64 (*.f64 y-scale y-scale) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 (/.f64 (-.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 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/16200 binary64) (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.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/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (+.f64 (/.f64 #s(literal 3/2 binary64) (*.f64 y-scale y-scale)) (/.f64 #s(literal -1/2 binary64) (*.f64 x-scale x-scale)))))))))) (*.f64 b b)) (/.f64 (*.f64 (*.f64 (*.f64 angle angle) x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/765275040000000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 b #s(literal 4 binary64)))) (*.f64 (*.f64 y-scale y-scale) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 #s(literal -1/765275040000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (-.f64 (+.f64 (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal 1/11957422500000 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 #s(literal -1/16200 binary64) (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/1574640000 binary64) (+.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 y-scale y-scale))))))) (*.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/382637520000000 binary64) (+.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 y-scale y-scale)))))) (*.f64 (/.f64 (*.f64 (-.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 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/16200 binary64) (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale)))))) (+.f64 (-.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/196830000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/262440000 binary64) (*.f64 (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale))))))) (*.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/1574640000 binary64) (+.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))))) (*.f64 (/.f64 (*.f64 (-.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 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/16200 binary64) (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale)))))) (-.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 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/16200 binary64) (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale))))))) (*.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))))) #s(literal -1/4 binary64)))) (*.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))))) #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 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 (*.f64 y-scale y-scale) (+.f64 (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (pow.f64 b #s(literal 4 binary64)))) (*.f64 (*.f64 y-scale y-scale) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 (/.f64 (-.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 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/16200 binary64) (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.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/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (+.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64)))) (*.f64 (*.f64 y-scale y-scale) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 #s(literal 1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (*.f64 (/.f64 (+.f64 (-.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/196830000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/262440000 binary64) (*.f64 (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale))))))) (*.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/1574640000 binary64) (+.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))))) (*.f64 (/.f64 (*.f64 (-.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 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/16200 binary64) (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale)))))) (-.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 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/16200 binary64) (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale))))))) (*.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))))) #s(literal -1/4 binary64))) (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (pow.f64 b #s(literal 4 binary64)))) (*.f64 (*.f64 y-scale y-scale) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)) (*.f64 (/.f64 (-.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 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/16200 binary64) (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.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/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (+.f64 (/.f64 #s(literal 3/2 binary64) (*.f64 y-scale y-scale)) (/.f64 #s(literal -1/2 binary64) (*.f64 x-scale x-scale)))))))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (+.f64 (/.f64 #s(literal 3/2 binary64) (*.f64 y-scale y-scale)) (/.f64 #s(literal -1/2 binary64) (*.f64 x-scale x-scale)))))))))) (*.f64 b b))))))))) |
(* (sqrt 8) (sqrt (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))) (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) |
(*.f64 (sqrt.f64 #s(literal 8 binary64)) (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 (*.f64 y-scale y-scale) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (-.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))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1/2 binary64) (+.f64 (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) |
(* (sqrt 8) (sqrt (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))) (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) |
(*.f64 (sqrt.f64 #s(literal 8 binary64)) (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 (*.f64 y-scale y-scale) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (-.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))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1/2 binary64) (+.f64 (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) |
(* (sqrt 8) (sqrt (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))) (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) |
(*.f64 (sqrt.f64 #s(literal 8 binary64)) (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 (*.f64 y-scale y-scale) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (-.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))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1/2 binary64) (+.f64 (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) |
(* (sqrt 8) (sqrt (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))) (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) |
(*.f64 (sqrt.f64 #s(literal 8 binary64)) (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 (*.f64 y-scale y-scale) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (-.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))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1/2 binary64) (+.f64 (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) |
(* (sqrt 8) (sqrt (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))) (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) |
(*.f64 (sqrt.f64 #s(literal 8 binary64)) (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 (*.f64 y-scale y-scale) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (-.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))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1/2 binary64) (+.f64 (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) |
(* (sqrt 8) (sqrt (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))) (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) |
(*.f64 (sqrt.f64 #s(literal 8 binary64)) (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 (*.f64 y-scale y-scale) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (-.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))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1/2 binary64) (+.f64 (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) |
(* (sqrt 8) (sqrt (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))) (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) |
(*.f64 (sqrt.f64 #s(literal 8 binary64)) (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 (*.f64 y-scale y-scale) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (-.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))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1/2 binary64) (+.f64 (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) |
(* (sqrt 8) (sqrt (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 4) (pow y-scale 2))) (/ (* (pow b 4) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (+ (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)) (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ 1 (pow y-scale 2))))) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) |
(*.f64 (sqrt.f64 #s(literal 8 binary64)) (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 (*.f64 y-scale y-scale) (pow.f64 x-scale #s(literal 4 binary64)))) (/.f64 (-.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))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1/2 binary64) (+.f64 (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-scale)) (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) |
(* (/ (sqrt 8) (pow x-scale 2)) (sqrt (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 4) (- (* 1/2 (cos (* 1/90 (* angle (PI))))) 1/2)) (pow y-scale 2))))) |
(*.f64 (/.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 x-scale x-scale)) (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.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))))) #s(literal -1/2 binary64)) (*.f64 y-scale y-scale)))))) |
(/ (+ (* 1/2 (* (/ (* (pow b 4) (* (pow x-scale 2) (* (sqrt 8) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))))))) (pow y-scale 2)) (sqrt (/ 1 (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 4) (- (* 1/2 (cos (* 1/90 (* angle (PI))))) 1/2)) (pow y-scale 2))))))) (* (sqrt 8) (sqrt (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 4) (- (* 1/2 (cos (* 1/90 (* angle (PI))))) 1/2)) (pow y-scale 2)))))) (pow x-scale 2)) |
(/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 x-scale x-scale) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.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))))) #s(literal -1/2 binary64)) (*.f64 y-scale y-scale))))))) (*.f64 y-scale y-scale))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.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))))) #s(literal -1/2 binary64)) (*.f64 y-scale y-scale))))))) (*.f64 x-scale x-scale)) |
(/ (+ (* (sqrt 8) (sqrt (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 4) (- (* 1/2 (cos (* 1/90 (* angle (PI))))) 1/2)) (pow y-scale 2))))) (* (pow x-scale 2) (+ (* 1/2 (* (* (pow x-scale 2) (* (sqrt 8) (- (* -1/2 (/ (* (pow b 4) (- (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2))))) (* (pow y-scale 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* 1/4 (/ (* (pow b 8) (pow (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2)) (* (pow y-scale 4) (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 4) (- (* 1/2 (cos (* 1/90 (* angle (PI))))) 1/2)) (pow y-scale 2))))))))) (sqrt (/ 1 (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 4) (- (* 1/2 (cos (* 1/90 (* angle (PI))))) 1/2)) (pow y-scale 2))))))) (* 1/2 (* (/ (* (pow b 4) (* (sqrt 8) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow y-scale 2)) (sqrt (/ 1 (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 4) (- (* 1/2 (cos (* 1/90 (* angle (PI))))) 1/2)) (pow y-scale 2)))))))))) (pow x-scale 2)) |
(/.f64 (+.f64 (*.f64 (sqrt.f64 #s(literal 8 binary64)) (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.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))))) #s(literal -1/2 binary64)) (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.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))))) #s(literal -1/2 binary64)) (*.f64 y-scale y-scale)))))) (+.f64 (*.f64 (*.f64 (*.f64 x-scale x-scale) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 (pow.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))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) #s(literal 2 binary64))) #s(literal -1/4 binary64))) (pow.f64 b #s(literal 4 binary64)))) (*.f64 (*.f64 y-scale y-scale) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))))))) #s(literal 2 binary64))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.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))))) #s(literal -1/2 binary64)) (*.f64 y-scale y-scale))))))))) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64)))))))) (*.f64 y-scale y-scale))))))) (*.f64 x-scale x-scale)) |
(/ (+ (* (sqrt 8) (sqrt (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 4) (- (* 1/2 (cos (* 1/90 (* angle (PI))))) 1/2)) (pow y-scale 2))))) (* (pow x-scale 2) (+ (* 1/2 (* (/ (* (pow b 4) (* (sqrt 8) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (pow y-scale 2)) (sqrt (/ 1 (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 4) (- (* 1/2 (cos (* 1/90 (* angle (PI))))) 1/2)) (pow y-scale 2))))))) (* (pow x-scale 2) (+ (* 1/2 (* (* (sqrt 8) (- (* -1/2 (/ (* (pow b 4) (- (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2))))) (* (pow y-scale 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* 1/4 (/ (* (pow b 8) (pow (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2)) (* (pow y-scale 4) (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 4) (- (* 1/2 (cos (* 1/90 (* angle (PI))))) 1/2)) (pow y-scale 2)))))))) (sqrt (/ 1 (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 4) (- (* 1/2 (cos (* 1/90 (* angle (PI))))) 1/2)) (pow y-scale 2))))))) (* 1/2 (* (* (pow x-scale 2) (* (sqrt 8) (- (* 1/4 (/ (* (pow b 4) (* (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) (- (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)))))) (* (pow y-scale 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 3)))) (* 1/2 (/ (* (pow b 4) (* (- (* -1/2 (/ (* (pow b 4) (- (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2))))) (* (pow y-scale 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* 1/4 (/ (* (pow b 8) (pow (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) 2)) (* (pow y-scale 4) (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 4) (- (* 1/2 (cos (* 1/90 (* angle (PI))))) 1/2)) (pow y-scale 2))))))) (- (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))) (* 1/2 (/ (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))))) (* (pow y-scale 2) (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 4) (- (* 1/2 (cos (* 1/90 (* angle (PI))))) 1/2)) (pow y-scale 2))))))))) (sqrt (/ 1 (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 4) (- (* 1/2 (cos (* 1/90 (* angle (PI))))) 1/2)) (pow y-scale 2)))))))))))) (pow x-scale 2)) |
(/.f64 (+.f64 (*.f64 (sqrt.f64 #s(literal 8 binary64)) (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.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))))) #s(literal -1/2 binary64)) (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 x-scale x-scale) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.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))))) #s(literal -1/2 binary64)) (*.f64 y-scale y-scale))))))) (*.f64 y-scale y-scale))) (*.f64 (*.f64 x-scale x-scale) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.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))))) #s(literal -1/2 binary64)) (*.f64 y-scale y-scale)))))) (+.f64 (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 (pow.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))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) #s(literal 2 binary64))) #s(literal -1/4 binary64))) (pow.f64 b #s(literal 4 binary64)))) (*.f64 (*.f64 y-scale y-scale) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))))))) #s(literal 2 binary64))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.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))))) #s(literal -1/2 binary64)) (*.f64 y-scale y-scale))))))))) (*.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 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (pow.f64 b #s(literal 4 binary64))) (+.f64 (pow.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))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) #s(literal 2 binary64))) #s(literal -1/4 binary64))))) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) #s(literal 3 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))))))) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 (pow.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))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) #s(literal 2 binary64))) #s(literal -1/4 binary64))) (pow.f64 b #s(literal 4 binary64)))) (*.f64 (*.f64 y-scale y-scale) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 y-scale y-scale)) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))))))) #s(literal 2 binary64))) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.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))))) #s(literal -1/2 binary64)) (*.f64 y-scale y-scale)))))))))) (*.f64 (*.f64 y-scale y-scale) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.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))))) #s(literal -1/2 binary64)) (*.f64 y-scale y-scale)))))))))))))))) (*.f64 x-scale x-scale)) |
(* (/ (sqrt 8) (pow x-scale 2)) (sqrt (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) |
(/.f64 (*.f64 (sqrt.f64 #s(literal 8 binary64)) (sqrt.f64 (+.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (pow.f64 b #s(literal 4 binary64)))) (*.f64 (*.f64 y-scale y-scale) (+.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 x-scale x-scale)) |
(/ (+ (* -1/4 (* (/ (* (pow b 4) (* (sqrt 8) (- (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))) (* (sqrt 8) (sqrt (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 4) (+ 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 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.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))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (pow.f64 b #s(literal 4 binary64)))) (*.f64 (*.f64 y-scale y-scale) (+.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 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (+.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 (sqrt.f64 #s(literal 8 binary64)) (sqrt.f64 (+.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (pow.f64 b #s(literal 4 binary64)))) (*.f64 (*.f64 y-scale y-scale) (+.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 x-scale x-scale)) |
(/ (+ (* -1/4 (* (/ (* (pow b 4) (* (sqrt 8) (- (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))) (+ (* 1/2 (* (/ (* (sqrt 8) (- (* 1/4 (/ (* (pow b 4) (* (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) (- (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (* (pow y-scale 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 3)))) (* 1/16 (/ (* (pow b 8) (pow (- (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) 2)) (* (pow y-scale 4) (* (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))) (* (sqrt 8) (sqrt (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))) (pow x-scale 2)) |
(/.f64 (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (pow.f64 b #s(literal 4 binary64)))) (*.f64 (*.f64 y-scale y-scale) (+.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 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.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))) #s(literal 2 binary64)))))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (+.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 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (pow.f64 b #s(literal 4 binary64))) (+.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.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))) #s(literal 2 binary64))))))) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #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 (pow.f64 b #s(literal 8 binary64)) (/.f64 (pow.f64 (+.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.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))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.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))) #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (pow.f64 b #s(literal 4 binary64)))) (*.f64 (*.f64 y-scale y-scale) (+.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)))))))))) #s(literal -1/16 binary64)))) (pow.f64 x-scale #s(literal 4 binary64)))))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (sqrt.f64 (+.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (pow.f64 b #s(literal 4 binary64)))) (*.f64 (*.f64 y-scale y-scale) (+.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 x-scale x-scale)) |
(/ (+ (* -1/4 (* (/ (* (pow b 4) (* (sqrt 8) (- (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))) (+ (* 1/2 (* (/ (* (sqrt 8) (- (* 1/4 (/ (* (pow b 4) (* (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) (- (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (* (pow y-scale 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 3)))) (* 1/16 (/ (* (pow b 8) (pow (- (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) 2)) (* (pow y-scale 4) (* (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))) (+ (* 1/2 (* (/ (* (sqrt 8) (- (* 1/2 (/ (* (pow b 4) (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (- (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 4))) (* 1/4 (/ (pow (- (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -1/4 (/ (* (pow b 4) (* (- (* 1/4 (/ (* (pow b 4) (* (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) (- (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (* (pow y-scale 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 3)))) (* 1/16 (/ (* (pow b 8) (pow (- (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) 2)) (* (pow y-scale 4) (* (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (- (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (* (pow y-scale 2) (* (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))))) (pow x-scale 6)) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))) (* (sqrt 8) (sqrt (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (pow x-scale 2)) |
(/.f64 (+.f64 (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (pow.f64 b #s(literal 4 binary64)))) (*.f64 (*.f64 y-scale y-scale) (+.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 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.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))) #s(literal 2 binary64)))))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (+.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 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (pow.f64 b #s(literal 4 binary64))) (+.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.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))) #s(literal 2 binary64))))))) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #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 (pow.f64 b #s(literal 8 binary64)) (/.f64 (pow.f64 (+.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.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))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.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))) #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (pow.f64 b #s(literal 4 binary64)))) (*.f64 (*.f64 y-scale y-scale) (+.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)))))))))) #s(literal -1/16 binary64)))) (pow.f64 x-scale #s(literal 4 binary64)))))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (sqrt.f64 (+.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (pow.f64 b #s(literal 4 binary64)))) (*.f64 (*.f64 y-scale y-scale) (+.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 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (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 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (+.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.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))) #s(literal 2 binary64))))))) (pow.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))) #s(literal 4 binary64))) (/.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.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))) #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.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))) #s(literal 2 binary64)))))) (*.f64 (*.f64 y-scale y-scale) (+.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/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (+.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.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))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (pow.f64 b #s(literal 4 binary64))) (+.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.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))) #s(literal 2 binary64))))))) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #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 (pow.f64 b #s(literal 8 binary64)) (/.f64 (pow.f64 (+.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.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))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.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))) #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (pow.f64 b #s(literal 4 binary64)))) (*.f64 (*.f64 y-scale y-scale) (+.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)))))))))) #s(literal -1/16 binary64))))) (*.f64 (*.f64 y-scale y-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 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (pow.f64 b #s(literal 4 binary64)))) (*.f64 (*.f64 y-scale y-scale) (+.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)))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (pow.f64 b #s(literal 4 binary64)))) (*.f64 (*.f64 y-scale y-scale) (+.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))))))))) (pow.f64 x-scale #s(literal 6 binary64))))) (*.f64 x-scale x-scale)) |
(* (/ (sqrt 8) (pow x-scale 2)) (sqrt (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))) |
(/.f64 (*.f64 (sqrt.f64 #s(literal 8 binary64)) (sqrt.f64 (+.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (pow.f64 b #s(literal 4 binary64)))) (*.f64 (*.f64 y-scale y-scale) (+.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 x-scale x-scale)) |
(/ (+ (* -1/4 (* (/ (* (pow b 4) (* (sqrt 8) (- (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))) (* (sqrt 8) (sqrt (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 4) (+ 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 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.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))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (pow.f64 b #s(literal 4 binary64)))) (*.f64 (*.f64 y-scale y-scale) (+.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 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (+.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 (sqrt.f64 #s(literal 8 binary64)) (sqrt.f64 (+.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (pow.f64 b #s(literal 4 binary64)))) (*.f64 (*.f64 y-scale y-scale) (+.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 x-scale x-scale)) |
(/ (+ (* -1/4 (* (/ (* (pow b 4) (* (sqrt 8) (- (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))) (+ (* 1/2 (* (/ (* (sqrt 8) (- (* 1/4 (/ (* (pow b 4) (* (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) (- (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (* (pow y-scale 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 3)))) (* 1/16 (/ (* (pow b 8) (pow (- (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) 2)) (* (pow y-scale 4) (* (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))) (* (sqrt 8) (sqrt (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))) (pow x-scale 2)) |
(/.f64 (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (pow.f64 b #s(literal 4 binary64)))) (*.f64 (*.f64 y-scale y-scale) (+.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 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.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))) #s(literal 2 binary64)))))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (+.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 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (pow.f64 b #s(literal 4 binary64))) (+.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.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))) #s(literal 2 binary64))))))) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #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 (pow.f64 b #s(literal 8 binary64)) (/.f64 (pow.f64 (+.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.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))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.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))) #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (pow.f64 b #s(literal 4 binary64)))) (*.f64 (*.f64 y-scale y-scale) (+.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)))))))))) #s(literal -1/16 binary64)))) (pow.f64 x-scale #s(literal 4 binary64)))))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (sqrt.f64 (+.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (pow.f64 b #s(literal 4 binary64)))) (*.f64 (*.f64 y-scale y-scale) (+.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 x-scale x-scale)) |
(/ (+ (* -1/4 (* (/ (* (pow b 4) (* (sqrt 8) (- (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (* (pow x-scale 2) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))) (+ (* 1/2 (* (/ (* (sqrt 8) (- (* 1/4 (/ (* (pow b 4) (* (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) (- (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (* (pow y-scale 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 3)))) (* 1/16 (/ (* (pow b 8) (pow (- (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) 2)) (* (pow y-scale 4) (* (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) (pow x-scale 4)) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))) (+ (* 1/2 (* (/ (* (sqrt 8) (- (* 1/2 (/ (* (pow b 4) (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (- (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 4))) (* 1/4 (/ (pow (- (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (* -1/4 (/ (* (pow b 4) (* (- (* 1/4 (/ (* (pow b 4) (* (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) (- (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (* (pow y-scale 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 3)))) (* 1/16 (/ (* (pow b 8) (pow (- (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))) 2)) (* (pow y-scale 4) (* (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (- (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2))) 2) (pow (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))) (* (pow y-scale 2) (* (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))))))))) (pow x-scale 6)) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))))))) (* (sqrt 8) (sqrt (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2)))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow y-scale 2)))) (* (pow y-scale 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))) (* 1/2 (/ 1 (pow y-scale 2))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))) (pow x-scale 2)) |
(/.f64 (+.f64 (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (pow.f64 b #s(literal 4 binary64)))) (*.f64 (*.f64 y-scale y-scale) (+.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 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.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))) #s(literal 2 binary64)))))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (+.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 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (pow.f64 b #s(literal 4 binary64))) (+.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.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))) #s(literal 2 binary64))))))) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #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 (pow.f64 b #s(literal 8 binary64)) (/.f64 (pow.f64 (+.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.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))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.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))) #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (pow.f64 b #s(literal 4 binary64)))) (*.f64 (*.f64 y-scale y-scale) (+.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)))))))))) #s(literal -1/16 binary64)))) (pow.f64 x-scale #s(literal 4 binary64)))))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (sqrt.f64 (+.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (pow.f64 b #s(literal 4 binary64)))) (*.f64 (*.f64 y-scale y-scale) (+.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 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (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 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (+.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.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))) #s(literal 2 binary64))))))) (pow.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))) #s(literal 4 binary64))) (/.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.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))) #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.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))) #s(literal 2 binary64)))))) (*.f64 (*.f64 y-scale y-scale) (+.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/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (+.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.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))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (pow.f64 b #s(literal 4 binary64))) (+.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.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))) #s(literal 2 binary64))))))) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #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 (pow.f64 b #s(literal 8 binary64)) (/.f64 (pow.f64 (+.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (pow.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))) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (*.f64 (pow.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))) #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (pow.f64 b #s(literal 4 binary64)))) (*.f64 (*.f64 y-scale y-scale) (+.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)))))))))) #s(literal -1/16 binary64))))) (*.f64 (*.f64 y-scale y-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 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (pow.f64 b #s(literal 4 binary64)))) (*.f64 (*.f64 y-scale y-scale) (+.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)))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) (pow.f64 b #s(literal 4 binary64)))) (*.f64 (*.f64 y-scale y-scale) (+.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))))))))) (pow.f64 x-scale #s(literal 6 binary64))))) (*.f64 x-scale x-scale)) |
(* (/ (sqrt 8) y-scale) (sqrt (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)))) (* (pow x-scale 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4))))) |
(*.f64 (/.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale) (sqrt.f64 (+.f64 (/.f64 (*.f64 #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 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) (pow.f64 b #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale x-scale) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (pow.f64 b #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64)))))) |
(/ (+ (* -1/4 (* (/ (* (pow b 4) (* (pow y-scale 2) (* (sqrt 8) (- (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2))))))) (* (pow x-scale 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)))) (* (pow x-scale 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4))))))) (* (sqrt 8) (sqrt (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)))) (* (pow x-scale 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4)))))) y-scale) |
(/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 y-scale y-scale) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (pow.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.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 #s(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/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 #s(literal 1/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 #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 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) (pow.f64 b #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale x-scale) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (pow.f64 b #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64))))))) (*.f64 (*.f64 x-scale x-scale) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (sqrt.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(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/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) (pow.f64 b #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale x-scale) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (pow.f64 b #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64))))))) y-scale) |
(/ (+ (* (sqrt 8) (sqrt (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)))) (* (pow x-scale 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4))))) (* (pow y-scale 2) (+ (* -1/4 (* (/ (* (pow b 4) (* (sqrt 8) (- (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)))))) (* (pow x-scale 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)))) (* (pow x-scale 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4))))))) (* 1/2 (* (* (pow y-scale 2) (* (sqrt 8) (- (* 1/4 (/ (* (pow b 4) (* (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (- (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)))))) (* (pow x-scale 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 3)))) (* 1/16 (/ (* (pow b 8) (pow (- (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)))) 2)) (* (pow x-scale 4) (* (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)))) (* (pow x-scale 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4)))))))))) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)))) (* (pow x-scale 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4)))))))))) y-scale) |
(/.f64 (+.f64 (*.f64 (sqrt.f64 #s(literal 8 binary64)) (sqrt.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(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/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) (pow.f64 b #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale x-scale) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (pow.f64 b #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64)))))) (*.f64 (*.f64 y-scale y-scale) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 #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 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) (pow.f64 b #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale x-scale) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (pow.f64 b #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64)))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (pow.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.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 #s(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/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 #s(literal 1/2 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 x-scale) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 y-scale y-scale) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(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/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) (pow.f64 b #s(literal 4 binary64))) (+.f64 (pow.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.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 #s(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/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 #s(literal 1/2 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 x-scale) (pow.f64 (+.f64 #s(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 (pow.f64 (+.f64 (pow.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.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 #s(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/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 #s(literal 1/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 b #s(literal 8 binary64))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1/2 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 #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 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) (pow.f64 b #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale x-scale) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (pow.f64 b #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64)))))) #s(literal -1/16 binary64))))))))) y-scale) |
(/ (+ (* (sqrt 8) (sqrt (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)))) (* (pow x-scale 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4))))) (* (pow y-scale 2) (+ (* -1/4 (* (/ (* (pow b 4) (* (sqrt 8) (- (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)))))) (* (pow x-scale 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)))) (* (pow x-scale 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4))))))) (* (pow y-scale 2) (+ (* 1/2 (* (* (sqrt 8) (- (* 1/4 (/ (* (pow b 4) (* (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (- (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)))))) (* (pow x-scale 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 3)))) (* 1/16 (/ (* (pow b 8) (pow (- (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)))) 2)) (* (pow x-scale 4) (* (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)))) (* (pow x-scale 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4))))))))) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)))) (* (pow x-scale 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4))))))) (* 1/2 (* (* (pow y-scale 2) (* (sqrt 8) (- (* 1/2 (/ (* (pow b 4) (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) 2) (- (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2))))) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 4))) (* 1/4 (/ (pow (- (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)))) 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2))))) (* (pow x-scale 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (* -1/4 (/ (* (pow b 4) (* (- (* 1/4 (/ (* (pow b 4) (* (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (- (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)))))) (* (pow x-scale 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 3)))) (* 1/16 (/ (* (pow b 8) (pow (- (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)))) 2)) (* (pow x-scale 4) (* (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)))) (* (pow x-scale 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4)))))))) (- (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)))))) (* (pow x-scale 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)))) (* (pow x-scale 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4)))))))))) (sqrt (/ 1 (+ (* -1/2 (/ (* (pow b 4) (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)))) (* (pow x-scale 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4)))))))))))) y-scale) |
(/.f64 (+.f64 (*.f64 (sqrt.f64 #s(literal 8 binary64)) (sqrt.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(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/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) (pow.f64 b #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale x-scale) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (pow.f64 b #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64)))))) (*.f64 (*.f64 y-scale y-scale) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (pow.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.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 #s(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/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 #s(literal 1/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 #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 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) (pow.f64 b #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale x-scale) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (pow.f64 b #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64))))))) (*.f64 (*.f64 x-scale x-scale) (+.f64 #s(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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 #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 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) (pow.f64 b #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale x-scale) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (pow.f64 b #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64)))))) (+.f64 (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) (pow.f64 b #s(literal 4 binary64))) (+.f64 (pow.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.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 #s(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/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 #s(literal 1/2 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 x-scale) (pow.f64 (+.f64 #s(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 (pow.f64 (+.f64 (pow.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.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 #s(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/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 #s(literal 1/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 b #s(literal 8 binary64))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1/2 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 #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 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) (pow.f64 b #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale x-scale) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (pow.f64 b #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64)))))) #s(literal -1/16 binary64)))) (*.f64 (*.f64 (*.f64 y-scale y-scale) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (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 #s(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/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (+.f64 (pow.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.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 #s(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/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 #s(literal 1/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 #s(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 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.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 #s(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/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 #s(literal 1/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 #s(literal 1/2 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 x-scale) (+.f64 #s(literal 1/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 (pow.f64 b #s(literal 4 binary64)) (*.f64 (+.f64 (pow.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.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 #s(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/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 #s(literal 1/2 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 #s(literal 1/4 binary64) (*.f64 (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) (pow.f64 b #s(literal 4 binary64))) (+.f64 (pow.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.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 #s(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/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 #s(literal 1/2 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 x-scale) (pow.f64 (+.f64 #s(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 (pow.f64 (+.f64 (pow.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.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 #s(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/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (+.f64 #s(literal 1/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 b #s(literal 8 binary64))) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1/2 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 #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 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) (pow.f64 b #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale x-scale) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (pow.f64 b #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64)))))) #s(literal -1/16 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 1/90 binary64) (*.f64 angle (PI.f64))))))) (+.f64 (/.f64 (*.f64 #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 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) (pow.f64 b #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale x-scale) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (pow.f64 b #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64)))))))))))))))) y-scale) |
(* (/ (sqrt 8) y-scale) (sqrt (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4)) (/ (* (pow b 4) (- (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (pow x-scale 2))))) |
(*.f64 (/.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale) (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (+.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)) (/.f64 #s(literal -1/2 binary64) (*.f64 x-scale x-scale))) (*.f64 x-scale x-scale)))))) |
(/ (+ (* 1/2 (* (/ (* (pow b 4) (* (sqrt 8) (- (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (* 1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4)) (/ (* (pow b 4) (- (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (pow x-scale 2))))))) (* (sqrt 8) (sqrt (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4)) (/ (* (pow b 4) (- (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (pow x-scale 2)))))) y-scale) |
(/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)))))) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (+.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)) (/.f64 #s(literal -1/2 binary64) (*.f64 x-scale x-scale))) (*.f64 x-scale x-scale)))))))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (+.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)) (/.f64 #s(literal -1/2 binary64) (*.f64 x-scale x-scale))) (*.f64 x-scale x-scale))))))) y-scale) |
(/ (+ (* 1/2 (* (/ (* (sqrt 8) (- (* -1/2 (/ (* (pow b 4) (- (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) 2) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 2))))) (* (pow x-scale 2) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) (* 1/4 (/ (* (pow b 8) (pow (- (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (* 1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) 2)) (* (pow x-scale 4) (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4)) (/ (* (pow b 4) (- (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (pow x-scale 2)))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4)) (/ (* (pow b 4) (- (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (pow x-scale 2))))))) (+ (* 1/2 (* (/ (* (pow b 4) (* (sqrt 8) (- (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (* 1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4)) (/ (* (pow b 4) (- (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (pow x-scale 2))))))) (* (sqrt 8) (sqrt (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4)) (/ (* (pow b 4) (- (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (pow x-scale 2))))))) y-scale) |
(/.f64 (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (+.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)) (/.f64 #s(literal -1/2 binary64) (*.f64 x-scale x-scale))) (*.f64 x-scale x-scale)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))))) (pow.f64 b #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale x-scale) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)))))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (+.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)) (/.f64 #s(literal -1/2 binary64) (*.f64 x-scale x-scale))) (*.f64 x-scale x-scale))))))))) (pow.f64 y-scale #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)))))) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (+.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)) (/.f64 #s(literal -1/2 binary64) (*.f64 x-scale x-scale))) (*.f64 x-scale x-scale))))))) y-scale) |
(/ (+ (* 1/2 (* (/ (* (sqrt 8) (- (* -1/2 (/ (* (pow b 4) (- (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) 2) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 2))))) (* (pow x-scale 2) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) (* 1/4 (/ (* (pow b 8) (pow (- (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (* 1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) 2)) (* (pow x-scale 4) (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4)) (/ (* (pow b 4) (- (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (pow x-scale 2)))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4)) (/ (* (pow b 4) (- (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (pow x-scale 2))))))) (+ (* 1/2 (* (/ (* (sqrt 8) (- (* 1/4 (/ (* (pow b 4) (* (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (- (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) 2) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 2)))))) (* (pow x-scale 2) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 3)))) (* 1/2 (/ (* (pow b 4) (* (- (* -1/2 (/ (* (pow b 4) (- (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) 2) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 2))))) (* (pow x-scale 2) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) (* 1/4 (/ (* (pow b 8) (pow (- (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (* 1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) 2)) (* (pow x-scale 4) (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4)) (/ (* (pow b 4) (- (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (pow x-scale 2))))))) (- (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (* 1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (* (pow x-scale 2) (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4)) (/ (* (pow b 4) (- (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (pow x-scale 2)))))))) (pow y-scale 6)) (sqrt (/ 1 (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4)) (/ (* (pow b 4) (- (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (pow x-scale 2))))))) (+ (* 1/2 (* (/ (* (pow b 4) (* (sqrt 8) (- (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (* 1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4)) (/ (* (pow b 4) (- (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (pow x-scale 2))))))) (* (sqrt 8) (sqrt (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4)) (/ (* (pow b 4) (- (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (pow x-scale 2)))))))) y-scale) |
(/.f64 (+.f64 (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (+.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)) (/.f64 #s(literal -1/2 binary64) (*.f64 x-scale x-scale))) (*.f64 x-scale x-scale)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))))) (pow.f64 b #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale x-scale) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)))))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (+.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)) (/.f64 #s(literal -1/2 binary64) (*.f64 x-scale x-scale))) (*.f64 x-scale x-scale))))))))) (pow.f64 y-scale #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)))))) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (+.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)) (/.f64 #s(literal -1/2 binary64) (*.f64 x-scale x-scale))) (*.f64 x-scale x-scale))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) (pow.f64 b #s(literal 4 binary64))) (+.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))))))) (*.f64 (*.f64 x-scale x-scale) (pow.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)) #s(literal 3 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)))))) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))))) (pow.f64 b #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale x-scale) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)))))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (+.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)) (/.f64 #s(literal -1/2 binary64) (*.f64 x-scale x-scale))) (*.f64 x-scale x-scale)))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (+.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)) (/.f64 #s(literal -1/2 binary64) (*.f64 x-scale x-scale))) (*.f64 x-scale x-scale))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (+.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)) (/.f64 #s(literal -1/2 binary64) (*.f64 x-scale x-scale))) (*.f64 x-scale x-scale))))))) (pow.f64 y-scale #s(literal 6 binary64))))) y-scale) |
(* -1 (* (/ (sqrt 8) y-scale) (sqrt (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4)) (/ (* (pow b 4) (- (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (pow x-scale 2)))))) |
(*.f64 (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (+.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)) (/.f64 #s(literal -1/2 binary64) (*.f64 x-scale x-scale))) (*.f64 x-scale x-scale))))) (neg.f64 (/.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale))) |
(* -1 (/ (+ (* 1/2 (* (/ (* (pow b 4) (* (sqrt 8) (- (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (* 1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4)) (/ (* (pow b 4) (- (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (pow x-scale 2))))))) (* (sqrt 8) (sqrt (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4)) (/ (* (pow b 4) (- (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (pow x-scale 2)))))) y-scale)) |
(/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)))))) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (+.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)) (/.f64 #s(literal -1/2 binary64) (*.f64 x-scale x-scale))) (*.f64 x-scale x-scale)))))))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (+.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)) (/.f64 #s(literal -1/2 binary64) (*.f64 x-scale x-scale))) (*.f64 x-scale x-scale))))))) (neg.f64 y-scale)) |
(* -1 (/ (+ (* 1/2 (* (/ (* (sqrt 8) (- (* -1/2 (/ (* (pow b 4) (- (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) 2) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 2))))) (* (pow x-scale 2) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) (* 1/4 (/ (* (pow b 8) (pow (- (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (* 1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) 2)) (* (pow x-scale 4) (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4)) (/ (* (pow b 4) (- (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (pow x-scale 2)))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4)) (/ (* (pow b 4) (- (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (pow x-scale 2))))))) (+ (* 1/2 (* (/ (* (pow b 4) (* (sqrt 8) (- (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (* 1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4)) (/ (* (pow b 4) (- (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (pow x-scale 2))))))) (* (sqrt 8) (sqrt (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4)) (/ (* (pow b 4) (- (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (pow x-scale 2))))))) y-scale)) |
(-.f64 #s(literal 0 binary64) (/.f64 (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (+.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)) (/.f64 #s(literal -1/2 binary64) (*.f64 x-scale x-scale))) (*.f64 x-scale x-scale)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))))) (pow.f64 b #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale x-scale) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)))))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (+.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)) (/.f64 #s(literal -1/2 binary64) (*.f64 x-scale x-scale))) (*.f64 x-scale x-scale))))))))) (pow.f64 y-scale #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)))))) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (+.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)) (/.f64 #s(literal -1/2 binary64) (*.f64 x-scale x-scale))) (*.f64 x-scale x-scale))))))) y-scale)) |
(* -1 (/ (+ (* 1/2 (* (/ (* (sqrt 8) (- (* -1/2 (/ (* (pow b 4) (- (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) 2) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 2))))) (* (pow x-scale 2) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) (* 1/4 (/ (* (pow b 8) (pow (- (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (* 1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) 2)) (* (pow x-scale 4) (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4)) (/ (* (pow b 4) (- (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (pow x-scale 2)))))))) (pow y-scale 4)) (sqrt (/ 1 (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4)) (/ (* (pow b 4) (- (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (pow x-scale 2))))))) (+ (* 1/2 (* (/ (* (sqrt 8) (- (* 1/4 (/ (* (pow b 4) (* (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (- (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) 2) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 2)))))) (* (pow x-scale 2) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 3)))) (* 1/2 (/ (* (pow b 4) (* (- (* -1/2 (/ (* (pow b 4) (- (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) 2) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))) 2))))) (* (pow x-scale 2) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) (* 1/4 (/ (* (pow b 8) (pow (- (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (* 1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))) 2)) (* (pow x-scale 4) (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4)) (/ (* (pow b 4) (- (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (pow x-scale 2))))))) (- (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (* 1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (* (pow x-scale 2) (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4)) (/ (* (pow b 4) (- (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (pow x-scale 2)))))))) (pow y-scale 6)) (sqrt (/ 1 (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4)) (/ (* (pow b 4) (- (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (pow x-scale 2))))))) (+ (* 1/2 (* (/ (* (pow b 4) (* (sqrt 8) (- (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (* 1/2 (/ (+ (* -2 (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (- (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))) (* (pow x-scale 2) (pow y-scale 2))) (sqrt (/ 1 (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4)) (/ (* (pow b 4) (- (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (pow x-scale 2))))))) (* (sqrt 8) (sqrt (+ (/ (* (pow b 4) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 4)) (/ (* (pow b 4) (- (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ 1 (pow x-scale 2))))) (pow x-scale 2)))))))) y-scale)) |
(/.f64 (+.f64 (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (+.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)) (/.f64 #s(literal -1/2 binary64) (*.f64 x-scale x-scale))) (*.f64 x-scale x-scale)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))))) (pow.f64 b #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale x-scale) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)))))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (+.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)) (/.f64 #s(literal -1/2 binary64) (*.f64 x-scale x-scale))) (*.f64 x-scale x-scale))))))))) (pow.f64 y-scale #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)))))) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (sqrt.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (+.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)) (/.f64 #s(literal -1/2 binary64) (*.f64 x-scale x-scale))) (*.f64 x-scale x-scale))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) (pow.f64 b #s(literal 4 binary64))) (+.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))))))) (*.f64 (*.f64 x-scale x-scale) (pow.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)) #s(literal 3 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)))))) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))))) (pow.f64 b #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale x-scale) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 8 binary64)) (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)))))) #s(literal 2 binary64))) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (+.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)) (/.f64 #s(literal -1/2 binary64) (*.f64 x-scale x-scale))) (*.f64 x-scale x-scale)))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (+.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)) (/.f64 #s(literal -1/2 binary64) (*.f64 x-scale x-scale))) (*.f64 x-scale x-scale))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64))) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (+.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)) (/.f64 #s(literal -1/2 binary64) (*.f64 x-scale x-scale))) (*.f64 x-scale x-scale))))))) (pow.f64 y-scale #s(literal 6 binary64))))) (neg.f64 y-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 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) |
(cos (* 1/180 (* angle (PI)))) |
(cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) |
(cos (* 1/180 (* angle (PI)))) |
(cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) |
(cos (* 1/180 (* angle (PI)))) |
(cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) |
(cos (* 1/180 (* angle (PI)))) |
(cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) |
(cos (* 1/180 (* angle (PI)))) |
(cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) |
(cos (* 1/180 (* angle (PI)))) |
(cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) |
(cos (* 1/180 (* angle (PI)))) |
(cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) |
(* 1/180 (* angle (PI))) |
(*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)) |
(* angle (+ (* -1/34992000 (* (pow angle 2) (pow (PI) 3))) (* 1/180 (PI)))) |
(*.f64 angle (+.f64 (*.f64 (*.f64 #s(literal -1/34992000 binary64) (*.f64 angle angle)) (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (PI.f64) #s(literal 1/180 binary64)))) |
(* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* 1/22674816000000 (* (pow angle 2) (pow (PI) 5))))))) |
(*.f64 angle (+.f64 (*.f64 (PI.f64) #s(literal 1/180 binary64)) (*.f64 (*.f64 angle angle) (+.f64 (*.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) #s(literal -1/34992000 binary64)) (*.f64 (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 angle angle)) (pow.f64 (PI.f64) #s(literal 5 binary64))))))) |
(* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* (pow angle 2) (+ (* -1/30855889612800000000 (* (pow angle 2) (pow (PI) 7))) (* 1/22674816000000 (pow (PI) 5)))))))) |
(*.f64 angle (+.f64 (*.f64 (PI.f64) #s(literal 1/180 binary64)) (*.f64 (*.f64 angle angle) (+.f64 (*.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) #s(literal -1/34992000 binary64)) (*.f64 (*.f64 angle angle) (+.f64 (*.f64 (*.f64 #s(literal -1/30855889612800000000 binary64) (*.f64 angle angle)) (pow.f64 (PI.f64) #s(literal 7 binary64))) (*.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) #s(literal 1/22674816000000 binary64)))))))) |
(sin (* 1/180 (* angle (PI)))) |
(sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) |
(sin (* 1/180 (* angle (PI)))) |
(sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) |
(sin (* 1/180 (* angle (PI)))) |
(sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) |
(sin (* 1/180 (* angle (PI)))) |
(sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) |
(sin (* 1/180 (* angle (PI)))) |
(sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) |
(sin (* 1/180 (* angle (PI)))) |
(sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) |
(sin (* 1/180 (* angle (PI)))) |
(sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) |
(sin (* 1/180 (* angle (PI)))) |
(sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) |
Compiled 199663 to 7710 computations (96.1% saved)
61 alts after pruning (60 fresh and 1 done)
| Pruned | Kept | Total | |
|---|---|---|---|
| New | 1467 | 32 | 1499 |
| Fresh | 11 | 28 | 39 |
| Picked | 5 | 0 | 5 |
| Done | 0 | 1 | 1 |
| Total | 1483 | 61 | 1544 |
| Status | Accuracy | Program |
|---|---|---|
| 2.0% | (/.f64 (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 b b) (*.f64 a (*.f64 a (*.f64 b b)))))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 (/.f64 #s(literal 1 binary64) x-scale) (*.f64 x-scale (*.f64 y-scale y-scale)))) | |
| 2.2% | (/.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 b b)))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 (*.f64 a (*.f64 (*.f64 a (*.f64 b b)) #s(literal 4 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) | |
| 4.8% | (/.f64 (*.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 b (*.f64 a b)))) (*.f64 y-scale y-scale)) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 b a)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) | |
| 2.4% | (/.f64 (*.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 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 b a)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) | |
| 6.4% | (/.f64 (*.f64 (/.f64 #s(literal 4 binary64) (*.f64 x-scale y-scale)) (/.f64 (*.f64 a (*.f64 a (*.f64 b (*.f64 a b)))) y-scale)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 b a)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) | |
| 3.8% | (/.f64 (*.f64 (*.f64 a (*.f64 a (*.f64 b (*.f64 a b)))) (/.f64 #s(literal 4 binary64) (*.f64 (*.f64 x-scale y-scale) y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 b a)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) | |
| 5.6% | (*.f64 (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 b (*.f64 a b)))) x-scale) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (/.f64 (*.f64 a (*.f64 b (*.f64 a b))) (*.f64 (*.f64 x-scale y-scale) y-scale)))) | |
| 5.3% | (*.f64 (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 b (*.f64 a b)))) x-scale) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 a b))))) (/.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) | |
| 4.8% | (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 a (*.f64 a a)) b) (*.f64 b #s(literal 4 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 a b))))) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) | |
| 2.9% | (*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 (*.f64 b b) #s(literal 4 binary64))) (*.f64 (*.f64 (*.f64 a a) b) (*.f64 b #s(literal 4 binary64)))) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) | |
| 4.2% | (*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 (*.f64 b b) #s(literal 4 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 a b))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) #s(literal 1 binary64)) (*.f64 y-scale (/.f64 (/.f64 #s(literal 1 binary64) x-scale) (*.f64 x-scale (*.f64 y-scale y-scale)))))) | |
| 3.1% | (*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 (*.f64 b b) #s(literal 4 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 a b))))) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 x-scale (*.f64 x-scale y-scale))) y-scale)) | |
| ▶ | 2.8% | (*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 (*.f64 b b) #s(literal 4 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 a b))))) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale y-scale))) x-scale) (*.f64 x-scale (*.f64 y-scale y-scale)))) |
| 6.3% | (*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 (*.f64 b b) #s(literal 4 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 a b))))) x-scale) | |
| 2.3% | (*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 b b) (*.f64 a (*.f64 a (*.f64 b b)))))) (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) | |
| 2.5% | (*.f64 (/.f64 (*.f64 (*.f64 a (exp.f64 (*.f64 (log.f64 a) #s(literal 2 binary64)))) (*.f64 (*.f64 b b) #s(literal 4 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 a b))))) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) | |
| 3.4% | (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 b b)))) (*.f64 #s(literal 4 binary64) a)) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 a (*.f64 b b)))) | |
| 2.4% | (*.f64 (/.f64 (*.f64 (exp.f64 (*.f64 (log.f64 a) #s(literal 3 binary64))) (*.f64 (*.f64 b b) #s(literal 4 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 a b))))) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) | |
| 3.0% | (*.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 (*.f64 a (*.f64 b b)) #s(literal 4 binary64)))) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 a b))))) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) | |
| 4.3% | (*.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 b (*.f64 a b)))) #s(literal 4 binary64)) (/.f64 (/.f64 #s(literal 4 binary64) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 (*.f64 a (*.f64 b (*.f64 a b))) (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) | |
| 5.2% | (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 a (*.f64 b (*.f64 a b)))) (/.f64 #s(literal 4 binary64) (*.f64 (*.f64 x-scale y-scale) y-scale))) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 a b))))) (*.f64 x-scale y-scale)) (*.f64 x-scale y-scale)) | |
| 4.2% | (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 b b)) (*.f64 #s(literal 4 binary64) a)) (/.f64 (*.f64 a (*.f64 a a)) (*.f64 a (*.f64 b b)))) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) | |
| 1.8% | (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale y-scale)) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (-.f64 (*.f64 b (*.f64 b (+.f64 (/.f64 (+.f64 #s(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/180 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 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 y-scale y-scale))))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b b) (*.f64 b b))) (+.f64 #s(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/180 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/180 binary64))))))) (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (+.f64 #s(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/180 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 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))))) | |
| 5.8% | (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.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 y-scale y-scale)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) | |
| 4.7% | (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))))) | |
| 3.9% | (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 a #s(literal 4 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))))) | |
| 0.2% | (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 a a))) (sqrt.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 y-scale y-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 (*.f64 (pow.f64 a #s(literal 6 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))))))) | |
| 0.6% | (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 a (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) (*.f64 b b))) (*.f64 (/.f64 (*.f64 (*.f64 b b) (sqrt.f64 #s(literal 8 binary64))) (*.f64 x-scale y-scale)) (sqrt.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (+.f64 (/.f64 #s(literal 3/2 binary64) (*.f64 y-scale y-scale)) (/.f64 #s(literal -1/2 binary64) (*.f64 x-scale x-scale))))))) | |
| 0.3% | (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 a (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) (*.f64 b b))) (sqrt.f64 (*.f64 #s(literal 8 binary64) (/.f64 (+.f64 (*.f64 (/.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 x-scale x-scale)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 b b) (*.f64 (*.f64 b b) (-.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.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 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (+.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64))))))))) (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) | |
| 0.3% | (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 a (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) (*.f64 b b))) (sqrt.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.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 (+.f64 #s(literal 1/2 binary64) (*.f64 #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 y-scale y-scale))))))) | |
| 9.1% | (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale b) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -2 binary64) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)))))) | |
| 8.5% | (*.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 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) | |
| ▶ | 10.8% | (*.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)))))) |
| 9.4% | (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))))))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) | |
| 1.3% | (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.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 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) | |
| 3.0% | (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.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 b b) (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 #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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))))))) | |
| 8.1% | (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (+.f64 (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)))))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))))) | |
| ▶ | 0.9% | (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (-.f64 (*.f64 (*.f64 b b) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (exp.f64 (*.f64 (log.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))) #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)))) #s(literal 2 binary64))))))) |
| 3.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 b b) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (cbrt.f64 (*.f64 (*.f64 (PI.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)))) #s(literal 2 binary64))))))) | |
| 2.9% | (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (-.f64 (*.f64 (*.f64 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 x-scale x-scale) (*.f64 y-scale y-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))))))) | |
| 4.6% | (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (+.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)))))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) | |
| 4.6% | (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.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 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (*.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))))))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) | |
| 4.5% | (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/64800 binary64) (*.f64 angle angle)) (*.f64 (PI.f64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) | |
| 4.5% | (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.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)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) | |
| 6.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 (*.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 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) #s(literal 2 binary64))))))))) | |
| 6.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 (*.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 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.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 #s(literal 1 binary64) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.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 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) | |
| 4.9% | (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.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 #s(literal 1 binary64) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) | |
| 6.0% | (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.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 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.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 #s(literal 1 binary64) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) | |
| 6.9% | (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 #s(literal 1 binary64) #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 #s(literal 1 binary64) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) | |
| 6.9% | (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (exp.f64 (*.f64 (log.f64 #s(literal 8 binary64)) #s(literal 1/2 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 (*.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 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.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 #s(literal 1 binary64) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) | |
| 3.4% | (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.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 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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)))))))) | |
| 2.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 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #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)))))))) | |
| 2.1% | (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 a (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) | |
| 6.6% | (*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.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 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))))) (/.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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 x-scale x-scale)) (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (*.f64 b b))))) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) x-scale) (/.f64 (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))) x-scale))))))))) | |
| 27.6% | (*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) | |
| ▶ | 32.5% | (*.f64 x-scale a) |
| 1.3% | (*.f64 b (+.f64 (*.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 a #s(literal 0 binary64))))) (*.f64 b x-scale))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) | |
| 13.0% | (*.f64 a (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) | |
| 0.8% | (*.f64 a (+.f64 (*.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) #s(literal 0 binary64)))) (*.f64 a x-scale))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))))) (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)))))))) | |
| ▶ | 32.5% | (*.f64 #s(literal 4 binary64) (*.f64 x-scale (*.f64 a #s(literal 1/4 binary64)))) |
| ✓ | 32.3% | (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
Compiled 11034 to 4384 computations (60.3% saved)
| 1× | egg-herbie |
Found 16 expressions of interest:
| New | Metric | Score | Program |
|---|---|---|---|
| ✓ | cost-diff | 0 | (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) |
| ✓ | cost-diff | 0 | (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (-.f64 (*.f64 (*.f64 b b) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (exp.f64 (*.f64 (log.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))) #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)))) #s(literal 2 binary64))))))) |
| ✓ | cost-diff | 128 | (*.f64 (log.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))) #s(literal 1 binary64)) |
| ✓ | cost-diff | 12800 | (exp.f64 (*.f64 (log.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))) #s(literal 1 binary64))) |
| ✓ | cost-diff | 0 | (*.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)))))) |
| ✓ | cost-diff | 128 | (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) |
| ✓ | cost-diff | 128 | (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) |
| ✓ | cost-diff | 26496 | (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) |
| ✓ | cost-diff | 0 | (*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 (*.f64 b b) #s(literal 4 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 a b))))) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale y-scale))) x-scale) (*.f64 x-scale (*.f64 y-scale y-scale)))) |
| ✓ | cost-diff | 256 | (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale y-scale))) x-scale) |
| ✓ | cost-diff | 640 | (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale y-scale))) x-scale) (*.f64 x-scale (*.f64 y-scale y-scale))) |
| ✓ | cost-diff | 1280 | (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 (*.f64 b b) #s(literal 4 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 a b))))) |
| ✓ | cost-diff | 0 | (*.f64 a #s(literal 1/4 binary64)) |
| ✓ | cost-diff | 0 | (*.f64 x-scale (*.f64 a #s(literal 1/4 binary64))) |
| ✓ | cost-diff | 256 | (*.f64 #s(literal 4 binary64) (*.f64 x-scale (*.f64 a #s(literal 1/4 binary64)))) |
| ✓ | cost-diff | 0 | (*.f64 x-scale a) |
| 5438× | *-lowering-*.f32 |
| 5438× | *-lowering-*.f64 |
| 3142× | /-lowering-/.f32 |
| 3142× | /-lowering-/.f64 |
| 1390× | fma-define |
Useful iterations: 4 (0.0ms)
| Iter | Nodes | Cost |
|---|---|---|
| 0 | 84 | 1205 |
| 1 | 248 | 1078 |
| 2 | 1053 | 1021 |
| 3 | 4366 | 962 |
| 4 | 5251 | 951 |
| 0 | 8138 | 951 |
| 1× | iter limit |
| 1× | node limit |
| Inputs |
|---|
(* x-scale a) |
x-scale |
a |
(* 4 (* x-scale (* a 1/4))) |
4 |
(* x-scale (* a 1/4)) |
x-scale |
(* a 1/4) |
a |
1/4 |
(* (/ (* (* a (* a a)) (* (* b b) 4)) (* 4 (* a (* b (* a b))))) (* (* (/ 1 (* x-scale (* y-scale y-scale))) x-scale) (* x-scale (* y-scale y-scale)))) |
(/ (* (* a (* a a)) (* (* b b) 4)) (* 4 (* a (* b (* a b))))) |
(* (* a (* a a)) (* (* b b) 4)) |
(* a (* a a)) |
a |
(* a a) |
(* (* b b) 4) |
(* b b) |
b |
4 |
(* 4 (* a (* b (* a b)))) |
(* a (* b (* a b))) |
(* b (* a b)) |
(* a b) |
(* (* (/ 1 (* x-scale (* y-scale y-scale))) x-scale) (* x-scale (* y-scale y-scale))) |
(* (/ 1 (* x-scale (* y-scale y-scale))) x-scale) |
(/ 1 (* x-scale (* y-scale y-scale))) |
1 |
(* x-scale (* y-scale y-scale)) |
x-scale |
(* y-scale y-scale) |
y-scale |
(* (* 1/4 (* (* a x-scale) (* y-scale (sqrt 8)))) (sqrt (+ (/ (pow (sin (* (* angle (PI)) 1/180)) 2) (* x-scale x-scale)) (/ (* -1/2 (* (/ (* (pow (cos (* (* angle (PI)) 1/180)) 2) (pow (sin (* (* angle (PI)) 1/180)) 2)) (* x-scale x-scale)) 2)) (pow (cos (* (* angle (PI)) 1/180)) 2))))) |
(* 1/4 (* (* a x-scale) (* y-scale (sqrt 8)))) |
1/4 |
(* (* a x-scale) (* y-scale (sqrt 8))) |
(* a x-scale) |
a |
x-scale |
(* y-scale (sqrt 8)) |
y-scale |
(sqrt 8) |
8 |
(sqrt (+ (/ (pow (sin (* (* angle (PI)) 1/180)) 2) (* x-scale x-scale)) (/ (* -1/2 (* (/ (* (pow (cos (* (* angle (PI)) 1/180)) 2) (pow (sin (* (* angle (PI)) 1/180)) 2)) (* x-scale x-scale)) 2)) (pow (cos (* (* angle (PI)) 1/180)) 2)))) |
(+ (/ (pow (sin (* (* angle (PI)) 1/180)) 2) (* x-scale x-scale)) (/ (* -1/2 (* (/ (* (pow (cos (* (* angle (PI)) 1/180)) 2) (pow (sin (* (* angle (PI)) 1/180)) 2)) (* x-scale x-scale)) 2)) (pow (cos (* (* angle (PI)) 1/180)) 2))) |
(/ (pow (sin (* (* angle (PI)) 1/180)) 2) (* x-scale x-scale)) |
(pow (sin (* (* angle (PI)) 1/180)) 2) |
(sin (* (* angle (PI)) 1/180)) |
(* (* angle (PI)) 1/180) |
(* angle (PI)) |
angle |
(PI) |
1/180 |
2 |
(* x-scale x-scale) |
(/ (* -1/2 (* (/ (* (pow (cos (* (* angle (PI)) 1/180)) 2) (pow (sin (* (* angle (PI)) 1/180)) 2)) (* x-scale x-scale)) 2)) (pow (cos (* (* angle (PI)) 1/180)) 2)) |
(* -1/2 (* (/ (* (pow (cos (* (* angle (PI)) 1/180)) 2) (pow (sin (* (* angle (PI)) 1/180)) 2)) (* x-scale x-scale)) 2)) |
-1/2 |
(* (/ (* (pow (cos (* (* angle (PI)) 1/180)) 2) (pow (sin (* (* angle (PI)) 1/180)) 2)) (* x-scale x-scale)) 2) |
(/ (* (pow (cos (* (* angle (PI)) 1/180)) 2) (pow (sin (* (* angle (PI)) 1/180)) 2)) (* x-scale x-scale)) |
(* (pow (cos (* (* angle (PI)) 1/180)) 2) (pow (sin (* (* angle (PI)) 1/180)) 2)) |
(pow (cos (* (* angle (PI)) 1/180)) 2) |
(cos (* (* angle (PI)) 1/180)) |
(* (* 1/4 (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (* (* b b) (+ (/ (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 b 4) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (* x-scale x-scale) (* y-scale y-scale))) (pow (* (* b b) (- (/ (pow (exp (* (log (cos (* (* angle (PI)) 1/180))) 1)) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)))) 2)))))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
1/4 |
(* x-scale (* y-scale (sqrt 8))) |
x-scale |
(* y-scale (sqrt 8)) |
y-scale |
(sqrt 8) |
8 |
(sqrt (- (* (* b b) (+ (/ (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 b 4) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (* x-scale x-scale) (* y-scale y-scale))) (pow (* (* b b) (- (/ (pow (exp (* (log (cos (* (* angle (PI)) 1/180))) 1)) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)))) 2))))) |
(- (* (* b b) (+ (/ (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 b 4) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (* x-scale x-scale) (* y-scale y-scale))) (pow (* (* b b) (- (/ (pow (exp (* (log (cos (* (* angle (PI)) 1/180))) 1)) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)))) 2)))) |
(* (* b b) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)))) |
(* b b) |
b |
(+ (/ (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 b 4) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (* x-scale x-scale) (* y-scale y-scale))) (pow (* (* b b) (- (/ (pow (exp (* (log (cos (* (* angle (PI)) 1/180))) 1)) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)))) 2))) |
(+ (/ (* 4 (* (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (* x-scale x-scale) (* y-scale y-scale))) (pow (* (* b b) (- (/ (pow (exp (* (log (cos (* (* angle (PI)) 1/180))) 1)) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)))) 2)) |
(/ (* 4 (* (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (* x-scale x-scale) (* y-scale y-scale))) |
(* 4 (* (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))) |
4 |
(* (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)) |
(* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 2)) |
(pow b 4) |
(* (* x-scale x-scale) (* y-scale y-scale)) |
(pow (* (* b b) (- (/ (pow (exp (* (log (cos (* (* angle (PI)) 1/180))) 1)) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)))) 2) |
(* (* b b) (- (/ (pow (exp (* (log (cos (* (* angle (PI)) 1/180))) 1)) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)))) |
(- (/ (pow (exp (* (log (cos (* (* angle (PI)) 1/180))) 1)) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) |
(/ (pow (exp (* (log (cos (* (* angle (PI)) 1/180))) 1)) 2) (* x-scale x-scale)) |
(pow (exp (* (log (cos (* (* angle (PI)) 1/180))) 1)) 2) |
(exp (* (log (cos (* (* angle (PI)) 1/180))) 1)) |
(* (log (cos (* (* angle (PI)) 1/180))) 1) |
(log (cos (* (* angle (PI)) 1/180))) |
(cos (* (* angle (PI)) 1/180)) |
(* (* angle (PI)) 1/180) |
1 |
| Outputs |
|---|
(* x-scale a) |
(*.f64 x-scale a) |
x-scale |
a |
(* 4 (* x-scale (* a 1/4))) |
(*.f64 x-scale a) |
4 |
#s(literal 4 binary64) |
(* x-scale (* a 1/4)) |
(*.f64 x-scale (*.f64 a #s(literal 1/4 binary64))) |
x-scale |
(* a 1/4) |
(*.f64 a #s(literal 1/4 binary64)) |
a |
1/4 |
#s(literal 1/4 binary64) |
(* (/ (* (* a (* a a)) (* (* b b) 4)) (* 4 (* a (* b (* a b))))) (* (* (/ 1 (* x-scale (* y-scale y-scale))) x-scale) (* x-scale (* y-scale y-scale)))) |
(*.f64 x-scale a) |
(/ (* (* a (* a a)) (* (* b b) 4)) (* 4 (* a (* b (* a b))))) |
a |
(* (* a (* a a)) (* (* b b) 4)) |
(*.f64 (*.f64 a a) (*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 b b)))) |
(* a (* a a)) |
(*.f64 a (*.f64 a a)) |
a |
(* a a) |
(*.f64 a a) |
(* (* 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 (* a b)))) |
(*.f64 a (*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 b b)))) |
(* a (* b (* a b))) |
(*.f64 a (*.f64 a (*.f64 b b))) |
(* b (* a b)) |
(*.f64 a (*.f64 b b)) |
(* a b) |
(*.f64 a b) |
(* (* (/ 1 (* x-scale (* y-scale y-scale))) x-scale) (* x-scale (* y-scale y-scale))) |
x-scale |
(* (/ 1 (* x-scale (* y-scale y-scale))) x-scale) |
(/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) |
(/ 1 (* x-scale (* y-scale y-scale))) |
(/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale y-scale))) |
1 |
#s(literal 1 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 |
(* (* 1/4 (* (* a x-scale) (* y-scale (sqrt 8)))) (sqrt (+ (/ (pow (sin (* (* angle (PI)) 1/180)) 2) (* x-scale x-scale)) (/ (* -1/2 (* (/ (* (pow (cos (* (* angle (PI)) 1/180)) 2) (pow (sin (* (* angle (PI)) 1/180)) 2)) (* x-scale x-scale)) 2)) (pow (cos (* (* angle (PI)) 1/180)) 2))))) |
(*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (*.f64 x-scale (*.f64 a #s(literal 1/4 binary64)))) (sqrt.f64 (-.f64 (/.f64 (pow.f64 (sin.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 x-scale x-scale))))) |
(* 1/4 (* (* a x-scale) (* y-scale (sqrt 8)))) |
(*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (*.f64 x-scale (*.f64 a #s(literal 1/4 binary64)))) |
1/4 |
#s(literal 1/4 binary64) |
(* (* a x-scale) (* y-scale (sqrt 8))) |
(*.f64 (*.f64 x-scale a) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) |
(* a x-scale) |
(*.f64 x-scale a) |
a |
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 (sin (* (* angle (PI)) 1/180)) 2) (* x-scale x-scale)) (/ (* -1/2 (* (/ (* (pow (cos (* (* angle (PI)) 1/180)) 2) (pow (sin (* (* angle (PI)) 1/180)) 2)) (* x-scale x-scale)) 2)) (pow (cos (* (* angle (PI)) 1/180)) 2)))) |
(sqrt.f64 (-.f64 (/.f64 (pow.f64 (sin.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 x-scale x-scale)))) |
(+ (/ (pow (sin (* (* angle (PI)) 1/180)) 2) (* x-scale x-scale)) (/ (* -1/2 (* (/ (* (pow (cos (* (* angle (PI)) 1/180)) 2) (pow (sin (* (* angle (PI)) 1/180)) 2)) (* x-scale x-scale)) 2)) (pow (cos (* (* angle (PI)) 1/180)) 2))) |
(-.f64 (/.f64 (pow.f64 (sin.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 x-scale x-scale))) |
(/ (pow (sin (* (* angle (PI)) 1/180)) 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 (* (* angle (PI)) 1/180)) 2) |
(pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) |
(sin (* (* angle (PI)) 1/180)) |
(sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) |
(* (* angle (PI)) 1/180) |
(*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))) |
(* angle (PI)) |
(*.f64 angle (PI.f64)) |
angle |
(PI) |
(PI.f64) |
1/180 |
#s(literal 1/180 binary64) |
2 |
#s(literal 2 binary64) |
(* x-scale x-scale) |
(*.f64 x-scale x-scale) |
(/ (* -1/2 (* (/ (* (pow (cos (* (* angle (PI)) 1/180)) 2) (pow (sin (* (* angle (PI)) 1/180)) 2)) (* x-scale x-scale)) 2)) (pow (cos (* (* angle (PI)) 1/180)) 2)) |
(/.f64 (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))) |
(* -1/2 (* (/ (* (pow (cos (* (* angle (PI)) 1/180)) 2) (pow (sin (* (* angle (PI)) 1/180)) 2)) (* x-scale x-scale)) 2)) |
(/.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))) |
-1/2 |
#s(literal -1/2 binary64) |
(* (/ (* (pow (cos (* (* angle (PI)) 1/180)) 2) (pow (sin (* (* angle (PI)) 1/180)) 2)) (* x-scale x-scale)) 2) |
(*.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 2 binary64) (*.f64 x-scale x-scale))) |
(/ (* (pow (cos (* (* angle (PI)) 1/180)) 2) (pow (sin (* (* angle (PI)) 1/180)) 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 (cos (* (* angle (PI)) 1/180)) 2) (pow (sin (* (* angle (PI)) 1/180)) 2)) |
(*.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))) |
(pow (cos (* (* angle (PI)) 1/180)) 2) |
(pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) |
(cos (* (* angle (PI)) 1/180)) |
(cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) |
(* (* 1/4 (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (* (* b b) (+ (/ (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 b 4) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (* x-scale x-scale) (* y-scale y-scale))) (pow (* (* b b) (- (/ (pow (exp (* (log (cos (* (* angle (PI)) 1/180))) 1)) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)))) 2)))))) |
(*.f64 (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale y-scale))) (sqrt.f64 (-.f64 (*.f64 (*.f64 b b) (+.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)))) (sqrt.f64 (+.f64 (/.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 4 binary64) (pow.f64 b #s(literal 4 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (*.f64 (*.f64 b b) (-.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 (* x-scale (* y-scale (sqrt 8)))) |
(*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale y-scale))) |
1/4 |
#s(literal 1/4 binary64) |
(* x-scale (* y-scale (sqrt 8))) |
(*.f64 y-scale (*.f64 x-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 (- (* (* b b) (+ (/ (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 b 4) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (* x-scale x-scale) (* y-scale y-scale))) (pow (* (* b b) (- (/ (pow (exp (* (log (cos (* (* angle (PI)) 1/180))) 1)) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)))) 2))))) |
(sqrt.f64 (-.f64 (*.f64 (*.f64 b b) (+.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)))) (sqrt.f64 (+.f64 (/.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 4 binary64) (pow.f64 b #s(literal 4 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (*.f64 (*.f64 b b) (-.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)))))) |
(- (* (* b b) (+ (/ (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 b 4) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (* x-scale x-scale) (* y-scale y-scale))) (pow (* (* b b) (- (/ (pow (exp (* (log (cos (* (* angle (PI)) 1/180))) 1)) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)))) 2)))) |
(-.f64 (*.f64 (*.f64 b b) (+.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)))) (sqrt.f64 (+.f64 (/.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 4 binary64) (pow.f64 b #s(literal 4 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (*.f64 (*.f64 b b) (-.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))))) |
(* (* b b) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)))) |
(*.f64 (*.f64 b b) (+.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)))) |
(* b b) |
(*.f64 b b) |
b |
(+ (/ (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 b 4) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (* x-scale x-scale) (* y-scale y-scale))) (pow (* (* b b) (- (/ (pow (exp (* (log (cos (* (* angle (PI)) 1/180))) 1)) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)))) 2))) |
(sqrt.f64 (+.f64 (/.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 4 binary64) (pow.f64 b #s(literal 4 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (*.f64 (*.f64 b b) (-.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 b 4) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (* x-scale x-scale) (* y-scale y-scale))) (pow (* (* b b) (- (/ (pow (exp (* (log (cos (* (* angle (PI)) 1/180))) 1)) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)))) 2)) |
(+.f64 (/.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 4 binary64) (pow.f64 b #s(literal 4 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (*.f64 (*.f64 b b) (-.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 b 4) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (* x-scale x-scale) (* y-scale y-scale))) |
(/.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 4 binary64) (pow.f64 b #s(literal 4 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) |
(* 4 (* (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))) |
(*.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 4 binary64) (pow.f64 b #s(literal 4 binary64)))) |
4 |
#s(literal 4 binary64) |
(* (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 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)) (pow.f64 b #s(literal 4 binary64)))) |
(* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 2)) |
(*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (pow.f64 b #s(literal 4 binary64))) |
(pow b 4) |
(pow.f64 b #s(literal 4 binary64)) |
(* (* x-scale x-scale) (* y-scale y-scale)) |
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) |
(pow (* (* b b) (- (/ (pow (exp (* (log (cos (* (* angle (PI)) 1/180))) 1)) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)))) 2) |
(pow.f64 (*.f64 (*.f64 b b) (-.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)) |
(* (* b b) (- (/ (pow (exp (* (log (cos (* (* angle (PI)) 1/180))) 1)) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)))) |
(*.f64 (*.f64 b b) (-.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 (exp (* (log (cos (* (* angle (PI)) 1/180))) 1)) 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 (exp (* (log (cos (* (* angle (PI)) 1/180))) 1)) 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 (exp (* (log (cos (* (* angle (PI)) 1/180))) 1)) 2) |
(pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) |
(exp (* (log (cos (* (* angle (PI)) 1/180))) 1)) |
(cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) |
(* (log (cos (* (* angle (PI)) 1/180))) 1) |
(log.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) |
(log (cos (* (* angle (PI)) 1/180))) |
(log.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) |
(cos (* (* angle (PI)) 1/180)) |
(cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) |
(* (* angle (PI)) 1/180) |
(*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))) |
1 |
#s(literal 1 binary64) |
Found 16 expressions of interest:
| New | Metric | Score | Program |
|---|---|---|---|
| ✓ | accuracy | 100.0% | (exp.f64 (*.f64 (log.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))) #s(literal 1 binary64))) |
| ✓ | accuracy | 100.0% | (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) |
| ✓ | accuracy | 100.0% | (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
| ✓ | accuracy | 3.1% | (PI.f64) |
| ✓ | accuracy | 100.0% | (sqrt.f64 #s(literal 8 binary64)) |
| ✓ | accuracy | 100.0% | (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) |
| ✓ | accuracy | 100.0% | (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) |
| ✓ | accuracy | 3.1% | (PI.f64) |
| ✓ | accuracy | 100.0% | (*.f64 a (*.f64 a a)) |
| ✓ | accuracy | 100.0% | (*.f64 a b) |
| ✓ | accuracy | 100.0% | (*.f64 a a) |
| ✓ | accuracy | 100.0% | (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 a b)))) |
| ✓ | accuracy | 100.0% | (*.f64 x-scale (*.f64 a #s(literal 1/4 binary64))) |
| ✓ | accuracy | 100.0% | (*.f64 a #s(literal 1/4 binary64)) |
| ✓ | accuracy | 100.0% | (*.f64 #s(literal 4 binary64) (*.f64 x-scale (*.f64 a #s(literal 1/4 binary64)))) |
| ✓ | accuracy | 100.0% | (*.f64 x-scale a) |
| 4.6s | 187× | 5 | exit |
| 291.0ms | 58× | 1 | invalid |
| 14.0ms | 11× | 0 | invalid |
Compiled 1399 to 85 computations (93.9% saved)
ival-sin: 742.0ms (21.4% of total)ival-cos: 651.0ms (18.8% of total)ival-exp: 536.0ms (15.5% of total)ival-log: 444.0ms (12.8% of total)ival-mult: 318.0ms (9.2% of total)ival-div: 229.0ms (6.6% of total)backward-pass: 213.0ms (6.2% of total)ival-pow: 181.0ms (5.2% of total)...c/correct-round.rkt:119:19: 62.0ms (1.8% of total)ival-sqrt: 42.0ms (1.2% of total)ival-add: 20.0ms (0.6% of total)ival-sub: 13.0ms (0.4% of total)ival-pi: 5.0ms (0.1% of total)const: 5.0ms (0.1% of total)| Inputs |
|---|
#<alt (* x-scale a)> |
#<alt (* 4 (* x-scale (* a 1/4)))> |
#<alt (* x-scale (* a 1/4))> |
#<alt (* a 1/4)> |
#<alt (/ (* (* a (* a a)) (* (* b b) 4)) (* 4 (* a (* b (* a b)))))> |
#<alt (* (* (/ 1 (* x-scale (* y-scale y-scale))) x-scale) (* x-scale (* y-scale y-scale)))> |
#<alt (* (/ 1 (* x-scale (* y-scale y-scale))) x-scale)> |
#<alt (* (/ (* (* a (* a a)) (* (* b b) 4)) (* 4 (* a (* b (* a b))))) (* (* (/ 1 (* x-scale (* y-scale y-scale))) x-scale) (* x-scale (* y-scale y-scale))))> |
#<alt (/ (* -1/2 (* (/ (* (pow (cos (* (* angle (PI)) 1/180)) 2) (pow (sin (* (* angle (PI)) 1/180)) 2)) (* x-scale x-scale)) 2)) (pow (cos (* (* angle (PI)) 1/180)) 2))> |
#<alt (+ (/ (pow (sin (* (* angle (PI)) 1/180)) 2) (* x-scale x-scale)) (/ (* -1/2 (* (/ (* (pow (cos (* (* angle (PI)) 1/180)) 2) (pow (sin (* (* angle (PI)) 1/180)) 2)) (* x-scale x-scale)) 2)) (pow (cos (* (* angle (PI)) 1/180)) 2)))> |
#<alt (* -1/2 (* (/ (* (pow (cos (* (* angle (PI)) 1/180)) 2) (pow (sin (* (* angle (PI)) 1/180)) 2)) (* x-scale x-scale)) 2))> |
#<alt (* (* 1/4 (* (* a x-scale) (* y-scale (sqrt 8)))) (sqrt (+ (/ (pow (sin (* (* angle (PI)) 1/180)) 2) (* x-scale x-scale)) (/ (* -1/2 (* (/ (* (pow (cos (* (* angle (PI)) 1/180)) 2) (pow (sin (* (* angle (PI)) 1/180)) 2)) (* x-scale x-scale)) 2)) (pow (cos (* (* angle (PI)) 1/180)) 2)))))> |
#<alt (exp (* (log (cos (* (* angle (PI)) 1/180))) 1))> |
#<alt (* (log (cos (* (* angle (PI)) 1/180))) 1)> |
#<alt (* (* 1/4 (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (* (* b b) (+ (/ (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 b 4) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (* x-scale x-scale) (* y-scale y-scale))) (pow (* (* b b) (- (/ (pow (exp (* (log (cos (* (* angle (PI)) 1/180))) 1)) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)))) 2))))))> |
#<alt (* 1/4 (* x-scale (* y-scale (sqrt 8))))> |
#<alt (* 4 (* a (* b (* a b))))> |
#<alt (* a a)> |
#<alt (* a b)> |
#<alt (* a (* a a))> |
#<alt (PI)> |
#<alt (cos (* (* angle (PI)) 1/180))> |
#<alt (sin (* (* angle (PI)) 1/180))> |
#<alt (sqrt 8)> |
#<alt (cos (* 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 (* a x-scale)> |
#<alt (* a x-scale)> |
#<alt (* a x-scale)> |
#<alt (* a x-scale)> |
#<alt (* a x-scale)> |
#<alt (* a x-scale)> |
#<alt (* a x-scale)> |
#<alt (* a x-scale)> |
#<alt (* a x-scale)> |
#<alt (* a x-scale)> |
#<alt (* a x-scale)> |
#<alt (* a x-scale)> |
#<alt (* a x-scale)> |
#<alt (* a x-scale)> |
#<alt (* a x-scale)> |
#<alt (* a x-scale)> |
#<alt (* a x-scale)> |
#<alt (* a x-scale)> |
#<alt (* 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 (* 1/4 a)> |
#<alt (* 1/4 a)> |
#<alt (* 1/4 a)> |
#<alt (* 1/4 a)> |
#<alt (* 1/4 a)> |
#<alt (* 1/4 a)> |
#<alt (* 1/4 a)> |
#<alt (* 1/4 a)> |
#<alt (* 1/4 a)> |
#<alt (* 1/4 a)> |
#<alt (* 1/4 a)> |
#<alt (* 1/4 a)> |
#<alt a> |
#<alt a> |
#<alt a> |
#<alt a> |
#<alt a> |
#<alt a> |
#<alt a> |
#<alt a> |
#<alt a> |
#<alt a> |
#<alt a> |
#<alt a> |
#<alt a> |
#<alt a> |
#<alt a> |
#<alt a> |
#<alt a> |
#<alt a> |
#<alt a> |
#<alt a> |
#<alt a> |
#<alt a> |
#<alt a> |
#<alt a> |
#<alt x-scale> |
#<alt x-scale> |
#<alt x-scale> |
#<alt x-scale> |
#<alt x-scale> |
#<alt x-scale> |
#<alt x-scale> |
#<alt x-scale> |
#<alt x-scale> |
#<alt x-scale> |
#<alt x-scale> |
#<alt x-scale> |
#<alt x-scale> |
#<alt x-scale> |
#<alt x-scale> |
#<alt x-scale> |
#<alt x-scale> |
#<alt x-scale> |
#<alt x-scale> |
#<alt x-scale> |
#<alt x-scale> |
#<alt x-scale> |
#<alt x-scale> |
#<alt x-scale> |
#<alt (/ 1 (pow y-scale 2))> |
#<alt (/ 1 (pow y-scale 2))> |
#<alt (/ 1 (pow y-scale 2))> |
#<alt (/ 1 (pow y-scale 2))> |
#<alt (/ 1 (pow y-scale 2))> |
#<alt (/ 1 (pow y-scale 2))> |
#<alt (/ 1 (pow y-scale 2))> |
#<alt (/ 1 (pow y-scale 2))> |
#<alt (/ 1 (pow y-scale 2))> |
#<alt (/ 1 (pow y-scale 2))> |
#<alt (/ 1 (pow y-scale 2))> |
#<alt (/ 1 (pow y-scale 2))> |
#<alt (/ 1 (pow y-scale 2))> |
#<alt (/ 1 (pow y-scale 2))> |
#<alt (/ 1 (pow y-scale 2))> |
#<alt (/ 1 (pow y-scale 2))> |
#<alt (/ 1 (pow y-scale 2))> |
#<alt (/ 1 (pow y-scale 2))> |
#<alt (/ 1 (pow y-scale 2))> |
#<alt (/ 1 (pow y-scale 2))> |
#<alt (/ 1 (pow y-scale 2))> |
#<alt (/ 1 (pow y-scale 2))> |
#<alt (/ 1 (pow y-scale 2))> |
#<alt (/ 1 (pow y-scale 2))> |
#<alt (* a x-scale)> |
#<alt (* a x-scale)> |
#<alt (* a x-scale)> |
#<alt (* a x-scale)> |
#<alt (* a x-scale)> |
#<alt (* a x-scale)> |
#<alt (* a x-scale)> |
#<alt (* a x-scale)> |
#<alt (* a x-scale)> |
#<alt (* a x-scale)> |
#<alt (* a x-scale)> |
#<alt (* a x-scale)> |
#<alt (* a x-scale)> |
#<alt (* a x-scale)> |
#<alt (* a x-scale)> |
#<alt (* a x-scale)> |
#<alt (* a x-scale)> |
#<alt (* a x-scale)> |
#<alt (* a x-scale)> |
#<alt (* a x-scale)> |
#<alt (* a x-scale)> |
#<alt (* a x-scale)> |
#<alt (* a x-scale)> |
#<alt (* a x-scale)> |
#<alt (* a x-scale)> |
#<alt (* a x-scale)> |
#<alt (* a x-scale)> |
#<alt (* a x-scale)> |
#<alt (* a x-scale)> |
#<alt (* a x-scale)> |
#<alt (* a x-scale)> |
#<alt (* a x-scale)> |
#<alt (* a x-scale)> |
#<alt (* a x-scale)> |
#<alt (* a x-scale)> |
#<alt (* a x-scale)> |
#<alt (* a x-scale)> |
#<alt (* a x-scale)> |
#<alt (* a x-scale)> |
#<alt (* a x-scale)> |
#<alt (* a x-scale)> |
#<alt (* a x-scale)> |
#<alt (* a x-scale)> |
#<alt (* a x-scale)> |
#<alt (* a x-scale)> |
#<alt (* a x-scale)> |
#<alt (* a x-scale)> |
#<alt (* a x-scale)> |
#<alt (* -1/32400 (/ (* (pow angle 2) (pow (PI) 2)) (pow x-scale 2)))> |
#<alt (* (pow angle 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow angle 2) (pow (PI) 4)) (pow x-scale 2)))))> |
#<alt (* (pow angle 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* (pow angle 2) (+ (* -1 (* (pow angle 2) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2)))))) (* 1/3149280000 (/ (pow (PI) 4) (pow x-scale 2)))))))> |
#<alt (* (pow angle 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* (pow angle 2) (+ (* 1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* (pow angle 2) (+ (* -1 (* (pow angle 2) (+ (* -1/396718580736000000000 (/ (pow (PI) 8) (pow x-scale 2))) (* -1/2777030065152000000000 (/ (pow (PI) 8) (pow x-scale 2)))))) (* -1 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2)))))))))))> |
#<alt (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))> |
#<alt (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))> |
#<alt (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))> |
#<alt (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))> |
#<alt (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))> |
#<alt (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))> |
#<alt (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))> |
#<alt (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))> |
#<alt (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))> |
#<alt (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))> |
#<alt (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))> |
#<alt (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))> |
#<alt (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))> |
#<alt (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))> |
#<alt (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))> |
#<alt (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))> |
#<alt (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))> |
#<alt (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))> |
#<alt (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))> |
#<alt (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))> |
#<alt (* (pow angle 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2)))))> |
#<alt (* (pow angle 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* (pow angle 2) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))))))))> |
#<alt (* (pow angle 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* (pow angle 2) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* (pow angle 2) (+ (* -1 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))))) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))))))))))))> |
#<alt (* (pow angle 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* (pow angle 2) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* (pow angle 2) (+ (* -1 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))))) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))) (* (pow angle 2) (+ (* -1 (+ (* -1/396718580736000000000 (/ (pow (PI) 8) (pow x-scale 2))) (* -1/2777030065152000000000 (/ (pow (PI) 8) (pow x-scale 2))))) (+ (* -1/396718580736000000000 (/ (pow (PI) 8) (pow x-scale 2))) (* -1/2777030065152000000000 (/ (pow (PI) 8) (pow x-scale 2))))))))))))))))> |
#<alt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))> |
#<alt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))> |
#<alt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))> |
#<alt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))> |
#<alt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))> |
#<alt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))> |
#<alt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))> |
#<alt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))> |
#<alt (/ (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))> |
#<alt (/ (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))> |
#<alt (/ (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))> |
#<alt (/ (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))> |
#<alt (/ (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))> |
#<alt (/ (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))> |
#<alt (/ (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))> |
#<alt (/ (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))> |
#<alt (/ (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))> |
#<alt (/ (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))> |
#<alt (/ (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))> |
#<alt (/ (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))> |
#<alt (* -1/32400 (/ (* (pow angle 2) (pow (PI) 2)) (pow x-scale 2)))> |
#<alt (* (pow angle 2) (+ (* -1 (* (pow angle 2) (+ (* -1/1049760000 (/ (pow (PI) 4) (pow x-scale 2))) (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2)))))) (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2)))))> |
#<alt (* (pow angle 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* (pow angle 2) (+ (* -1 (* (pow angle 2) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* 1/102036672000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))))) (* -1 (+ (* -1/1049760000 (/ (pow (PI) 4) (pow x-scale 2))) (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2)))))))))> |
#<alt (* (pow angle 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* (pow angle 2) (+ (* -1 (+ (* -1/1049760000 (/ (pow (PI) 4) (pow x-scale 2))) (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))))) (* (pow angle 2) (+ (* -1 (* (pow angle 2) (+ (* -1/32400 (/ (* (pow (PI) 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/396718580736000000000 (/ (pow (PI) 8) (pow x-scale 2))) (+ (* -1/2777030065152000000000 (/ (pow (PI) 8) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))))))))) (* -1 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* 1/102036672000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))))))))))> |
#<alt (* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))> |
#<alt (* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))> |
#<alt (* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))> |
#<alt (* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))> |
#<alt (* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))> |
#<alt (* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))> |
#<alt (* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))> |
#<alt (* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))> |
#<alt (* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))> |
#<alt (* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))> |
#<alt (* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))> |
#<alt (* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))> |
#<alt (* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))> |
#<alt (* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))> |
#<alt (* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))> |
#<alt (* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))> |
#<alt (* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))> |
#<alt (* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))> |
#<alt (* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))> |
#<alt (* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))> |
#<alt (* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))> |
#<alt (* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))> |
#<alt (* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))> |
#<alt (* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))> |
#<alt (* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))> |
#<alt (* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))> |
#<alt (* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))> |
#<alt (* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))> |
#<alt (* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))> |
#<alt (* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))> |
#<alt (* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))> |
#<alt (* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))> |
#<alt (* 1/4 (* (* a (* y-scale (sqrt 8))) (sqrt (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)))))> |
#<alt (* 1/4 (* (* a (* y-scale (sqrt 8))) (sqrt (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)))))> |
#<alt (* 1/4 (* (* a (* y-scale (sqrt 8))) (sqrt (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)))))> |
#<alt (* 1/4 (* (* a (* y-scale (sqrt 8))) (sqrt (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)))))> |
#<alt (* 1/4 (* (* a (* y-scale (sqrt 8))) (sqrt (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)))))> |
#<alt (* 1/4 (* (* a (* y-scale (sqrt 8))) (sqrt (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)))))> |
#<alt (* 1/4 (* (* a (* y-scale (sqrt 8))) (sqrt (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)))))> |
#<alt (* 1/4 (* (* a (* y-scale (sqrt 8))) (sqrt (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)))))> |
#<alt (* -1/4 (* (* a (* y-scale (sqrt 8))) (sqrt (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)))))> |
#<alt (* -1/4 (* (* a (* y-scale (sqrt 8))) (sqrt (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)))))> |
#<alt (* -1/4 (* (* a (* y-scale (sqrt 8))) (sqrt (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)))))> |
#<alt (* -1/4 (* (* a (* y-scale (sqrt 8))) (sqrt (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)))))> |
#<alt (* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))> |
#<alt (* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))> |
#<alt (* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))> |
#<alt (* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))> |
#<alt (* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))> |
#<alt (* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))> |
#<alt (* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))> |
#<alt (* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))> |
#<alt (* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))> |
#<alt (* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))> |
#<alt (* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))> |
#<alt (* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))> |
#<alt (* 1/4 (* (* a (* angle (* x-scale (* y-scale (sqrt 8))))) (sqrt (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2)))))))> |
#<alt (* angle (+ (* 1/8 (* (* a (* (pow angle 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))))))))) (sqrt (/ 1 (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2)))))))) (* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2)))))))))> |
#<alt (* angle (+ (* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))))))) (* (pow angle 2) (+ (* 1/8 (* (* a (* x-scale (* y-scale (* (sqrt 8) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/3149280000 (/ (pow (PI) 4) (pow x-scale 2)))))))) (sqrt (/ 1 (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2)))))))) (* 1/8 (* (* a (* (pow angle 2) (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))))) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/3149280000 (/ (pow (PI) 4) (pow x-scale 2)))) 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2)))))))))))) (sqrt (/ 1 (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))))))))))))> |
#<alt (* angle (+ (* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))))))) (* (pow angle 2) (+ (* 1/8 (* (* a (* x-scale (* y-scale (* (sqrt 8) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/3149280000 (/ (pow (PI) 4) (pow x-scale 2)))))))) (sqrt (/ 1 (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2)))))))) (* (pow angle 2) (+ (* 1/8 (* (* a (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))))) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/3149280000 (/ (pow (PI) 4) (pow x-scale 2)))) 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))))))))))) (sqrt (/ 1 (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2)))))))) (* 1/8 (* (* a (* (pow angle 2) (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1 (+ (* -1/396718580736000000000 (/ (pow (PI) 8) (pow x-scale 2))) (* -1/2777030065152000000000 (/ (pow (PI) 8) (pow x-scale 2))))) (+ (* -1/396718580736000000000 (/ (pow (PI) 8) (pow x-scale 2))) (* -1/2777030065152000000000 (/ (pow (PI) 8) (pow x-scale 2))))) (* 1/2 (/ (* (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/3149280000 (/ (pow (PI) 4) (pow x-scale 2)))) (- (+ (* -1 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))))) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/3149280000 (/ (pow (PI) 4) (pow x-scale 2)))) 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2)))))))) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2)))))))))))) (sqrt (/ 1 (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))))))))))))))> |
#<alt (* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))> |
#<alt (* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))> |
#<alt (* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))> |
#<alt (* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))> |
#<alt (* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))> |
#<alt (* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))> |
#<alt (* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))> |
#<alt (* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))> |
#<alt 1> |
#<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/64800 (* (pow angle 2) (pow (PI) 2)))> |
#<alt (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* 1/24 (* (pow angle 2) (+ (* -1/349920000 (pow (PI) 4)) (* 1/1049760000 (pow (PI) 4)))))))> |
#<alt (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* (pow angle 2) (+ (* 1/720 (* (pow angle 2) (+ (* -1/1133740800000 (pow (PI) 6)) (+ (* -1/34012224000000 (pow (PI) 6)) (* 1/2267481600000 (pow (PI) 6)))))) (* 1/24 (+ (* -1/349920000 (pow (PI) 4)) (* 1/1049760000 (pow (PI) 4))))))))> |
#<alt (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* (pow angle 2) (+ (* 1/24 (+ (* -1/349920000 (pow (PI) 4)) (* 1/1049760000 (pow (PI) 4)))) (* (pow angle 2) (+ (* 1/40320 (* (pow angle 2) (+ (* -7/12244400640000000 (pow (PI) 8)) (+ (* -7/220399211520000000 (pow (PI) 8)) (+ (* -7/275499014400000000 (pow (PI) 8)) (+ (* 1/1101996057600000000 (pow (PI) 8)) (* 7/18366600960000000 (pow (PI) 8)))))))) (* 1/720 (+ (* -1/1133740800000 (pow (PI) 6)) (+ (* -1/34012224000000 (pow (PI) 6)) (* 1/2267481600000 (pow (PI) 6)))))))))))> |
#<alt (log (cos (* 1/180 (* angle (PI)))))> |
#<alt (log (cos (* 1/180 (* angle (PI)))))> |
#<alt (log (cos (* 1/180 (* angle (PI)))))> |
#<alt (log (cos (* 1/180 (* angle (PI)))))> |
#<alt (log (cos (* 1/180 (* angle (PI)))))> |
#<alt (log (cos (* 1/180 (* angle (PI)))))> |
#<alt (log (cos (* 1/180 (* angle (PI)))))> |
#<alt (log (cos (* 1/180 (* angle (PI)))))> |
#<alt (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))> |
#<alt (* x-scale (+ (* -1/16 (* (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (sqrt (/ 1 (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))> |
#<alt (* x-scale (+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (* (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 b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 6) (pow (cos (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (pow (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) 2) (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))))) (sqrt (/ 1 (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))) (* -1/16 (* (/ (* y-scale (* (sqrt 8) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (sqrt (/ 1 (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))))))> |
#<alt (* x-scale (+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* (pow x-scale 2) (+ (* -1/16 (* (/ (* y-scale (* (sqrt 8) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (sqrt (/ 1 (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))) (* (pow x-scale 2) (+ (* -1/8 (* (* y-scale (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 6) (pow (cos (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (pow (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) 2) (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))))) (sqrt (/ 1 (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (* (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 b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 8) (pow (cos (* 1/180 (* angle (PI)))) 8)))) (* 1/4 (/ (pow (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) 2) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* 1/4 (/ (* (+ (* -1/4 (/ (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 6) (pow (cos (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (pow (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) 2) (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))))) (sqrt (/ 1 (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))))))))> |
#<alt (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))> |
#<alt (+ (* -1/16 (* (/ (* (pow y-scale 3) (* (sqrt 8) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 2) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (sqrt (/ 1 (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))> |
#<alt (+ (* -1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* -1/4 (/ (* (pow y-scale 6) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (* (pow y-scale 4) (pow (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) 2)) (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))))) (pow x-scale 4)) (sqrt (/ 1 (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (+ (* -1/16 (* (/ (* (pow y-scale 3) (* (sqrt 8) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 2) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (sqrt (/ 1 (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))> |
#<alt (+ (* -1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* -1/2 (/ (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow y-scale 8) (* (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 8) (pow (sin (* 1/180 (* angle (PI)))) 8)))) (* 1/4 (/ (* (pow y-scale 4) (pow (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* 1/4 (/ (* (pow y-scale 2) (* (+ (* -1/4 (/ (* (pow y-scale 6) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (* (pow y-scale 4) (pow (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) 2)) (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))))) (pow x-scale 6)) (sqrt (/ 1 (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (+ (* -1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* -1/4 (/ (* (pow y-scale 6) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (* (pow y-scale 4) (pow (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) 2)) (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))))) (pow x-scale 4)) (sqrt (/ 1 (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (+ (* -1/16 (* (/ (* (pow y-scale 3) (* (sqrt 8) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 2) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (sqrt (/ 1 (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))))> |
#<alt (* -1/4 (* (* y-scale (sqrt 8)) (sqrt (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))> |
#<alt (+ (* -1/4 (* (* y-scale (sqrt 8)) (sqrt (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/16 (* (/ (* (pow y-scale 3) (* (sqrt 8) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 2) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (sqrt (/ 1 (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))> |
#<alt (+ (* -1/4 (* (* y-scale (sqrt 8)) (sqrt (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (+ (* 1/16 (* (/ (* (pow y-scale 3) (* (sqrt 8) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 2) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (sqrt (/ 1 (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* -1/4 (/ (* (pow y-scale 6) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (* (pow y-scale 4) (pow (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) 2)) (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))))) (pow x-scale 4)) (sqrt (/ 1 (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))))> |
#<alt (+ (* -1/4 (* (* y-scale (sqrt 8)) (sqrt (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (+ (* 1/16 (* (/ (* (pow y-scale 3) (* (sqrt 8) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 2) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (sqrt (/ 1 (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* -1/2 (/ (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow y-scale 8) (* (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 8) (pow (sin (* 1/180 (* angle (PI)))) 8)))) (* 1/4 (/ (* (pow y-scale 4) (pow (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* 1/4 (/ (* (pow y-scale 2) (* (+ (* -1/4 (/ (* (pow y-scale 6) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (* (pow y-scale 4) (pow (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) 2)) (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))))) (pow x-scale 6)) (sqrt (/ 1 (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* -1/4 (/ (* (pow y-scale 6) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (* (pow y-scale 4) (pow (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) 2)) (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))))) (pow x-scale 4)) (sqrt (/ 1 (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 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)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))> |
#<alt (* y-scale (+ (* -1/16 (* (/ (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (/ 1 (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))> |
#<alt (* y-scale (+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* (pow y-scale 2) (+ (* -1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (pow (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) 2) (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))))) (sqrt (/ 1 (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (* -1/16 (* (/ (* x-scale (* (sqrt 8) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (/ 1 (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))))))> |
#<alt (* y-scale (+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* (pow y-scale 2) (+ (* -1/16 (* (/ (* x-scale (* (sqrt 8) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (/ 1 (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (* (pow y-scale 2) (+ (* -1/8 (* (* x-scale (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (pow (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) 2) (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))))) (sqrt (/ 1 (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (* -1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (+ (* -1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 8) (pow (sin (* 1/180 (* angle (PI)))) 8)))) (* 1/4 (/ (pow (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) 2) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* 1/4 (/ (* (+ (* -1/4 (/ (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (pow (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) 2) (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))))) (sqrt (/ 1 (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))))))))> |
#<alt (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (- (* (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))))))))> |
#<alt (+ (* -1/16 (* (/ (* (pow x-scale 3) (* (sqrt 8) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 2) (* (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (sqrt (/ 1 (- (* (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))))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (- (* (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)))))))))> |
#<alt (+ (* -1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* -1/4 (/ (* (pow x-scale 6) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 6) (pow (cos (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 4) (pow (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) 2)) (* (pow b 4) (* (pow (cos (* 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 b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))))) (pow y-scale 4)) (sqrt (/ 1 (- (* (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))))))))) (+ (* -1/16 (* (/ (* (pow x-scale 3) (* (sqrt 8) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 2) (* (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (sqrt (/ 1 (- (* (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))))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (- (* (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))))))))))> |
#<alt (+ (* -1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 8) (* (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 8) (pow (cos (* 1/180 (* angle (PI)))) 8)))) (* 1/4 (/ (* (pow x-scale 4) (pow (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* 1/4 (/ (* (pow x-scale 2) (* (+ (* -1/4 (/ (* (pow x-scale 6) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 6) (pow (cos (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 4) (pow (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) 2)) (* (pow b 4) (* (pow (cos (* 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 b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 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 (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 y-scale 6)) (sqrt (/ 1 (- (* (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))))))))) (+ (* -1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* -1/4 (/ (* (pow x-scale 6) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 6) (pow (cos (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 4) (pow (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) 2)) (* (pow b 4) (* (pow (cos (* 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 b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))))) (pow y-scale 4)) (sqrt (/ 1 (- (* (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))))))))) (+ (* -1/16 (* (/ (* (pow x-scale 3) (* (sqrt 8) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 2) (* (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (sqrt (/ 1 (- (* (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))))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (- (* (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)))))))))))> |
#<alt (* -1/4 (* (* x-scale (sqrt 8)) (sqrt (- (* (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))))))))> |
#<alt (+ (* -1/4 (* (* x-scale (sqrt 8)) (sqrt (- (* (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)))))))) (* 1/16 (* (/ (* (pow x-scale 3) (* (sqrt 8) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 2) (* (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (sqrt (/ 1 (- (* (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))))))))))> |
#<alt (+ (* -1/4 (* (* x-scale (sqrt 8)) (sqrt (- (* (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)))))))) (+ (* 1/16 (* (/ (* (pow x-scale 3) (* (sqrt 8) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 2) (* (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (sqrt (/ 1 (- (* (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))))))))) (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* -1/4 (/ (* (pow x-scale 6) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 6) (pow (cos (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 4) (pow (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) 2)) (* (pow b 4) (* (pow (cos (* 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 b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))))) (pow y-scale 4)) (sqrt (/ 1 (- (* (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)))))))))))> |
#<alt (+ (* -1/4 (* (* x-scale (sqrt 8)) (sqrt (- (* (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)))))))) (+ (* 1/16 (* (/ (* (pow x-scale 3) (* (sqrt 8) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 2) (* (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (sqrt (/ 1 (- (* (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))))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 8) (* (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 8) (pow (cos (* 1/180 (* angle (PI)))) 8)))) (* 1/4 (/ (* (pow x-scale 4) (pow (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* 1/4 (/ (* (pow x-scale 2) (* (+ (* -1/4 (/ (* (pow x-scale 6) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 6) (pow (cos (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 4) (pow (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) 2)) (* (pow b 4) (* (pow (cos (* 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 b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 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 (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 y-scale 6)) (sqrt (/ 1 (- (* (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))))))))) (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* -1/4 (/ (* (pow x-scale 6) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 6) (pow (cos (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 4) (pow (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) 2)) (* (pow b 4) (* (pow (cos (* 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 b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))))) (pow y-scale 4)) (sqrt (/ 1 (- (* (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))))))))))))> |
#<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 (* (* angle (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (* (pow b 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/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)))))))> |
#<alt (* angle (+ (* 1/8 (* (* (pow angle 2) (* x-scale (* y-scale (* (sqrt 8) (- (* (pow b 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) (- (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))) 2)) (pow b 4))))) (pow b 2)))))))) (sqrt (/ 1 (- (* (pow b 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/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (* (pow b 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/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)))))))))> |
#<alt (* angle (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (* (pow b 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/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2))))))) (* (pow angle 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (* (pow b 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) (- (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))) 2)) (pow b 4))))) (pow b 2))))))) (sqrt (/ 1 (- (* (pow b 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/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)))))))) (* 1/8 (* (* (pow angle 2) (* x-scale (* y-scale (* (sqrt 8) (- (* (pow b 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 (- (* (pow b 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) (- (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))) 2)) (pow b 4))))) (pow b 2)))) 2) (- (* (pow b 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/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)))))) (* 1/2 (/ (* (pow x-scale 2) (- (+ (* 4 (/ (* (pow b 4) (+ (* 1/2040733440000000 (pow (PI) 6)) (+ (* 1/1224440064000000 (pow (PI) 6)) (+ (* 1/102036672000000 (pow (PI) 6)) (* 1/32400 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (+ (* -1/408146688000000 (/ (pow (PI) 6) (pow x-scale 4))) (+ (* -1/6122200320000000 (/ (pow (PI) 6) (pow x-scale 4))) (* 2 (* (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (- (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2)))))))) (+ (* 1/1020366720000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/612220032000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (pow x-scale 4) (* (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))) (- (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))) 2)) (pow b 4)))))) (pow b 4))))) (pow b 2))))))))) (sqrt (/ 1 (- (* (pow b 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/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2))))))))))))> |
#<alt (* angle (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (* (pow b 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/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2))))))) (* (pow angle 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (* (pow b 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) (- (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))) 2)) (pow b 4))))) (pow b 2))))))) (sqrt (/ 1 (- (* (pow b 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/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)))))))) (* (pow angle 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (* (pow b 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 (- (* (pow b 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) (- (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))) 2)) (pow b 4))))) (pow b 2)))) 2) (- (* (pow b 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/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)))))) (* 1/2 (/ (* (pow x-scale 2) (- (+ (* 4 (/ (* (pow b 4) (+ (* 1/2040733440000000 (pow (PI) 6)) (+ (* 1/1224440064000000 (pow (PI) 6)) (+ (* 1/102036672000000 (pow (PI) 6)) (* 1/32400 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (+ (* -1/408146688000000 (/ (pow (PI) 6) (pow x-scale 4))) (+ (* -1/6122200320000000 (/ (pow (PI) 6) (pow x-scale 4))) (* 2 (* (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (- (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2)))))))) (+ (* 1/1020366720000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/612220032000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (pow x-scale 4) (* (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))) (- (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))) 2)) (pow b 4)))))) (pow b 4))))) (pow b 2)))))))) (sqrt (/ 1 (- (* (pow b 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/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)))))))) (* 1/8 (* (* (pow angle 2) (* x-scale (* y-scale (* (sqrt 8) (- (* (pow b 2) (+ (* -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 b 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) (- (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))) 2)) (pow b 4))))) (pow b 2)))) (- (* (pow b 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 (- (* (pow b 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) (- (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))) 2)) (pow b 4))))) (pow b 2)))) 2) (- (* (pow b 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/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)))))) (* 1/2 (/ (* (pow x-scale 2) (- (+ (* 4 (/ (* (pow b 4) (+ (* 1/2040733440000000 (pow (PI) 6)) (+ (* 1/1224440064000000 (pow (PI) 6)) (+ (* 1/102036672000000 (pow (PI) 6)) (* 1/32400 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (+ (* -1/408146688000000 (/ (pow (PI) 6) (pow x-scale 4))) (+ (* -1/6122200320000000 (/ (pow (PI) 6) (pow x-scale 4))) (* 2 (* (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (- (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2)))))))) (+ (* 1/1020366720000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/612220032000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (pow x-scale 4) (* (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))) (- (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))) 2)) (pow b 4)))))) (pow b 4))))) (pow b 2)))))) (- (* (pow b 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/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)))))) (* 1/2 (/ (* (pow x-scale 2) (- (+ (* 4 (/ (* (pow b 4) (+ (* -1/32400 (* (pow (PI) 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))) (+ (* -1/3149280000 (* (pow (PI) 4) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (+ (* -1/396718580736000000000 (pow (PI) 8)) (+ (* -1/2777030065152000000000 (pow (PI) 8)) (* 1/32400 (* (pow (PI) 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (+ (* 1/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))))))) (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 (- (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))) 2)) (pow b 4)))) 2)) (pow b 4))) (* 1/2 (/ (* (pow x-scale 4) (* (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))) (- (+ (* 4 (/ (* (pow b 4) (+ (* 1/2040733440000000 (pow (PI) 6)) (+ (* 1/1224440064000000 (pow (PI) 6)) (+ (* 1/102036672000000 (pow (PI) 6)) (* 1/32400 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (+ (* -1/408146688000000 (/ (pow (PI) 6) (pow x-scale 4))) (+ (* -1/6122200320000000 (/ (pow (PI) 6) (pow x-scale 4))) (* 2 (* (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (- (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2)))))))) (+ (* 1/1020366720000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/612220032000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (pow x-scale 4) (* (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))) (- (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))) 2)) (pow b 4)))))) (pow b 4)))))) (pow b 4)))))) (pow b 2))))))))) (sqrt (/ 1 (- (* (pow b 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/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 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 (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (pow (- (/ (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 (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (pow (- (/ (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 (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (pow (- (/ (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 (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (pow (- (/ (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 (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (pow (- (/ (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 (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (pow (- (/ (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 (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (pow (- (/ (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 (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (pow (- (/ (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))))> |
#<alt (* 1/4 (* x-scale (* y-scale (sqrt 8))))> |
#<alt (* 1/4 (* x-scale (* y-scale (sqrt 8))))> |
#<alt (* 1/4 (* x-scale (* y-scale (sqrt 8))))> |
#<alt (* 1/4 (* x-scale (* y-scale (sqrt 8))))> |
#<alt (* 1/4 (* x-scale (* y-scale (sqrt 8))))> |
#<alt (* 1/4 (* x-scale (* y-scale (sqrt 8))))> |
#<alt (* 1/4 (* x-scale (* y-scale (sqrt 8))))> |
#<alt (* 1/4 (* x-scale (* y-scale (sqrt 8))))> |
#<alt (* 1/4 (* x-scale (* y-scale (sqrt 8))))> |
#<alt (* 1/4 (* x-scale (* y-scale (sqrt 8))))> |
#<alt (* 1/4 (* x-scale (* y-scale (sqrt 8))))> |
#<alt (* 1/4 (* x-scale (* y-scale (sqrt 8))))> |
#<alt (* 1/4 (* x-scale (* y-scale (sqrt 8))))> |
#<alt (* 1/4 (* x-scale (* y-scale (sqrt 8))))> |
#<alt (* 1/4 (* x-scale (* y-scale (sqrt 8))))> |
#<alt (* 1/4 (* x-scale (* y-scale (sqrt 8))))> |
#<alt (* 1/4 (* x-scale (* y-scale (sqrt 8))))> |
#<alt (* 1/4 (* x-scale (* y-scale (sqrt 8))))> |
#<alt (* 1/4 (* x-scale (* y-scale (sqrt 8))))> |
#<alt (* 1/4 (* x-scale (* y-scale (sqrt 8))))> |
#<alt (* 1/4 (* x-scale (* y-scale (sqrt 8))))> |
#<alt (* 1/4 (* x-scale (* y-scale (sqrt 8))))> |
#<alt (* 1/4 (* x-scale (* y-scale (sqrt 8))))> |
#<alt (* 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 (* 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 (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> |
#<alt (+ 1 (* -1/64800 (* (pow angle 2) (pow (PI) 2))))> |
#<alt (+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* 1/25194240000 (* (pow angle 2) (pow (PI) 4))))))> |
#<alt (+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/24488801280000000 (* (pow angle 2) (pow (PI) 6))) (* 1/25194240000 (pow (PI) 4)))))))> |
#<alt (cos (* 1/180 (* angle (PI))))> |
#<alt (cos (* 1/180 (* angle (PI))))> |
#<alt (cos (* 1/180 (* angle (PI))))> |
#<alt (cos (* 1/180 (* angle (PI))))> |
#<alt (cos (* 1/180 (* angle (PI))))> |
#<alt (cos (* 1/180 (* angle (PI))))> |
#<alt (cos (* 1/180 (* angle (PI))))> |
#<alt (cos (* 1/180 (* angle (PI))))> |
#<alt (* 1/180 (* angle (PI)))> |
#<alt (* angle (+ (* -1/34992000 (* (pow angle 2) (pow (PI) 3))) (* 1/180 (PI))))> |
#<alt (* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* 1/22674816000000 (* (pow angle 2) (pow (PI) 5)))))))> |
#<alt (* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* (pow angle 2) (+ (* -1/30855889612800000000 (* (pow angle 2) (pow (PI) 7))) (* 1/22674816000000 (pow (PI) 5))))))))> |
#<alt (sin (* 1/180 (* angle (PI))))> |
#<alt (sin (* 1/180 (* angle (PI))))> |
#<alt (sin (* 1/180 (* angle (PI))))> |
#<alt (sin (* 1/180 (* angle (PI))))> |
#<alt (sin (* 1/180 (* angle (PI))))> |
#<alt (sin (* 1/180 (* angle (PI))))> |
#<alt (sin (* 1/180 (* angle (PI))))> |
#<alt (sin (* 1/180 (* angle (PI))))> |
#<alt 1> |
#<alt (+ 1 (* -1/64800 (* (pow angle 2) (pow (PI) 2))))> |
#<alt (+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* 1/25194240000 (* (pow angle 2) (pow (PI) 4))))))> |
#<alt (+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/24488801280000000 (* (pow angle 2) (pow (PI) 6))) (* 1/25194240000 (pow (PI) 4)))))))> |
#<alt (cos (* 1/180 (* angle (PI))))> |
#<alt (cos (* 1/180 (* angle (PI))))> |
#<alt (cos (* 1/180 (* angle (PI))))> |
#<alt (cos (* 1/180 (* angle (PI))))> |
#<alt (cos (* 1/180 (* angle (PI))))> |
#<alt (cos (* 1/180 (* angle (PI))))> |
#<alt (cos (* 1/180 (* angle (PI))))> |
#<alt (cos (* 1/180 (* angle (PI))))> |
132 calls:
| Time | Variable | Point | Expression | |
|---|---|---|---|---|
| 132.0ms | angle | @ | inf | (* (log (cos (* (* angle (PI)) 1/180))) 1) |
| 14.0ms | angle | @ | -inf | (* (log (cos (* (* angle (PI)) 1/180))) 1) |
| 9.0ms | angle | @ | inf | (+ (/ (pow (sin (* (* angle (PI)) 1/180)) 2) (* x-scale x-scale)) (/ (* -1/2 (* (/ (* (pow (cos (* (* angle (PI)) 1/180)) 2) (pow (sin (* (* angle (PI)) 1/180)) 2)) (* x-scale x-scale)) 2)) (pow (cos (* (* angle (PI)) 1/180)) 2))) |
| 4.0ms | angle | @ | 0 | (* (log (cos (* (* angle (PI)) 1/180))) 1) |
| 4.0ms | a | @ | 0 | (* (* 1/4 (* (* a x-scale) (* y-scale (sqrt 8)))) (sqrt (+ (/ (pow (sin (* (* angle (PI)) 1/180)) 2) (* x-scale x-scale)) (/ (* -1/2 (* (/ (* (pow (cos (* (* angle (PI)) 1/180)) 2) (pow (sin (* (* angle (PI)) 1/180)) 2)) (* x-scale x-scale)) 2)) (pow (cos (* (* angle (PI)) 1/180)) 2))))) |
| 1× | batch-egg-rewrite |
| 5074× | *-lowering-*.f32 |
| 5074× | *-lowering-*.f64 |
| 2130× | pow-lowering-pow.f64 |
| 2130× | pow-lowering-pow.f32 |
| 2004× | /-lowering-/.f32 |
Useful iterations: 2 (0.0ms)
| Iter | Nodes | Cost |
|---|---|---|
| 0 | 84 | 393 |
| 1 | 455 | 347 |
| 2 | 3883 | 336 |
| 0 | 8401 | 336 |
| 1× | iter limit |
| 1× | node limit |
| Inputs |
|---|
(* x-scale a) |
(* 4 (* x-scale (* a 1/4))) |
(* x-scale (* a 1/4)) |
(* a 1/4) |
(/ (* (* a (* a a)) (* (* b b) 4)) (* 4 (* a (* b (* a b))))) |
(* (* (/ 1 (* x-scale (* y-scale y-scale))) x-scale) (* x-scale (* y-scale y-scale))) |
(* (/ 1 (* x-scale (* y-scale y-scale))) x-scale) |
(* (/ (* (* a (* a a)) (* (* b b) 4)) (* 4 (* a (* b (* a b))))) (* (* (/ 1 (* x-scale (* y-scale y-scale))) x-scale) (* x-scale (* y-scale y-scale)))) |
(/ (* -1/2 (* (/ (* (pow (cos (* (* angle (PI)) 1/180)) 2) (pow (sin (* (* angle (PI)) 1/180)) 2)) (* x-scale x-scale)) 2)) (pow (cos (* (* angle (PI)) 1/180)) 2)) |
(+ (/ (pow (sin (* (* angle (PI)) 1/180)) 2) (* x-scale x-scale)) (/ (* -1/2 (* (/ (* (pow (cos (* (* angle (PI)) 1/180)) 2) (pow (sin (* (* angle (PI)) 1/180)) 2)) (* x-scale x-scale)) 2)) (pow (cos (* (* angle (PI)) 1/180)) 2))) |
(* -1/2 (* (/ (* (pow (cos (* (* angle (PI)) 1/180)) 2) (pow (sin (* (* angle (PI)) 1/180)) 2)) (* x-scale x-scale)) 2)) |
(* (* 1/4 (* (* a x-scale) (* y-scale (sqrt 8)))) (sqrt (+ (/ (pow (sin (* (* angle (PI)) 1/180)) 2) (* x-scale x-scale)) (/ (* -1/2 (* (/ (* (pow (cos (* (* angle (PI)) 1/180)) 2) (pow (sin (* (* angle (PI)) 1/180)) 2)) (* x-scale x-scale)) 2)) (pow (cos (* (* angle (PI)) 1/180)) 2))))) |
(exp (* (log (cos (* (* angle (PI)) 1/180))) 1)) |
(* (log (cos (* (* angle (PI)) 1/180))) 1) |
(* (* 1/4 (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (* (* b b) (+ (/ (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 b 4) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (* x-scale x-scale) (* y-scale y-scale))) (pow (* (* b b) (- (/ (pow (exp (* (log (cos (* (* angle (PI)) 1/180))) 1)) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)))) 2)))))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(* 4 (* a (* b (* a b)))) |
(* a a) |
(* a b) |
(* a (* a a)) |
(PI) |
(cos (* (* angle (PI)) 1/180)) |
(sin (* (* angle (PI)) 1/180)) |
(sqrt 8) |
(cos (* 1/180 (* angle (PI)))) |
| Outputs |
|---|
(*.f64 x-scale a) |
(*.f64 a x-scale) |
(*.f64 x-scale (*.f64 (*.f64 a #s(literal 1/4 binary64)) #s(literal 4 binary64))) |
(*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 x-scale #s(literal 1/4 binary64)))) |
(*.f64 (*.f64 a #s(literal 1/4 binary64)) (*.f64 x-scale #s(literal 4 binary64))) |
(*.f64 (*.f64 x-scale a) #s(literal 1 binary64)) |
(*.f64 (*.f64 x-scale #s(literal 4 binary64)) (*.f64 a #s(literal 1/4 binary64))) |
(*.f64 (*.f64 a (*.f64 x-scale #s(literal 1/4 binary64))) #s(literal 4 binary64)) |
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a #s(literal 1/4 binary64))) x-scale) |
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 x-scale a)) #s(literal 1/4 binary64)) |
(*.f64 (*.f64 (*.f64 x-scale #s(literal 4 binary64)) a) #s(literal 1/4 binary64)) |
(*.f64 (*.f64 (*.f64 x-scale #s(literal 4 binary64)) #s(literal 1/4 binary64)) a) |
(*.f64 x-scale (*.f64 a #s(literal 1/4 binary64))) |
(*.f64 a (*.f64 x-scale #s(literal 1/4 binary64))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 x-scale a)) |
(*.f64 (*.f64 a #s(literal 1/4 binary64)) x-scale) |
(*.f64 (*.f64 x-scale a) #s(literal 1/4 binary64)) |
(*.f64 (*.f64 x-scale #s(literal 1/4 binary64)) a) |
(*.f64 a #s(literal 1/4 binary64)) |
(*.f64 #s(literal 1/4 binary64) a) |
(exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b))) #s(literal 1 binary64))) #s(literal -1 binary64))) |
(neg.f64 (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 #s(literal 4 binary64) (*.f64 b b))) (*.f64 (*.f64 (*.f64 a a) (*.f64 b b)) #s(literal -4 binary64)))) |
(neg.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a a) (*.f64 b b)) #s(literal -4 binary64))) (*.f64 (*.f64 a a) (*.f64 #s(literal 4 binary64) (*.f64 b b))))) |
(/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 #s(literal 4 binary64) (*.f64 b b))) (*.f64 (*.f64 a a) (*.f64 #s(literal 4 binary64) (*.f64 b b)))) |
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b))) #s(literal 1 binary64))) |
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b))) #s(literal 1 binary64)) #s(literal 1 binary64))) |
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (*.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) #s(literal 1 binary64)))) |
(/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b))) #s(literal 1 binary64)))) |
(/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a a) (*.f64 b b)) #s(literal -4 binary64))) (*.f64 (*.f64 (*.f64 a a) (*.f64 b b)) #s(literal -4 binary64))) |
(/.f64 (*.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) #s(literal 1 binary64)) (*.f64 (*.f64 a a) (*.f64 b b))) |
(/.f64 (neg.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a a) (*.f64 b b)) #s(literal -4 binary64)))) (neg.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b b)) #s(literal -4 binary64)))) |
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) #s(literal 1 binary64))) (neg.f64 (*.f64 (*.f64 a a) (*.f64 b b)))) |
(/.f64 (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 #s(literal 4 binary64) (*.f64 b b))) (*.f64 (*.f64 a a) (*.f64 b b))) #s(literal 4 binary64)) |
(/.f64 (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 #s(literal 4 binary64) (*.f64 b b))) (*.f64 a #s(literal 4 binary64))) (*.f64 a (*.f64 b b))) |
(/.f64 (*.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 #s(literal 4 binary64) (*.f64 b b))) #s(literal 1 binary64)) (*.f64 (*.f64 a a) (*.f64 #s(literal 4 binary64) (*.f64 b b)))) |
(/.f64 (*.f64 (/.f64 (*.f64 a (*.f64 a a)) #s(literal 4 binary64)) (*.f64 #s(literal 4 binary64) (*.f64 b b))) (*.f64 (*.f64 a a) (*.f64 b b))) |
(/.f64 (*.f64 (*.f64 a (*.f64 a a)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 b b)) (*.f64 (*.f64 a a) (*.f64 b b)))) #s(literal 4 binary64)) |
(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) #s(literal 1 binary64)) a) (*.f64 a (*.f64 b b))) |
(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) #s(literal 1 binary64)) (*.f64 a b)) (*.f64 a b)) |
(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) #s(literal 1 binary64)) (*.f64 a (*.f64 b b))) a) |
(pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b))) #s(literal 1 binary64)) #s(literal -1 binary64)) |
(pow.f64 (/.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b))) #s(literal 1 binary64)) #s(literal 1 binary64)) #s(literal -1 binary64)) |
(pow.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (*.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) #s(literal 1 binary64))) #s(literal -1 binary64)) |
(*.f64 a (*.f64 (*.f64 a a) (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 b b) (*.f64 (*.f64 a a) (*.f64 b b)))))) |
(*.f64 a (*.f64 (*.f64 (*.f64 a a) (*.f64 #s(literal 4 binary64) (*.f64 b b))) (/.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a a) (*.f64 b b))))) |
(*.f64 a (/.f64 (*.f64 (*.f64 a a) (*.f64 #s(literal 4 binary64) (*.f64 b b))) (*.f64 (*.f64 a a) (*.f64 #s(literal 4 binary64) (*.f64 b b))))) |
(*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (*.f64 (*.f64 a (*.f64 a a)) (*.f64 #s(literal 4 binary64) (*.f64 b b)))) #s(literal -1 binary64))) |
(*.f64 (*.f64 a a) (*.f64 a (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 b b) (*.f64 (*.f64 a a) (*.f64 b b)))))) |
(*.f64 (*.f64 a (*.f64 a a)) (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 b b) (*.f64 (*.f64 a a) (*.f64 b b))))) |
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 b b)) (*.f64 (*.f64 a (*.f64 a a)) (/.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a a) (*.f64 b b))))) |
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 b b)) (/.f64 (*.f64 a (*.f64 a a)) (*.f64 (*.f64 a a) (*.f64 #s(literal 4 binary64) (*.f64 b b))))) |
(*.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 #s(literal 4 binary64) (*.f64 b b))) (/.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a a) (*.f64 b b)))) |
(*.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) (*.f64 (*.f64 a a) (*.f64 b b))) #s(literal 1 binary64))) |
(*.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a a) (*.f64 b b)) #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 a a) (*.f64 b b)) #s(literal -4 binary64)))) |
(*.f64 (/.f64 (*.f64 a (*.f64 a a)) #s(literal 4 binary64)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 b b)) (*.f64 (*.f64 a a) (*.f64 b b)))) |
(*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 b b)) (*.f64 (*.f64 a a) (*.f64 b b))) (/.f64 (*.f64 a (*.f64 a a)) #s(literal 4 binary64))) |
(*.f64 (/.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a a) (*.f64 b b))) (*.f64 (*.f64 a (*.f64 a a)) (*.f64 #s(literal 4 binary64) (*.f64 b b)))) |
(*.f64 (/.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a a) (*.f64 b b))) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 a (*.f64 a a)) (*.f64 #s(literal 4 binary64) (*.f64 b b)))) #s(literal -1 binary64))) |
(*.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) (*.f64 #s(literal 4 binary64) (/.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a a) (*.f64 b b))))) |
(*.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) (/.f64 #s(literal 4 binary64) (*.f64 (*.f64 a a) (*.f64 #s(literal 4 binary64) (*.f64 b b))))) |
(*.f64 (*.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 a a) (*.f64 b b)))) |
(*.f64 (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 b b) (*.f64 (*.f64 a a) (*.f64 b b)))) (*.f64 a (*.f64 a a))) |
(*.f64 (/.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 (*.f64 a a) (*.f64 #s(literal 4 binary64) (*.f64 b b))) (*.f64 (*.f64 a a) (*.f64 b b)))) |
(*.f64 (/.f64 a (*.f64 (*.f64 a a) (*.f64 b b))) (/.f64 (*.f64 (*.f64 a a) (*.f64 #s(literal 4 binary64) (*.f64 b b))) #s(literal 4 binary64))) |
(*.f64 (/.f64 a (*.f64 a #s(literal 4 binary64))) (/.f64 (*.f64 (*.f64 a a) (*.f64 #s(literal 4 binary64) (*.f64 b b))) (*.f64 a (*.f64 b b)))) |
(*.f64 (/.f64 (*.f64 a (*.f64 a a)) (*.f64 (*.f64 a a) (*.f64 b b))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 b b)) #s(literal 4 binary64))) |
(*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 b b)) #s(literal 4 binary64)) (/.f64 (*.f64 a (*.f64 a a)) (*.f64 (*.f64 a a) (*.f64 b b)))) |
(*.f64 (/.f64 (*.f64 a (*.f64 a a)) (*.f64 a #s(literal 4 binary64))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 b b)) (*.f64 a (*.f64 b b)))) |
(*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 b b)) (*.f64 a #s(literal 4 binary64))) (/.f64 (*.f64 a (*.f64 a a)) (*.f64 a (*.f64 b b)))) |
(*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) #s(literal 4 binary64)) (/.f64 #s(literal 4 binary64) (*.f64 (*.f64 a a) (*.f64 b b)))) |
(*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) (*.f64 (*.f64 a a) (*.f64 b b))) #s(literal 1 binary64)) |
(*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) (*.f64 a #s(literal 4 binary64))) (/.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b)))) |
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 a a) (*.f64 b b))) (*.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) #s(literal 1 binary64))) |
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 a #s(literal 4 binary64))) (pow.f64 (/.f64 (*.f64 a (*.f64 b b)) (*.f64 (*.f64 a (*.f64 a a)) (*.f64 #s(literal 4 binary64) (*.f64 b b)))) #s(literal -1 binary64))) |
(*.f64 (pow.f64 (/.f64 #s(literal 4 binary64) a) #s(literal -1 binary64)) (pow.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (*.f64 (*.f64 a a) (*.f64 #s(literal 4 binary64) (*.f64 b b)))) #s(literal -1 binary64))) |
(*.f64 (pow.f64 (/.f64 #s(literal 4 binary64) (*.f64 #s(literal 4 binary64) (*.f64 b b))) #s(literal -1 binary64)) (pow.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (*.f64 a (*.f64 a a))) #s(literal -1 binary64))) |
(*.f64 (pow.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (*.f64 a (*.f64 a a))) #s(literal -1 binary64)) (pow.f64 (/.f64 #s(literal 4 binary64) (*.f64 #s(literal 4 binary64) (*.f64 b b))) #s(literal -1 binary64))) |
(*.f64 (pow.f64 (/.f64 #s(literal 4 binary64) (*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b))) #s(literal -1 binary64)) (pow.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 b b)) #s(literal 4 binary64)) #s(literal -1 binary64))) |
(*.f64 (pow.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 b b)) a) #s(literal -1 binary64)) (pow.f64 (/.f64 #s(literal 4 binary64) (*.f64 (*.f64 a a) (*.f64 #s(literal 4 binary64) (*.f64 b b)))) #s(literal -1 binary64))) |
(*.f64 (pow.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b))) #s(literal -1 binary64)) #s(literal 1 binary64)) |
(*.f64 (pow.f64 (/.f64 (*.f64 a #s(literal 4 binary64)) a) #s(literal -1 binary64)) (pow.f64 (/.f64 (*.f64 a (*.f64 b b)) (*.f64 (*.f64 a a) (*.f64 #s(literal 4 binary64) (*.f64 b b)))) #s(literal -1 binary64))) |
(*.f64 (pow.f64 (/.f64 (*.f64 a #s(literal 4 binary64)) (*.f64 a (*.f64 a a))) #s(literal -1 binary64)) (pow.f64 (/.f64 (*.f64 a (*.f64 b b)) (*.f64 #s(literal 4 binary64) (*.f64 b b))) #s(literal -1 binary64))) |
(*.f64 (pow.f64 (/.f64 (*.f64 a #s(literal 4 binary64)) (*.f64 #s(literal 4 binary64) (*.f64 b b))) #s(literal -1 binary64)) (pow.f64 (/.f64 (*.f64 a (*.f64 b b)) (*.f64 a (*.f64 a a))) #s(literal -1 binary64))) |
(*.f64 (pow.f64 (/.f64 (*.f64 a #s(literal 4 binary64)) (*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b))) #s(literal -1 binary64)) (pow.f64 (/.f64 (*.f64 a (*.f64 b b)) #s(literal 4 binary64)) #s(literal -1 binary64))) |
(/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 x-scale (*.f64 y-scale y-scale))) |
(/.f64 (*.f64 x-scale (-.f64 #s(literal 0 binary64) (*.f64 x-scale (*.f64 y-scale y-scale)))) (-.f64 #s(literal 0 binary64) (*.f64 x-scale (*.f64 y-scale y-scale)))) |
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 x-scale (*.f64 y-scale y-scale))) |
(/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 y-scale y-scale)) |
(*.f64 x-scale (*.f64 (*.f64 y-scale y-scale) (/.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) |
(*.f64 x-scale (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 x-scale (*.f64 y-scale y-scale)))) |
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 x-scale (*.f64 y-scale y-scale)))) |
(*.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 x-scale x-scale) (*.f64 x-scale (*.f64 y-scale y-scale)))) |
(*.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (/.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) |
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) |
(*.f64 (/.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 x-scale (*.f64 y-scale y-scale))) |
(*.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale y-scale)))) |
(*.f64 (*.f64 x-scale y-scale) (*.f64 y-scale (/.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) |
(*.f64 (/.f64 (*.f64 x-scale x-scale) (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 y-scale y-scale)) |
(*.f64 (*.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale y-scale)))) x-scale) |
(*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 y-scale y-scale)) (*.f64 x-scale x-scale)) |
(*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 x-scale y-scale)) (*.f64 x-scale y-scale)) |
(*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 x-scale (*.f64 x-scale y-scale))) y-scale) |
(*.f64 (*.f64 (/.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 y-scale y-scale)) x-scale) |
(*.f64 (*.f64 (/.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 x-scale y-scale)) y-scale) |
(*.f64 (*.f64 (/.f64 (*.f64 x-scale x-scale) (*.f64 x-scale (*.f64 y-scale y-scale))) y-scale) y-scale) |
(/.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) |
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) x-scale)) |
(/.f64 (neg.f64 x-scale) (-.f64 #s(literal 0 binary64) (*.f64 x-scale (*.f64 y-scale y-scale)))) |
(/.f64 (/.f64 x-scale (*.f64 y-scale y-scale)) x-scale) |
(/.f64 (/.f64 x-scale x-scale) (*.f64 y-scale y-scale)) |
(/.f64 (*.f64 x-scale #s(literal -1 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 x-scale (*.f64 y-scale y-scale)))) |
(/.f64 (*.f64 x-scale (/.f64 #s(literal 1 binary64) x-scale)) (*.f64 y-scale y-scale)) |
(/.f64 (*.f64 #s(literal -1 binary64) x-scale) (-.f64 #s(literal 0 binary64) (*.f64 x-scale (*.f64 y-scale y-scale)))) |
(/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) x-scale) (*.f64 y-scale y-scale)) |
(/.f64 (/.f64 x-scale (*.f64 x-scale y-scale)) y-scale) |
(pow.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) x-scale) #s(literal -1 binary64)) |
(*.f64 x-scale (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale y-scale)))) |
(*.f64 #s(literal 1 binary64) (/.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) |
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale y-scale))) x-scale) |
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 x-scale x-scale)) |
(*.f64 (/.f64 #s(literal 1 binary64) x-scale) (/.f64 x-scale (*.f64 y-scale y-scale))) |
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) (/.f64 x-scale y-scale)) |
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 #s(literal 4 binary64) (*.f64 b b))) (*.f64 (*.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 #s(literal 4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.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 x-scale (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b))) #s(literal 1 binary64))) |
(/.f64 (*.f64 (*.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 #s(literal 4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 (*.f64 a a) (*.f64 #s(literal 4 binary64) (*.f64 b b)))) |
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 #s(literal 4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 (*.f64 (*.f64 a a) (*.f64 b b)) #s(literal -4 binary64))) |
(/.f64 (*.f64 (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 x-scale (*.f64 y-scale y-scale))) #s(literal 1 binary64)) (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b))) #s(literal 1 binary64))) |
(/.f64 (*.f64 (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 a (*.f64 (*.f64 (*.f64 a a) (*.f64 b b)) #s(literal -4 binary64)))) (*.f64 (*.f64 (*.f64 a a) (*.f64 b b)) #s(literal -4 binary64))) |
(/.f64 (*.f64 (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) #s(literal 1 binary64))) (*.f64 (*.f64 a a) (*.f64 b b))) |
(/.f64 (*.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a a) (*.f64 b b)) #s(literal -4 binary64))) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (*.f64 a a) (*.f64 b b)) #s(literal -4 binary64))) |
(/.f64 (*.f64 (*.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) #s(literal 1 binary64)) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 (*.f64 a a) (*.f64 b b))) |
(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 #s(literal 4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(literal 4 binary64)) (*.f64 (*.f64 a a) (*.f64 b b))) |
(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 #s(literal 4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 (*.f64 a a) (*.f64 b b))) #s(literal 4 binary64)) |
(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 #s(literal 4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 a #s(literal 4 binary64))) (*.f64 a (*.f64 b b))) |
(pow.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 #s(literal 4 binary64) (*.f64 b b))) (*.f64 (*.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 #s(literal 4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -1 binary64)) |
(*.f64 (*.f64 a (*.f64 a a)) (*.f64 (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 b b) (*.f64 (*.f64 a a) (*.f64 b b)))) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 x-scale (*.f64 y-scale y-scale))))) |
(*.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 #s(literal 4 binary64) (*.f64 b b))) (*.f64 (/.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a a) (*.f64 b b))) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 x-scale (*.f64 y-scale y-scale))))) |
(*.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 #s(literal 4 binary64) (*.f64 b b))) (/.f64 (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 (*.f64 a a) (*.f64 #s(literal 4 binary64) (*.f64 b b))))) |
(*.f64 (*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) (*.f64 (*.f64 a a) (*.f64 b b))) #s(literal 1 binary64)) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 x-scale (*.f64 y-scale y-scale)))) |
(*.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) (*.f64 (*.f64 a a) (*.f64 b b))) #s(literal 1 binary64)) (/.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) |
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) (*.f64 (*.f64 a a) (*.f64 b b))) #s(literal 1 binary64)))) |
(*.f64 (/.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) (*.f64 (*.f64 a a) (*.f64 b b))) #s(literal 1 binary64)))) |
(*.f64 (/.f64 (*.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 a a)) (*.f64 b b)) (*.f64 (*.f64 a a) (*.f64 b b))) #s(literal 1 binary64))) |
(*.f64 (/.f64 (*.f64 a (*.f64 a a)) #s(literal 4 binary64)) (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 b b)) (*.f64 (*.f64 a a) (*.f64 b b))) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 x-scale (*.f64 y-scale y-scale))))) |
(*.f64 (/.f64 (*.f64 x-scale x-scale) (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) (*.f64 (*.f64 a a) (*.f64 b b))) #s(literal 1 binary64)))) |
(*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) (*.f64 (*.f64 a a) (*.f64 b b))) #s(literal 1 binary64)) (/.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 x-scale (*.f64 y-scale y-scale))) |
(*.f64 (*.f64 (*.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 #s(literal 4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a a) (*.f64 b b)))) |
(*.f64 (*.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) #s(literal 1 binary64)) (/.f64 (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 (*.f64 a a) (*.f64 b b)))) |
(*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 #s(literal 4 binary64) (*.f64 b b))) (*.f64 (*.f64 a a) (*.f64 b b))) (/.f64 (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 x-scale (*.f64 y-scale y-scale))) #s(literal 4 binary64))) |
(*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 #s(literal 4 binary64) (*.f64 b b))) (*.f64 a #s(literal 4 binary64))) (/.f64 (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 a (*.f64 b b)))) |
(*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) (*.f64 (*.f64 a a) (*.f64 b b))) #s(literal 1 binary64)) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) |
(*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) (*.f64 (*.f64 a a) (*.f64 b b))) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) |
(*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) (*.f64 (*.f64 a a) (*.f64 b b))) #s(literal 1 binary64)) (/.f64 (*.f64 x-scale x-scale) (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 y-scale y-scale)) |
(*.f64 (*.f64 (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 a (*.f64 a a))) (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 b b) (*.f64 (*.f64 a a) (*.f64 b b))))) |
(*.f64 (*.f64 (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 (*.f64 a (*.f64 a a)) #s(literal 4 binary64))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 b b)) (*.f64 (*.f64 a a) (*.f64 b b)))) |
(*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) (*.f64 (*.f64 a a) (*.f64 b b))) #s(literal 1 binary64)) (/.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) x-scale) (*.f64 y-scale y-scale)) |
(*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) (*.f64 (*.f64 a a) (*.f64 b b))) #s(literal 1 binary64)) (/.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 y-scale y-scale)) x-scale) |
(*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) (*.f64 (*.f64 a a) (*.f64 b b))) #s(literal 1 binary64)) (/.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 x-scale y-scale)) y-scale) |
(exp.f64 (*.f64 (log.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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)))) #s(literal -1 binary64))) |
(neg.f64 (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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 0 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))))) |
(neg.f64 (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))) |
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 x-scale x-scale))) #s(literal -1 binary64)))) |
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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))) #s(literal 1 binary64))) |
(/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) |
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 x-scale x-scale))) #s(literal -1 binary64))))) |
(/.f64 (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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 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 -1 binary64)) #s(literal 1 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) |
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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)))) (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))))) |
(/.f64 (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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)) (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 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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))) #s(literal -1 binary64))) #s(literal -1 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 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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))) #s(literal 1 binary64)) #s(literal -1 binary64)) |
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))) |
(*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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 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 -1/2 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))))) |
(*.f64 (*.f64 #s(literal 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 -1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))) |
(*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 x-scale x-scale))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))) |
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 x-scale x-scale))) #s(literal -1 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))))) |
(*.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 x-scale x-scale))) #s(literal -1 binary64))) |
(*.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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))) #s(literal -1 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 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))))) |
(*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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 (*.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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) #s(literal -1/2 binary64)) |
(*.f64 (/.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 x-scale x-scale)))) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))) |
(*.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 x-scale x-scale)))) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) (/.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))) |
(*.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 x-scale x-scale)))) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) (/.f64 #s(literal 2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))) |
(*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) (pow.f64 (/.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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))) #s(literal -1 binary64))) |
(*.f64 (pow.f64 (/.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal -1/2 binary64)) #s(literal -1 binary64)) (pow.f64 (/.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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 (pow.f64 (/.f64 (cos.f64 (*.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))))) #s(literal -1 binary64)) (pow.f64 (/.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal -1/2 binary64)) #s(literal -1 binary64))) |
(*.f64 (pow.f64 (/.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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)) (pow.f64 (/.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 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 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 x-scale x-scale))) |
(+.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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 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 -1 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (-.f64 #s(literal 0 binary64) (*.f64 x-scale x-scale)))) |
(-.f64 (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (/.f64 (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale))) |
(-.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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 0 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))))) |
(-.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 x-scale x-scale)) (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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 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)) (-.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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 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 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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 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 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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 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 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 x-scale x-scale))) |
(fma.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))) |
(fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) (*.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))) |
(fma.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) (/.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))) |
(fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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 #s(literal -1/2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 x-scale x-scale))) |
(fma.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 x-scale x-scale))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 x-scale x-scale))) |
(fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))) |
(fma.f64 (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))) |
(fma.f64 (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 x-scale x-scale))) #s(literal -1 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 x-scale x-scale))) |
(fma.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) x-scale) (/.f64 #s(literal 1 binary64) x-scale) (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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 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 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))) |
(fma.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 x-scale x-scale))) #s(literal -1 binary64)) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 x-scale x-scale))) |
(fma.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 x-scale x-scale))) |
(fma.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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))) |
(fma.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 x-scale x-scale)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) #s(literal -1/2 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 x-scale x-scale))) |
(fma.f64 (/.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 x-scale x-scale)))) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 x-scale x-scale))) |
(fma.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 x-scale x-scale)))) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) (/.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 x-scale x-scale))) |
(fma.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 x-scale x-scale)))) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) (/.f64 #s(literal 2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 x-scale x-scale))) |
(fma.f64 (/.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) x-scale) (/.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) x-scale) (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))) |
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 x-scale x-scale)) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 x-scale x-scale))) #s(literal -1 binary64)))))) |
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (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 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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 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 -1 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 x-scale x-scale))))) (+.f64 (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 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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 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 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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 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 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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 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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 x-scale x-scale))) #s(literal -1 binary64)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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 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 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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 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 -1 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 x-scale x-scale)))))) |
(/.f64 (+.f64 (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 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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 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 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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 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 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (/.f64 (*.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (*.f64 #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 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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 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 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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 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 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (*.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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))) #s(literal 1 binary64))) (*.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 x-scale x-scale))) #s(literal -1 binary64))) (/.f64 (*.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))))) |
(/.f64 (+.f64 (*.f64 x-scale x-scale) (*.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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))) #s(literal -1 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (*.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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 x-scale x-scale))) |
(/.f64 (+.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (*.f64 x-scale x-scale))) (*.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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 0 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))))) (*.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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 0 binary64) (*.f64 x-scale x-scale)))) |
(/.f64 (+.f64 x-scale (*.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 x-scale x-scale))) #s(literal -1 binary64))) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) x-scale))) (*.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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))) x-scale)) |
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 x-scale x-scale))) #s(literal -1 binary64)) (/.f64 (*.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) #s(literal 1 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (*.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))))) |
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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 0 binary64) (*.f64 x-scale x-scale))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (-.f64 #s(literal 0 binary64) (*.f64 x-scale x-scale)))) |
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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)) x-scale) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) x-scale))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) x-scale)) |
(/.f64 (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 x-scale x-scale))) #s(literal -1 binary64))) (/.f64 (*.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) #s(literal 1 binary64))) (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (/.f64 (*.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))))) |
(/.f64 (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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 x-scale x-scale)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))))) (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (*.f64 x-scale x-scale))) |
(/.f64 (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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 0 binary64) (*.f64 x-scale x-scale))) (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))))) (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (-.f64 #s(literal 0 binary64) (*.f64 x-scale x-scale)))) |
(/.f64 (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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))) x-scale) (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) x-scale))) (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) x-scale)) |
(/.f64 (+.f64 (*.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 x-scale x-scale))) #s(literal -1 binary64)))) (*.f64 (/.f64 (*.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) #s(literal 1 binary64))) (*.f64 (/.f64 (*.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 x-scale x-scale))) #s(literal -1 binary64))))) |
(/.f64 (+.f64 (*.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (*.f64 (/.f64 (*.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 x-scale x-scale))) #s(literal -1 binary64)))) (*.f64 (/.f64 (*.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))) |
(/.f64 (+.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (*.f64 (/.f64 (*.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 x-scale x-scale))) #s(literal -1 binary64))))) (*.f64 (/.f64 (*.f64 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))))) |
(/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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))) #s(literal -1 binary64)))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 x-scale x-scale) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 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))) #s(literal -1 binary64))))) |
(/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (*.f64 (*.f64 x-scale x-scale) (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 x-scale x-scale))) #s(literal -1 binary64))))) (*.f64 (*.f64 x-scale x-scale) (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))))) |
(/.f64 (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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))) #s(literal -1 binary64)))) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 x-scale x-scale)) #s(literal 1 binary64))) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 x-scale x-scale)) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 x-scale x-scale))) #s(literal -1 binary64))))) |
(/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 x-scale x-scale))) #s(literal -1 binary64)))) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 x-scale x-scale)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))) |
(/.f64 (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 x-scale x-scale)) (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 x-scale x-scale))) #s(literal -1 binary64))))) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 x-scale x-scale)) (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))))) |
(/.f64 (+.f64 (*.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) x-scale) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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))) #s(literal -1 binary64)))) x-scale) (*.f64 x-scale (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 x-scale x-scale))) #s(literal -1 binary64))))) |
(/.f64 (+.f64 (*.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) x-scale) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (*.f64 x-scale (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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 x-scale (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 0 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (*.f64 x-scale (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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 x-scale (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))))) |
(/.f64 (neg.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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))))) (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 x-scale x-scale)))) |
(/.f64 (neg.f64 (+.f64 (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 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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 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 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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 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 -1 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 x-scale x-scale))))))) |
(/.f64 (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 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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 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 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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 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 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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 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 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 x-scale x-scale)))) |
(/.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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 x-scale x-scale)) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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))))) #s(literal -1 binary64)) |
(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 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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 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 -1 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 x-scale x-scale))))) (+.f64 (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 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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 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 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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 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 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) #s(literal 2 binary64)))) #s(literal -1 binary64)) |
(*.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 x-scale x-scale))) #s(literal -1 binary64)))) (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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 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 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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 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 -1 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 x-scale x-scale))))))) |
(*.f64 (-.f64 (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 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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 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 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))))) |
(/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))))) (*.f64 x-scale x-scale)) |
(/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))) #s(literal -1/2 binary64)) (*.f64 x-scale x-scale)) |
(*.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 x-scale x-scale))))) |
(*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 x-scale x-scale))) #s(literal -1 binary64)) |
(*.f64 (*.f64 #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)))) #s(literal -1/2 binary64)) |
(*.f64 #s(literal -1 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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/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)))) #s(literal 2 binary64)) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 x-scale x-scale)))))) |
(*.f64 (*.f64 a (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (*.f64 #s(literal 1/4 binary64) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 x-scale x-scale)))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 a (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 x-scale x-scale))))) |
(*.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 x-scale x-scale)))) (*.f64 #s(literal 1/4 binary64) (*.f64 a (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))))) |
(*.f64 (*.f64 a (*.f64 x-scale #s(literal 1/4 binary64))) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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 a (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 x-scale x-scale))))) #s(literal 1/4 binary64)) |
(*.f64 (*.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 x-scale x-scale)))) #s(literal 1/4 binary64)) (*.f64 a (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) |
(*.f64 (*.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 x-scale x-scale)))) (*.f64 a (*.f64 x-scale #s(literal 1/4 binary64)))) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) |
(exp.f64 (log.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))) |
(exp.f64 (*.f64 (log.f64 (exp.f64 #s(literal 1 binary64))) (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 (exp.f64 #s(literal 1 binary64)) (log.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))) |
(pow.f64 (pow.f64 (exp.f64 #s(literal 1 binary64)) #s(literal 1 binary64)) (log.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))) |
(*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 1/2 binary64)) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 1/2 binary64))) |
(*.f64 (pow.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (pow.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 1/2 binary64)) #s(literal 1 binary64))) |
(log.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) |
(+.f64 (log.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 1/2 binary64)))) |
(*.f64 #s(literal 1 binary64) (log.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))) |
(*.f64 (log.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) #s(literal 1 binary64)) |
(*.f64 (log.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) (log.f64 (exp.f64 #s(literal 1 binary64)))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (*.f64 x-scale (sqrt.f64 (-.f64 (*.f64 (*.f64 b b) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 y-scale y-scale)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 b (*.f64 b (*.f64 b b)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))))))) |
(*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (*.f64 #s(literal 1/4 binary64) (sqrt.f64 (-.f64 (*.f64 (*.f64 b b) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 y-scale y-scale)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 b (*.f64 b (*.f64 b b)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))))))) |
(*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) #s(literal 1/4 binary64))) (sqrt.f64 (-.f64 (*.f64 (*.f64 b b) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 y-scale y-scale)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 b (*.f64 b (*.f64 b b)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))))) |
(*.f64 (sqrt.f64 (-.f64 (*.f64 (*.f64 b b) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 y-scale y-scale)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 b (*.f64 b (*.f64 b b)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))))) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) #s(literal 1/4 binary64)))) |
(*.f64 (*.f64 x-scale #s(literal 1/4 binary64)) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (-.f64 (*.f64 (*.f64 b b) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 y-scale y-scale)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 b (*.f64 b (*.f64 b b)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))))))) |
(*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (*.f64 x-scale (sqrt.f64 (-.f64 (*.f64 (*.f64 b b) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 y-scale y-scale)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 b (*.f64 b (*.f64 b b)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))))))) #s(literal 1/4 binary64)) |
(*.f64 (*.f64 (sqrt.f64 (-.f64 (*.f64 (*.f64 b b) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 y-scale y-scale)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 b (*.f64 b (*.f64 b b)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))))) #s(literal 1/4 binary64)) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) |
(*.f64 (*.f64 (sqrt.f64 (-.f64 (*.f64 (*.f64 b b) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 y-scale y-scale)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 b (*.f64 b (*.f64 b b)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))))) (*.f64 x-scale #s(literal 1/4 binary64))) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) |
(*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) #s(literal 1/4 binary64))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) |
(*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (*.f64 x-scale #s(literal 1/4 binary64))) |
(*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) #s(literal 1/4 binary64)) |
(*.f64 (*.f64 x-scale y-scale) (*.f64 (sqrt.f64 #s(literal 8 binary64)) #s(literal 1/4 binary64))) |
(*.f64 (*.f64 x-scale #s(literal 1/4 binary64)) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) x-scale) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale y-scale)) (sqrt.f64 #s(literal 8 binary64))) |
(*.f64 (*.f64 (*.f64 x-scale #s(literal 1/4 binary64)) y-scale) (sqrt.f64 #s(literal 8 binary64))) |
(*.f64 (*.f64 (*.f64 x-scale #s(literal 1/4 binary64)) (sqrt.f64 #s(literal 8 binary64))) y-scale) |
(*.f64 a (*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 b b)))) |
(*.f64 a (*.f64 (*.f64 a (*.f64 b b)) #s(literal 4 binary64))) |
(*.f64 #s(literal 4 binary64) (*.f64 (*.f64 a a) (*.f64 b b))) |
(*.f64 (*.f64 a a) (*.f64 #s(literal 4 binary64) (*.f64 b b))) |
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 b b)) (*.f64 a 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 (*.f64 a a) (*.f64 b b)) #s(literal 4 binary64)) |
(*.f64 (*.f64 a #s(literal 4 binary64)) (*.f64 a (*.f64 b 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 #s(literal 4 binary64) (*.f64 a b)) (*.f64 a b)) |
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b))) a) |
(*.f64 (*.f64 (*.f64 a #s(literal 4 binary64)) b) (*.f64 a b)) |
(*.f64 (*.f64 (*.f64 a #s(literal 4 binary64)) (*.f64 a b)) b) |
(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))) |
(*.f64 a b) |
(*.f64 b 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))) |
(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 #s(literal 1 binary64) (PI.f64)) |
(*.f64 (PI.f64) #s(literal 1 binary64)) |
(*.f64 (PI.f64) (log.f64 (exp.f64 #s(literal 1 binary64)))) |
(*.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))) |
(exp.f64 (log.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))) |
(exp.f64 (*.f64 (log.f64 (exp.f64 #s(literal 1 binary64))) (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 (exp.f64 #s(literal 1 binary64)) (log.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))) |
(pow.f64 (pow.f64 (exp.f64 #s(literal 1 binary64)) #s(literal 1 binary64)) (log.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))) |
(*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 1/2 binary64)) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 1/2 binary64))) |
(*.f64 (pow.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (pow.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 1/2 binary64)) #s(literal 1 binary64))) |
(exp.f64 (*.f64 (log.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) #s(literal 1 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)) |
(*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 1/2 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 1/2 binary64))) |
(*.f64 (pow.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (pow.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 1/2 binary64)) #s(literal 1 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))) |
(exp.f64 (log.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))) |
(exp.f64 (*.f64 (log.f64 (exp.f64 #s(literal 1 binary64))) (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 (exp.f64 #s(literal 1 binary64)) (log.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))) |
(pow.f64 (pow.f64 (exp.f64 #s(literal 1 binary64)) #s(literal 1 binary64)) (log.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))) |
(*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 1/2 binary64)) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 1/2 binary64))) |
(*.f64 (pow.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (pow.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 1/2 binary64)) #s(literal 1 binary64))) |
| 1× | egg-herbie |
| 7574× | *-lowering-*.f32 |
| 7574× | *-lowering-*.f64 |
| 3498× | +-lowering-+.f64 |
| 3498× | +-lowering-+.f32 |
| 1818× | /-lowering-/.f32 |
Useful iterations: 1 (0.0ms)
| Iter | Nodes | Cost |
|---|---|---|
| 0 | 918 | 22781 |
| 1 | 3358 | 18358 |
| 0 | 8182 | 18358 |
| 1× | iter limit |
| 1× | node limit |
| 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) |
(* 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)) |
(* 1/4 a) |
(* 1/4 a) |
(* 1/4 a) |
(* 1/4 a) |
(* 1/4 a) |
(* 1/4 a) |
(* 1/4 a) |
(* 1/4 a) |
(* 1/4 a) |
(* 1/4 a) |
(* 1/4 a) |
(* 1/4 a) |
a |
a |
a |
a |
a |
a |
a |
a |
a |
a |
a |
a |
a |
a |
a |
a |
a |
a |
a |
a |
a |
a |
a |
a |
x-scale |
x-scale |
x-scale |
x-scale |
x-scale |
x-scale |
x-scale |
x-scale |
x-scale |
x-scale |
x-scale |
x-scale |
x-scale |
x-scale |
x-scale |
x-scale |
x-scale |
x-scale |
x-scale |
x-scale |
x-scale |
x-scale |
x-scale |
x-scale |
(/ 1 (pow y-scale 2)) |
(/ 1 (pow y-scale 2)) |
(/ 1 (pow y-scale 2)) |
(/ 1 (pow y-scale 2)) |
(/ 1 (pow y-scale 2)) |
(/ 1 (pow y-scale 2)) |
(/ 1 (pow y-scale 2)) |
(/ 1 (pow y-scale 2)) |
(/ 1 (pow y-scale 2)) |
(/ 1 (pow y-scale 2)) |
(/ 1 (pow y-scale 2)) |
(/ 1 (pow y-scale 2)) |
(/ 1 (pow y-scale 2)) |
(/ 1 (pow y-scale 2)) |
(/ 1 (pow y-scale 2)) |
(/ 1 (pow y-scale 2)) |
(/ 1 (pow y-scale 2)) |
(/ 1 (pow y-scale 2)) |
(/ 1 (pow y-scale 2)) |
(/ 1 (pow y-scale 2)) |
(/ 1 (pow y-scale 2)) |
(/ 1 (pow y-scale 2)) |
(/ 1 (pow y-scale 2)) |
(/ 1 (pow y-scale 2)) |
(* a x-scale) |
(* a x-scale) |
(* a x-scale) |
(* a x-scale) |
(* a x-scale) |
(* a x-scale) |
(* a x-scale) |
(* a x-scale) |
(* a x-scale) |
(* a x-scale) |
(* a x-scale) |
(* a x-scale) |
(* a x-scale) |
(* a x-scale) |
(* a x-scale) |
(* a x-scale) |
(* a x-scale) |
(* a x-scale) |
(* a x-scale) |
(* a x-scale) |
(* a x-scale) |
(* a x-scale) |
(* a x-scale) |
(* a x-scale) |
(* a x-scale) |
(* a x-scale) |
(* a x-scale) |
(* a x-scale) |
(* a x-scale) |
(* a x-scale) |
(* a x-scale) |
(* a x-scale) |
(* a x-scale) |
(* a x-scale) |
(* a x-scale) |
(* a x-scale) |
(* a x-scale) |
(* a x-scale) |
(* a x-scale) |
(* a x-scale) |
(* a x-scale) |
(* a x-scale) |
(* a x-scale) |
(* a x-scale) |
(* a x-scale) |
(* a x-scale) |
(* a x-scale) |
(* a x-scale) |
(* -1/32400 (/ (* (pow angle 2) (pow (PI) 2)) (pow x-scale 2))) |
(* (pow angle 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow angle 2) (pow (PI) 4)) (pow x-scale 2))))) |
(* (pow angle 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* (pow angle 2) (+ (* -1 (* (pow angle 2) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2)))))) (* 1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))))))) |
(* (pow angle 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* (pow angle 2) (+ (* 1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* (pow angle 2) (+ (* -1 (* (pow angle 2) (+ (* -1/396718580736000000000 (/ (pow (PI) 8) (pow x-scale 2))) (* -1/2777030065152000000000 (/ (pow (PI) 8) (pow x-scale 2)))))) (* -1 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))))))))))) |
(* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) |
(* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) |
(* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) |
(* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) |
(* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) |
(* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) |
(* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) |
(* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) |
(* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) |
(* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) |
(* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) |
(* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) |
(* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) |
(* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) |
(* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) |
(* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) |
(* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) |
(* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) |
(* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) |
(* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) |
(* (pow angle 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))))) |
(* (pow angle 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* (pow angle 2) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/3149280000 (/ (pow (PI) 4) (pow x-scale 2)))))))) |
(* (pow angle 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* (pow angle 2) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* (pow angle 2) (+ (* -1 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))))) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2)))))))))))) |
(* (pow angle 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* (pow angle 2) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* (pow angle 2) (+ (* -1 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))))) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))) (* (pow angle 2) (+ (* -1 (+ (* -1/396718580736000000000 (/ (pow (PI) 8) (pow x-scale 2))) (* -1/2777030065152000000000 (/ (pow (PI) 8) (pow x-scale 2))))) (+ (* -1/396718580736000000000 (/ (pow (PI) 8) (pow x-scale 2))) (* -1/2777030065152000000000 (/ (pow (PI) 8) (pow x-scale 2)))))))))))))))) |
(+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) |
(+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) |
(+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) |
(+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) |
(+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) |
(+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) |
(+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) |
(+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) |
(/ (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) |
(/ (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) |
(/ (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) |
(/ (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) |
(/ (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) |
(/ (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) |
(/ (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) |
(/ (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) |
(/ (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) |
(/ (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) |
(/ (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) |
(/ (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) |
(* -1/32400 (/ (* (pow angle 2) (pow (PI) 2)) (pow x-scale 2))) |
(* (pow angle 2) (+ (* -1 (* (pow angle 2) (+ (* -1/1049760000 (/ (pow (PI) 4) (pow x-scale 2))) (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2)))))) (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))))) |
(* (pow angle 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* (pow angle 2) (+ (* -1 (* (pow angle 2) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* 1/102036672000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))))) (* -1 (+ (* -1/1049760000 (/ (pow (PI) 4) (pow x-scale 2))) (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))))))))) |
(* (pow angle 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* (pow angle 2) (+ (* -1 (+ (* -1/1049760000 (/ (pow (PI) 4) (pow x-scale 2))) (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))))) (* (pow angle 2) (+ (* -1 (* (pow angle 2) (+ (* -1/32400 (/ (* (pow (PI) 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/396718580736000000000 (/ (pow (PI) 8) (pow x-scale 2))) (+ (* -1/2777030065152000000000 (/ (pow (PI) 8) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))))))))) (* -1 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* 1/102036672000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))))))))) |
(* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) |
(* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) |
(* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) |
(* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) |
(* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) |
(* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) |
(* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) |
(* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) |
(* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) |
(* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) |
(* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) |
(* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) |
(* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) |
(* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) |
(* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) |
(* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) |
(* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) |
(* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) |
(* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) |
(* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) |
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) |
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) |
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) |
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) |
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) |
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) |
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) |
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) |
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) |
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) |
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) |
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) |
(* 1/4 (* (* a (* y-scale (sqrt 8))) (sqrt (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))))) |
(* 1/4 (* (* a (* y-scale (sqrt 8))) (sqrt (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))))) |
(* 1/4 (* (* a (* y-scale (sqrt 8))) (sqrt (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))))) |
(* 1/4 (* (* a (* y-scale (sqrt 8))) (sqrt (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))))) |
(* 1/4 (* (* a (* y-scale (sqrt 8))) (sqrt (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))))) |
(* 1/4 (* (* a (* y-scale (sqrt 8))) (sqrt (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))))) |
(* 1/4 (* (* a (* y-scale (sqrt 8))) (sqrt (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))))) |
(* 1/4 (* (* a (* y-scale (sqrt 8))) (sqrt (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))))) |
(* -1/4 (* (* a (* y-scale (sqrt 8))) (sqrt (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))))) |
(* -1/4 (* (* a (* y-scale (sqrt 8))) (sqrt (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))))) |
(* -1/4 (* (* a (* y-scale (sqrt 8))) (sqrt (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))))) |
(* -1/4 (* (* a (* y-scale (sqrt 8))) (sqrt (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))))) |
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) |
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) |
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) |
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) |
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) |
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) |
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) |
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) |
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) |
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) |
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) |
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) |
(* 1/4 (* (* a (* angle (* x-scale (* y-scale (sqrt 8))))) (sqrt (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))))))) |
(* angle (+ (* 1/8 (* (* a (* (pow angle 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))))))))) (sqrt (/ 1 (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2)))))))) (* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))))))))) |
(* angle (+ (* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))))))) (* (pow angle 2) (+ (* 1/8 (* (* a (* x-scale (* y-scale (* (sqrt 8) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/3149280000 (/ (pow (PI) 4) (pow x-scale 2)))))))) (sqrt (/ 1 (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2)))))))) (* 1/8 (* (* a (* (pow angle 2) (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))))) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/3149280000 (/ (pow (PI) 4) (pow x-scale 2)))) 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2)))))))))))) (sqrt (/ 1 (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2)))))))))))) |
(* angle (+ (* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))))))) (* (pow angle 2) (+ (* 1/8 (* (* a (* x-scale (* y-scale (* (sqrt 8) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/3149280000 (/ (pow (PI) 4) (pow x-scale 2)))))))) (sqrt (/ 1 (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2)))))))) (* (pow angle 2) (+ (* 1/8 (* (* a (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))))) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/3149280000 (/ (pow (PI) 4) (pow x-scale 2)))) 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))))))))))) (sqrt (/ 1 (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2)))))))) (* 1/8 (* (* a (* (pow angle 2) (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1 (+ (* -1/396718580736000000000 (/ (pow (PI) 8) (pow x-scale 2))) (* -1/2777030065152000000000 (/ (pow (PI) 8) (pow x-scale 2))))) (+ (* -1/396718580736000000000 (/ (pow (PI) 8) (pow x-scale 2))) (* -1/2777030065152000000000 (/ (pow (PI) 8) (pow x-scale 2))))) (* 1/2 (/ (* (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/3149280000 (/ (pow (PI) 4) (pow x-scale 2)))) (- (+ (* -1 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))))) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/3149280000 (/ (pow (PI) 4) (pow x-scale 2)))) 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2)))))))) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2)))))))))))) (sqrt (/ 1 (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2)))))))))))))) |
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) |
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) |
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) |
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) |
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) |
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) |
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) |
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) |
1 |
(+ 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/64800 (* (pow angle 2) (pow (PI) 2))) |
(* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* 1/24 (* (pow angle 2) (+ (* -1/349920000 (pow (PI) 4)) (* 1/1049760000 (pow (PI) 4))))))) |
(* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* (pow angle 2) (+ (* 1/720 (* (pow angle 2) (+ (* -1/1133740800000 (pow (PI) 6)) (+ (* -1/34012224000000 (pow (PI) 6)) (* 1/2267481600000 (pow (PI) 6)))))) (* 1/24 (+ (* -1/349920000 (pow (PI) 4)) (* 1/1049760000 (pow (PI) 4)))))))) |
(* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* (pow angle 2) (+ (* 1/24 (+ (* -1/349920000 (pow (PI) 4)) (* 1/1049760000 (pow (PI) 4)))) (* (pow angle 2) (+ (* 1/40320 (* (pow angle 2) (+ (* -7/12244400640000000 (pow (PI) 8)) (+ (* -7/220399211520000000 (pow (PI) 8)) (+ (* -7/275499014400000000 (pow (PI) 8)) (+ (* 1/1101996057600000000 (pow (PI) 8)) (* 7/18366600960000000 (pow (PI) 8)))))))) (* 1/720 (+ (* -1/1133740800000 (pow (PI) 6)) (+ (* -1/34012224000000 (pow (PI) 6)) (* 1/2267481600000 (pow (PI) 6))))))))))) |
(log (cos (* 1/180 (* angle (PI))))) |
(log (cos (* 1/180 (* angle (PI))))) |
(log (cos (* 1/180 (* angle (PI))))) |
(log (cos (* 1/180 (* angle (PI))))) |
(log (cos (* 1/180 (* angle (PI))))) |
(log (cos (* 1/180 (* angle (PI))))) |
(log (cos (* 1/180 (* angle (PI))))) |
(log (cos (* 1/180 (* angle (PI))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) |
(* x-scale (+ (* -1/16 (* (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (sqrt (/ 1 (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) |
(* x-scale (+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (* (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 b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 6) (pow (cos (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (pow (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) 2) (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))))) (sqrt (/ 1 (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))) (* -1/16 (* (/ (* y-scale (* (sqrt 8) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (sqrt (/ 1 (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))))) |
(* x-scale (+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* (pow x-scale 2) (+ (* -1/16 (* (/ (* y-scale (* (sqrt 8) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (sqrt (/ 1 (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))) (* (pow x-scale 2) (+ (* -1/8 (* (* y-scale (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 6) (pow (cos (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (pow (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) 2) (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))))) (sqrt (/ 1 (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (* (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 b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 8) (pow (cos (* 1/180 (* angle (PI)))) 8)))) (* 1/4 (/ (pow (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) 2) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* 1/4 (/ (* (+ (* -1/4 (/ (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 6) (pow (cos (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (pow (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) 2) (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))))) (sqrt (/ 1 (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))))))) |
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) |
(+ (* -1/16 (* (/ (* (pow y-scale 3) (* (sqrt 8) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 2) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (sqrt (/ 1 (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) |
(+ (* -1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* -1/4 (/ (* (pow y-scale 6) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (* (pow y-scale 4) (pow (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) 2)) (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))))) (pow x-scale 4)) (sqrt (/ 1 (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (+ (* -1/16 (* (/ (* (pow y-scale 3) (* (sqrt 8) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 2) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (sqrt (/ 1 (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) |
(+ (* -1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* -1/2 (/ (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow y-scale 8) (* (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 8) (pow (sin (* 1/180 (* angle (PI)))) 8)))) (* 1/4 (/ (* (pow y-scale 4) (pow (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* 1/4 (/ (* (pow y-scale 2) (* (+ (* -1/4 (/ (* (pow y-scale 6) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (* (pow y-scale 4) (pow (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) 2)) (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))))) (pow x-scale 6)) (sqrt (/ 1 (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (+ (* -1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* -1/4 (/ (* (pow y-scale 6) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (* (pow y-scale 4) (pow (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) 2)) (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))))) (pow x-scale 4)) (sqrt (/ 1 (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (+ (* -1/16 (* (/ (* (pow y-scale 3) (* (sqrt 8) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 2) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (sqrt (/ 1 (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))) |
(* -1/4 (* (* y-scale (sqrt 8)) (sqrt (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) |
(+ (* -1/4 (* (* y-scale (sqrt 8)) (sqrt (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/16 (* (/ (* (pow y-scale 3) (* (sqrt 8) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 2) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (sqrt (/ 1 (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) |
(+ (* -1/4 (* (* y-scale (sqrt 8)) (sqrt (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (+ (* 1/16 (* (/ (* (pow y-scale 3) (* (sqrt 8) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 2) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (sqrt (/ 1 (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* -1/4 (/ (* (pow y-scale 6) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (* (pow y-scale 4) (pow (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) 2)) (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))))) (pow x-scale 4)) (sqrt (/ 1 (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))) |
(+ (* -1/4 (* (* y-scale (sqrt 8)) (sqrt (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (+ (* 1/16 (* (/ (* (pow y-scale 3) (* (sqrt 8) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 2) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (sqrt (/ 1 (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* -1/2 (/ (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow y-scale 8) (* (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 8) (pow (sin (* 1/180 (* angle (PI)))) 8)))) (* 1/4 (/ (* (pow y-scale 4) (pow (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* 1/4 (/ (* (pow y-scale 2) (* (+ (* -1/4 (/ (* (pow y-scale 6) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (* (pow y-scale 4) (pow (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) 2)) (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))))) (pow x-scale 6)) (sqrt (/ 1 (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* -1/4 (/ (* (pow y-scale 6) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (* (pow y-scale 4) (pow (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) 2)) (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))))) (pow x-scale 4)) (sqrt (/ 1 (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) |
(* y-scale (+ (* -1/16 (* (/ (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (/ 1 (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) |
(* y-scale (+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* (pow y-scale 2) (+ (* -1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (pow (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) 2) (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))))) (sqrt (/ 1 (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (* -1/16 (* (/ (* x-scale (* (sqrt 8) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (/ 1 (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))))) |
(* y-scale (+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* (pow y-scale 2) (+ (* -1/16 (* (/ (* x-scale (* (sqrt 8) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (/ 1 (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (* (pow y-scale 2) (+ (* -1/8 (* (* x-scale (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (pow (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) 2) (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))))) (sqrt (/ 1 (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (* -1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (+ (* -1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 8) (pow (sin (* 1/180 (* angle (PI)))) 8)))) (* 1/4 (/ (pow (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) 2) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* 1/4 (/ (* (+ (* -1/4 (/ (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (pow (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) 2) (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))))) (sqrt (/ 1 (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))))))) |
(* 1/4 (* (* x-scale (sqrt 8)) (sqrt (- (* (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)))))))) |
(+ (* -1/16 (* (/ (* (pow x-scale 3) (* (sqrt 8) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 2) (* (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (sqrt (/ 1 (- (* (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))))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (- (* (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))))))))) |
(+ (* -1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* -1/4 (/ (* (pow x-scale 6) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 6) (pow (cos (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 4) (pow (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) 2)) (* (pow b 4) (* (pow (cos (* 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 b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))))) (pow y-scale 4)) (sqrt (/ 1 (- (* (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))))))))) (+ (* -1/16 (* (/ (* (pow x-scale 3) (* (sqrt 8) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 2) (* (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (sqrt (/ 1 (- (* (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))))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (- (* (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)))))))))) |
(+ (* -1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 8) (* (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 8) (pow (cos (* 1/180 (* angle (PI)))) 8)))) (* 1/4 (/ (* (pow x-scale 4) (pow (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* 1/4 (/ (* (pow x-scale 2) (* (+ (* -1/4 (/ (* (pow x-scale 6) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 6) (pow (cos (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 4) (pow (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) 2)) (* (pow b 4) (* (pow (cos (* 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 b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 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 (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 y-scale 6)) (sqrt (/ 1 (- (* (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))))))))) (+ (* -1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* -1/4 (/ (* (pow x-scale 6) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 6) (pow (cos (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 4) (pow (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) 2)) (* (pow b 4) (* (pow (cos (* 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 b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))))) (pow y-scale 4)) (sqrt (/ 1 (- (* (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))))))))) (+ (* -1/16 (* (/ (* (pow x-scale 3) (* (sqrt 8) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 2) (* (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (sqrt (/ 1 (- (* (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))))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (- (* (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))))))))))) |
(* -1/4 (* (* x-scale (sqrt 8)) (sqrt (- (* (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)))))))) |
(+ (* -1/4 (* (* x-scale (sqrt 8)) (sqrt (- (* (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)))))))) (* 1/16 (* (/ (* (pow x-scale 3) (* (sqrt 8) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 2) (* (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (sqrt (/ 1 (- (* (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)))))))))) |
(+ (* -1/4 (* (* x-scale (sqrt 8)) (sqrt (- (* (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)))))))) (+ (* 1/16 (* (/ (* (pow x-scale 3) (* (sqrt 8) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 2) (* (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (sqrt (/ 1 (- (* (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))))))))) (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* -1/4 (/ (* (pow x-scale 6) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 6) (pow (cos (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 4) (pow (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) 2)) (* (pow b 4) (* (pow (cos (* 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 b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))))) (pow y-scale 4)) (sqrt (/ 1 (- (* (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))))))))))) |
(+ (* -1/4 (* (* x-scale (sqrt 8)) (sqrt (- (* (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)))))))) (+ (* 1/16 (* (/ (* (pow x-scale 3) (* (sqrt 8) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 2) (* (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (sqrt (/ 1 (- (* (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))))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 8) (* (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 8) (pow (cos (* 1/180 (* angle (PI)))) 8)))) (* 1/4 (/ (* (pow x-scale 4) (pow (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* 1/4 (/ (* (pow x-scale 2) (* (+ (* -1/4 (/ (* (pow x-scale 6) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 6) (pow (cos (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 4) (pow (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) 2)) (* (pow b 4) (* (pow (cos (* 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 b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 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 (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 y-scale 6)) (sqrt (/ 1 (- (* (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))))))))) (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* -1/4 (/ (* (pow x-scale 6) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 6) (pow (cos (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 4) (pow (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) 2)) (* (pow b 4) (* (pow (cos (* 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 b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))))) (pow y-scale 4)) (sqrt (/ 1 (- (* (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)))))))))))) |
(* 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 (* (* angle (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (* (pow b 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/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2))))))) |
(* angle (+ (* 1/8 (* (* (pow angle 2) (* x-scale (* y-scale (* (sqrt 8) (- (* (pow b 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) (- (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))) 2)) (pow b 4))))) (pow b 2)))))))) (sqrt (/ 1 (- (* (pow b 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/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (* (pow b 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/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2))))))))) |
(* angle (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (* (pow b 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/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2))))))) (* (pow angle 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (* (pow b 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) (- (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))) 2)) (pow b 4))))) (pow b 2))))))) (sqrt (/ 1 (- (* (pow b 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/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)))))))) (* 1/8 (* (* (pow angle 2) (* x-scale (* y-scale (* (sqrt 8) (- (* (pow b 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 (- (* (pow b 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) (- (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))) 2)) (pow b 4))))) (pow b 2)))) 2) (- (* (pow b 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/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)))))) (* 1/2 (/ (* (pow x-scale 2) (- (+ (* 4 (/ (* (pow b 4) (+ (* 1/2040733440000000 (pow (PI) 6)) (+ (* 1/1224440064000000 (pow (PI) 6)) (+ (* 1/102036672000000 (pow (PI) 6)) (* 1/32400 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (+ (* -1/408146688000000 (/ (pow (PI) 6) (pow x-scale 4))) (+ (* -1/6122200320000000 (/ (pow (PI) 6) (pow x-scale 4))) (* 2 (* (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (- (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2)))))))) (+ (* 1/1020366720000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/612220032000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (pow x-scale 4) (* (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))) (- (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))) 2)) (pow b 4)))))) (pow b 4))))) (pow b 2))))))))) (sqrt (/ 1 (- (* (pow b 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/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)))))))))))) |
(* angle (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (* (pow b 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/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2))))))) (* (pow angle 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (* (pow b 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) (- (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))) 2)) (pow b 4))))) (pow b 2))))))) (sqrt (/ 1 (- (* (pow b 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/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)))))))) (* (pow angle 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (* (pow b 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 (- (* (pow b 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) (- (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))) 2)) (pow b 4))))) (pow b 2)))) 2) (- (* (pow b 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/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)))))) (* 1/2 (/ (* (pow x-scale 2) (- (+ (* 4 (/ (* (pow b 4) (+ (* 1/2040733440000000 (pow (PI) 6)) (+ (* 1/1224440064000000 (pow (PI) 6)) (+ (* 1/102036672000000 (pow (PI) 6)) (* 1/32400 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (+ (* -1/408146688000000 (/ (pow (PI) 6) (pow x-scale 4))) (+ (* -1/6122200320000000 (/ (pow (PI) 6) (pow x-scale 4))) (* 2 (* (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (- (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2)))))))) (+ (* 1/1020366720000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/612220032000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (pow x-scale 4) (* (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))) (- (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))) 2)) (pow b 4)))))) (pow b 4))))) (pow b 2)))))))) (sqrt (/ 1 (- (* (pow b 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/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)))))))) (* 1/8 (* (* (pow angle 2) (* x-scale (* y-scale (* (sqrt 8) (- (* (pow b 2) (+ (* -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 b 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) (- (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))) 2)) (pow b 4))))) (pow b 2)))) (- (* (pow b 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 (- (* (pow b 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) (- (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))) 2)) (pow b 4))))) (pow b 2)))) 2) (- (* (pow b 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/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)))))) (* 1/2 (/ (* (pow x-scale 2) (- (+ (* 4 (/ (* (pow b 4) (+ (* 1/2040733440000000 (pow (PI) 6)) (+ (* 1/1224440064000000 (pow (PI) 6)) (+ (* 1/102036672000000 (pow (PI) 6)) (* 1/32400 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (+ (* -1/408146688000000 (/ (pow (PI) 6) (pow x-scale 4))) (+ (* -1/6122200320000000 (/ (pow (PI) 6) (pow x-scale 4))) (* 2 (* (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (- (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2)))))))) (+ (* 1/1020366720000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/612220032000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (pow x-scale 4) (* (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))) (- (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))) 2)) (pow b 4)))))) (pow b 4))))) (pow b 2)))))) (- (* (pow b 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/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)))))) (* 1/2 (/ (* (pow x-scale 2) (- (+ (* 4 (/ (* (pow b 4) (+ (* -1/32400 (* (pow (PI) 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))) (+ (* -1/3149280000 (* (pow (PI) 4) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (+ (* -1/396718580736000000000 (pow (PI) 8)) (+ (* -1/2777030065152000000000 (pow (PI) 8)) (* 1/32400 (* (pow (PI) 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (+ (* 1/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))))))) (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 (- (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))) 2)) (pow b 4)))) 2)) (pow b 4))) (* 1/2 (/ (* (pow x-scale 4) (* (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))) (- (+ (* 4 (/ (* (pow b 4) (+ (* 1/2040733440000000 (pow (PI) 6)) (+ (* 1/1224440064000000 (pow (PI) 6)) (+ (* 1/102036672000000 (pow (PI) 6)) (* 1/32400 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (+ (* -1/408146688000000 (/ (pow (PI) 6) (pow x-scale 4))) (+ (* -1/6122200320000000 (/ (pow (PI) 6) (pow x-scale 4))) (* 2 (* (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (- (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2)))))))) (+ (* 1/1020366720000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/612220032000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (pow x-scale 4) (* (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))) (- (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))) 2)) (pow b 4)))))) (pow b 4)))))) (pow b 4)))))) (pow b 2))))))))) (sqrt (/ 1 (- (* (pow b 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/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 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 (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (pow (- (/ (pow (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 (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (pow (- (/ (pow (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 (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (pow (- (/ (pow (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 (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (pow (- (/ (pow (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 (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (pow (- (/ (pow (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 (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (pow (- (/ (pow (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 (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (pow (- (/ (pow (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 (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (pow (- (/ (pow (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)))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(* 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) |
(* 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) |
(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 |
(+ 1 (* -1/64800 (* (pow angle 2) (pow (PI) 2)))) |
(+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* 1/25194240000 (* (pow angle 2) (pow (PI) 4)))))) |
(+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/24488801280000000 (* (pow angle 2) (pow (PI) 6))) (* 1/25194240000 (pow (PI) 4))))))) |
(cos (* 1/180 (* angle (PI)))) |
(cos (* 1/180 (* angle (PI)))) |
(cos (* 1/180 (* angle (PI)))) |
(cos (* 1/180 (* angle (PI)))) |
(cos (* 1/180 (* angle (PI)))) |
(cos (* 1/180 (* angle (PI)))) |
(cos (* 1/180 (* angle (PI)))) |
(cos (* 1/180 (* angle (PI)))) |
(* 1/180 (* angle (PI))) |
(* angle (+ (* -1/34992000 (* (pow angle 2) (pow (PI) 3))) (* 1/180 (PI)))) |
(* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* 1/22674816000000 (* (pow angle 2) (pow (PI) 5))))))) |
(* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* (pow angle 2) (+ (* -1/30855889612800000000 (* (pow angle 2) (pow (PI) 7))) (* 1/22674816000000 (pow (PI) 5)))))))) |
(sin (* 1/180 (* angle (PI)))) |
(sin (* 1/180 (* angle (PI)))) |
(sin (* 1/180 (* angle (PI)))) |
(sin (* 1/180 (* angle (PI)))) |
(sin (* 1/180 (* angle (PI)))) |
(sin (* 1/180 (* angle (PI)))) |
(sin (* 1/180 (* angle (PI)))) |
(sin (* 1/180 (* angle (PI)))) |
1 |
(+ 1 (* -1/64800 (* (pow angle 2) (pow (PI) 2)))) |
(+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* 1/25194240000 (* (pow angle 2) (pow (PI) 4)))))) |
(+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/24488801280000000 (* (pow angle 2) (pow (PI) 6))) (* 1/25194240000 (pow (PI) 4))))))) |
(cos (* 1/180 (* angle (PI)))) |
(cos (* 1/180 (* angle (PI)))) |
(cos (* 1/180 (* angle (PI)))) |
(cos (* 1/180 (* angle (PI)))) |
(cos (* 1/180 (* angle (PI)))) |
(cos (* 1/180 (* angle (PI)))) |
(cos (* 1/180 (* angle (PI)))) |
(cos (* 1/180 (* angle (PI)))) |
| 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) |
(* 1/4 (* a x-scale)) |
(*.f64 (*.f64 a x-scale) #s(literal 1/4 binary64)) |
(* 1/4 (* a x-scale)) |
(*.f64 (*.f64 a x-scale) #s(literal 1/4 binary64)) |
(* 1/4 (* a x-scale)) |
(*.f64 (*.f64 a x-scale) #s(literal 1/4 binary64)) |
(* 1/4 (* a x-scale)) |
(*.f64 (*.f64 a x-scale) #s(literal 1/4 binary64)) |
(* 1/4 (* a x-scale)) |
(*.f64 (*.f64 a x-scale) #s(literal 1/4 binary64)) |
(* 1/4 (* a x-scale)) |
(*.f64 (*.f64 a x-scale) #s(literal 1/4 binary64)) |
(* 1/4 (* a x-scale)) |
(*.f64 (*.f64 a x-scale) #s(literal 1/4 binary64)) |
(* 1/4 (* a x-scale)) |
(*.f64 (*.f64 a x-scale) #s(literal 1/4 binary64)) |
(* 1/4 (* a x-scale)) |
(*.f64 (*.f64 a x-scale) #s(literal 1/4 binary64)) |
(* 1/4 (* a x-scale)) |
(*.f64 (*.f64 a x-scale) #s(literal 1/4 binary64)) |
(* 1/4 (* a x-scale)) |
(*.f64 (*.f64 a x-scale) #s(literal 1/4 binary64)) |
(* 1/4 (* a x-scale)) |
(*.f64 (*.f64 a x-scale) #s(literal 1/4 binary64)) |
(* 1/4 (* a x-scale)) |
(*.f64 (*.f64 a x-scale) #s(literal 1/4 binary64)) |
(* 1/4 (* a x-scale)) |
(*.f64 (*.f64 a x-scale) #s(literal 1/4 binary64)) |
(* 1/4 (* a x-scale)) |
(*.f64 (*.f64 a x-scale) #s(literal 1/4 binary64)) |
(* 1/4 (* a x-scale)) |
(*.f64 (*.f64 a x-scale) #s(literal 1/4 binary64)) |
(* 1/4 (* a x-scale)) |
(*.f64 (*.f64 a x-scale) #s(literal 1/4 binary64)) |
(* 1/4 (* a x-scale)) |
(*.f64 (*.f64 a x-scale) #s(literal 1/4 binary64)) |
(* 1/4 (* a x-scale)) |
(*.f64 (*.f64 a x-scale) #s(literal 1/4 binary64)) |
(* 1/4 (* a x-scale)) |
(*.f64 (*.f64 a x-scale) #s(literal 1/4 binary64)) |
(* 1/4 (* a x-scale)) |
(*.f64 (*.f64 a x-scale) #s(literal 1/4 binary64)) |
(* 1/4 (* a x-scale)) |
(*.f64 (*.f64 a x-scale) #s(literal 1/4 binary64)) |
(* 1/4 (* a x-scale)) |
(*.f64 (*.f64 a x-scale) #s(literal 1/4 binary64)) |
(* 1/4 (* a x-scale)) |
(*.f64 (*.f64 a x-scale) #s(literal 1/4 binary64)) |
(* 1/4 a) |
(*.f64 a #s(literal 1/4 binary64)) |
(* 1/4 a) |
(*.f64 a #s(literal 1/4 binary64)) |
(* 1/4 a) |
(*.f64 a #s(literal 1/4 binary64)) |
(* 1/4 a) |
(*.f64 a #s(literal 1/4 binary64)) |
(* 1/4 a) |
(*.f64 a #s(literal 1/4 binary64)) |
(* 1/4 a) |
(*.f64 a #s(literal 1/4 binary64)) |
(* 1/4 a) |
(*.f64 a #s(literal 1/4 binary64)) |
(* 1/4 a) |
(*.f64 a #s(literal 1/4 binary64)) |
(* 1/4 a) |
(*.f64 a #s(literal 1/4 binary64)) |
(* 1/4 a) |
(*.f64 a #s(literal 1/4 binary64)) |
(* 1/4 a) |
(*.f64 a #s(literal 1/4 binary64)) |
(* 1/4 a) |
(*.f64 a #s(literal 1/4 binary64)) |
a |
a |
a |
a |
a |
a |
a |
a |
a |
a |
a |
a |
a |
a |
a |
a |
a |
a |
a |
a |
a |
a |
a |
a |
x-scale |
x-scale |
x-scale |
x-scale |
x-scale |
x-scale |
x-scale |
x-scale |
x-scale |
x-scale |
x-scale |
x-scale |
x-scale |
x-scale |
x-scale |
x-scale |
x-scale |
x-scale |
x-scale |
x-scale |
x-scale |
x-scale |
x-scale |
x-scale |
(/ 1 (pow y-scale 2)) |
(/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) |
(/ 1 (pow y-scale 2)) |
(/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) |
(/ 1 (pow y-scale 2)) |
(/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) |
(/ 1 (pow y-scale 2)) |
(/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) |
(/ 1 (pow y-scale 2)) |
(/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) |
(/ 1 (pow y-scale 2)) |
(/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) |
(/ 1 (pow y-scale 2)) |
(/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) |
(/ 1 (pow y-scale 2)) |
(/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) |
(/ 1 (pow y-scale 2)) |
(/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) |
(/ 1 (pow y-scale 2)) |
(/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) |
(/ 1 (pow y-scale 2)) |
(/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) |
(/ 1 (pow y-scale 2)) |
(/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) |
(/ 1 (pow y-scale 2)) |
(/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) |
(/ 1 (pow y-scale 2)) |
(/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) |
(/ 1 (pow y-scale 2)) |
(/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) |
(/ 1 (pow y-scale 2)) |
(/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) |
(/ 1 (pow y-scale 2)) |
(/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) |
(/ 1 (pow y-scale 2)) |
(/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) |
(/ 1 (pow y-scale 2)) |
(/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) |
(/ 1 (pow y-scale 2)) |
(/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) |
(/ 1 (pow y-scale 2)) |
(/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) |
(/ 1 (pow y-scale 2)) |
(/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) |
(/ 1 (pow y-scale 2)) |
(/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) |
(/ 1 (pow y-scale 2)) |
(/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 a x-scale) |
(* a x-scale) |
(*.f64 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/32400 (/ (* (pow angle 2) (pow (PI) 2)) (pow x-scale 2))) |
(*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 angle angle) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) |
(* (pow angle 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/3149280000 (/ (* (pow angle 2) (pow (PI) 4)) (pow x-scale 2))))) |
(*.f64 (*.f64 angle angle) (+.f64 (/.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.f64 (*.f64 angle angle) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale))))) |
(* (pow angle 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* (pow angle 2) (+ (* -1 (* (pow angle 2) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2)))))) (* 1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))))))) |
(*.f64 (*.f64 angle angle) (+.f64 (/.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 angle angle) (-.f64 (/.f64 (*.f64 #s(literal 1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 angle angle) (*.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))) (* (pow angle 2) (+ (* 1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* (pow angle 2) (+ (* -1 (* (pow angle 2) (+ (* -1/396718580736000000000 (/ (pow (PI) 8) (pow x-scale 2))) (* -1/2777030065152000000000 (/ (pow (PI) 8) (pow x-scale 2)))))) (* -1 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))))))))))) |
(*.f64 (*.f64 angle angle) (+.f64 (/.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 angle angle) (+.f64 (/.f64 (*.f64 #s(literal 1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 angle angle) (+.f64 (*.f64 (*.f64 angle angle) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 8 binary64)) (*.f64 x-scale x-scale)) #s(literal 1/347128758144000000000 binary64))) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 x-scale x-scale)) #s(literal -1/765275040000000 binary64)))))))) |
(* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) |
(/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale))) |
(* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) |
(/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale))) |
(* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) |
(/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale))) |
(* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) |
(/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale))) |
(* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) |
(/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale))) |
(* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) |
(/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale))) |
(* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) |
(/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale))) |
(* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) |
(/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale))) |
(* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) |
(/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale))) |
(* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) |
(/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale))) |
(* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) |
(/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale))) |
(* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) |
(/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale))) |
(* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) |
(/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale))) |
(* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) |
(/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale))) |
(* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) |
(/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale))) |
(* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) |
(/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale))) |
(* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) |
(/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale))) |
(* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) |
(/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale))) |
(* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) |
(/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale))) |
(* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) |
(/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale))) |
(* (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 #s(literal 0 binary64) (*.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))) (* (pow angle 2) (+ (* -1 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))))) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2)))))))))))) |
(*.f64 (*.f64 angle angle) (+.f64 #s(literal 0 binary64) (*.f64 (*.f64 angle angle) (+.f64 #s(literal 0 binary64) (*.f64 (*.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))) (* (pow angle 2) (+ (* -1 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))))) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))) (* (pow angle 2) (+ (* -1 (+ (* -1/396718580736000000000 (/ (pow (PI) 8) (pow x-scale 2))) (* -1/2777030065152000000000 (/ (pow (PI) 8) (pow x-scale 2))))) (+ (* -1/396718580736000000000 (/ (pow (PI) 8) (pow x-scale 2))) (* -1/2777030065152000000000 (/ (pow (PI) 8) (pow x-scale 2)))))))))))))))) |
(*.f64 (*.f64 angle angle) (+.f64 #s(literal 0 binary64) (*.f64 (*.f64 angle angle) (+.f64 #s(literal 0 binary64) (*.f64 (*.f64 angle angle) (+.f64 (*.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) #s(literal 0 binary64))))))))) |
(+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) |
#s(literal 0 binary64) |
(+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) |
#s(literal 0 binary64) |
(+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) |
#s(literal 0 binary64) |
(+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) |
#s(literal 0 binary64) |
(+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) |
#s(literal 0 binary64) |
(+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) |
#s(literal 0 binary64) |
(+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) |
#s(literal 0 binary64) |
(+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) |
#s(literal 0 binary64) |
(/ (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) |
(/.f64 #s(literal 0 binary64) (*.f64 x-scale x-scale)) |
(/ (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) |
(/.f64 #s(literal 0 binary64) (*.f64 x-scale x-scale)) |
(/ (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) |
(/.f64 #s(literal 0 binary64) (*.f64 x-scale x-scale)) |
(/ (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) |
(/.f64 #s(literal 0 binary64) (*.f64 x-scale x-scale)) |
(/ (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) |
(/.f64 #s(literal 0 binary64) (*.f64 x-scale x-scale)) |
(/ (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) |
(/.f64 #s(literal 0 binary64) (*.f64 x-scale x-scale)) |
(/ (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) |
(/.f64 #s(literal 0 binary64) (*.f64 x-scale x-scale)) |
(/ (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) |
(/.f64 #s(literal 0 binary64) (*.f64 x-scale x-scale)) |
(/ (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) |
(/.f64 #s(literal 0 binary64) (*.f64 x-scale x-scale)) |
(/ (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) |
(/.f64 #s(literal 0 binary64) (*.f64 x-scale x-scale)) |
(/ (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) |
(/.f64 #s(literal 0 binary64) (*.f64 x-scale x-scale)) |
(/ (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) |
(/.f64 #s(literal 0 binary64) (*.f64 x-scale x-scale)) |
(* -1/32400 (/ (* (pow angle 2) (pow (PI) 2)) (pow x-scale 2))) |
(*.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 angle angle) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) |
(* (pow angle 2) (+ (* -1 (* (pow angle 2) (+ (* -1/1049760000 (/ (pow (PI) 4) (pow x-scale 2))) (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2)))))) (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))))) |
(*.f64 (*.f64 angle angle) (+.f64 (/.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 angle angle) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) #s(literal 1/787320000 binary64))))) |
(* (pow angle 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* (pow angle 2) (+ (* -1 (* (pow angle 2) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* 1/102036672000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))))) (* -1 (+ (* -1/1049760000 (/ (pow (PI) 4) (pow x-scale 2))) (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))))))))) |
(*.f64 (*.f64 angle angle) (+.f64 (/.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 angle angle) (-.f64 (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) #s(literal 1/787320000 binary64)) (*.f64 (*.f64 angle angle) (+.f64 (/.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 x-scale x-scale)) (+.f64 (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 x-scale x-scale)) #s(literal 13/1224440064000000 binary64)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale))))))))) |
(* (pow angle 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* (pow angle 2) (+ (* -1 (+ (* -1/1049760000 (/ (pow (PI) 4) (pow x-scale 2))) (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))))) (* (pow angle 2) (+ (* -1 (* (pow angle 2) (+ (* -1/32400 (/ (* (pow (PI) 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow (PI) 4) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/396718580736000000000 (/ (pow (PI) 8) (pow x-scale 2))) (+ (* -1/2777030065152000000000 (/ (pow (PI) 8) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))))))))) (* -1 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* 1/102036672000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/32400 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))))))))) |
(*.f64 (*.f64 angle angle) (+.f64 (/.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 angle angle) (+.f64 (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) #s(literal 1/787320000 binary64)) (*.f64 (*.f64 angle angle) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 angle angle) (+.f64 (*.f64 (/.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (PI.f64) (PI.f64))) x-scale) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) x-scale)) (+.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/3149280000 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale)) (+.f64 (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 8 binary64)) (*.f64 x-scale x-scale)) #s(literal -1/347128758144000000000 binary64)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))) (*.f64 x-scale x-scale))))))) (+.f64 (/.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 x-scale x-scale)) (+.f64 (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 x-scale x-scale)) #s(literal 13/1224440064000000 binary64)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale)))))))))) |
(* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) |
(*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale)))) |
(* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) |
(*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale)))) |
(* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) |
(*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale)))) |
(* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) |
(*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale)))) |
(* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) |
(*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale)))) |
(* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) |
(*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale)))) |
(* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) |
(*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale)))) |
(* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) |
(*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale)))) |
(* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) |
(*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale)))) |
(* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) |
(*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale)))) |
(* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) |
(*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale)))) |
(* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) |
(*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale)))) |
(* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) |
(*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale)))) |
(* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) |
(*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale)))) |
(* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) |
(*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale)))) |
(* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) |
(*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale)))) |
(* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) |
(*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale)))) |
(* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) |
(*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale)))) |
(* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) |
(*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale)))) |
(* -1 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) |
(*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale)))) |
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 #s(literal 0 binary64)))) |
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 #s(literal 0 binary64)))) |
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 #s(literal 0 binary64)))) |
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 #s(literal 0 binary64)))) |
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 #s(literal 0 binary64)))) |
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 #s(literal 0 binary64)))) |
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 #s(literal 0 binary64)))) |
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 #s(literal 0 binary64)))) |
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 #s(literal 0 binary64)))) |
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 #s(literal 0 binary64)))) |
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 #s(literal 0 binary64)))) |
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 #s(literal 0 binary64)))) |
(* 1/4 (* (* a (* y-scale (sqrt 8))) (sqrt (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 #s(literal 0 binary64)))) |
(* 1/4 (* (* a (* y-scale (sqrt 8))) (sqrt (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 #s(literal 0 binary64)))) |
(* 1/4 (* (* a (* y-scale (sqrt 8))) (sqrt (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 #s(literal 0 binary64)))) |
(* 1/4 (* (* a (* y-scale (sqrt 8))) (sqrt (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 #s(literal 0 binary64)))) |
(* 1/4 (* (* a (* y-scale (sqrt 8))) (sqrt (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 #s(literal 0 binary64)))) |
(* 1/4 (* (* a (* y-scale (sqrt 8))) (sqrt (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 #s(literal 0 binary64)))) |
(* 1/4 (* (* a (* y-scale (sqrt 8))) (sqrt (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 #s(literal 0 binary64)))) |
(* 1/4 (* (* a (* y-scale (sqrt 8))) (sqrt (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 #s(literal 0 binary64)))) |
(* -1/4 (* (* a (* y-scale (sqrt 8))) (sqrt (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))))) |
(*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 a (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 #s(literal 0 binary64))) |
(* -1/4 (* (* a (* y-scale (sqrt 8))) (sqrt (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))))) |
(*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 a (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 #s(literal 0 binary64))) |
(* -1/4 (* (* a (* y-scale (sqrt 8))) (sqrt (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))))) |
(*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 a (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 #s(literal 0 binary64))) |
(* -1/4 (* (* a (* y-scale (sqrt 8))) (sqrt (+ (* -1 (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 2))))) |
(*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 a (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 #s(literal 0 binary64))) |
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 #s(literal 0 binary64)))) |
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 #s(literal 0 binary64)))) |
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 #s(literal 0 binary64)))) |
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 #s(literal 0 binary64)))) |
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 #s(literal 0 binary64)))) |
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 #s(literal 0 binary64)))) |
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 #s(literal 0 binary64)))) |
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 #s(literal 0 binary64)))) |
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 #s(literal 0 binary64)))) |
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 #s(literal 0 binary64)))) |
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 #s(literal 0 binary64)))) |
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 #s(literal 0 binary64)))) |
(* 1/4 (* (* a (* angle (* x-scale (* y-scale (sqrt 8))))) (sqrt (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (*.f64 a angle) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 #s(literal 0 binary64)))) |
(* angle (+ (* 1/8 (* (* a (* (pow angle 2) (* x-scale (* y-scale (* (sqrt 8) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))))))))) (sqrt (/ 1 (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2)))))))) (* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))))))))) |
(*.f64 angle (+.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (*.f64 a (*.f64 angle angle)) (*.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))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 #s(literal 0 binary64)))))) |
(* angle (+ (* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))))))) (* (pow angle 2) (+ (* 1/8 (* (* a (* x-scale (* y-scale (* (sqrt 8) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/3149280000 (/ (pow (PI) 4) (pow x-scale 2)))))))) (sqrt (/ 1 (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2)))))))) (* 1/8 (* (* a (* (pow angle 2) (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))))) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/3149280000 (/ (pow (PI) 4) (pow x-scale 2)))) 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2)))))))))))) (sqrt (/ 1 (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2)))))))))))) |
(*.f64 angle (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 #s(literal 0 binary64)))) (*.f64 (*.f64 angle angle) (*.f64 #s(literal 1/8 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(literal 0 binary64))) (+.f64 (*.f64 a (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) #s(literal 0 binary64))))) (*.f64 a (*.f64 (*.f64 (*.f64 angle angle) x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (/.f64 #s(literal 0 binary64) #s(literal 0 binary64))))))))))) |
(* angle (+ (* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))))))) (* (pow angle 2) (+ (* 1/8 (* (* a (* x-scale (* y-scale (* (sqrt 8) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/3149280000 (/ (pow (PI) 4) (pow x-scale 2)))))))) (sqrt (/ 1 (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2)))))))) (* (pow angle 2) (+ (* 1/8 (* (* a (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))))) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/3149280000 (/ (pow (PI) 4) (pow x-scale 2)))) 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))))))))))) (sqrt (/ 1 (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2)))))))) (* 1/8 (* (* a (* (pow angle 2) (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1 (+ (* -1/396718580736000000000 (/ (pow (PI) 8) (pow x-scale 2))) (* -1/2777030065152000000000 (/ (pow (PI) 8) (pow x-scale 2))))) (+ (* -1/396718580736000000000 (/ (pow (PI) 8) (pow x-scale 2))) (* -1/2777030065152000000000 (/ (pow (PI) 8) (pow x-scale 2))))) (* 1/2 (/ (* (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/3149280000 (/ (pow (PI) 4) (pow x-scale 2)))) (- (+ (* -1 (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))))) (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/3149280000 (/ (pow (PI) 4) (pow x-scale 2)))) 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2)))))))) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2)))))))))))) (sqrt (/ 1 (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2)))))))))))))) |
(*.f64 angle (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 #s(literal 0 binary64)))) (*.f64 (*.f64 angle angle) (+.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 a (*.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)))) (*.f64 (*.f64 angle angle) (*.f64 #s(literal 1/8 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(literal 0 binary64))) (+.f64 (*.f64 (*.f64 a x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (/.f64 #s(literal 0 binary64) #s(literal 0 binary64)))) (*.f64 a (*.f64 (*.f64 (*.f64 angle angle) x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 0 binary64) (/.f64 #s(literal 0 binary64) #s(literal 0 binary64)))) #s(literal 0 binary64))))))))))))) |
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 #s(literal 0 binary64)))) |
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 #s(literal 0 binary64)))) |
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 #s(literal 0 binary64)))) |
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 #s(literal 0 binary64)))) |
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 #s(literal 0 binary64)))) |
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 #s(literal 0 binary64)))) |
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 #s(literal 0 binary64)))) |
(* 1/4 (* (* a (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 #s(literal 0 binary64)))) |
1 |
#s(literal 1 binary64) |
(+ 1 (* -1/64800 (* (pow angle 2) (pow (PI) 2)))) |
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/64800 binary64) (*.f64 angle angle)) (*.f64 (PI.f64) (PI.f64)))) |
(+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* 1/25194240000 (* (pow angle 2) (pow (PI) 4)))))) |
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 angle angle) (+.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal -1/64800 binary64)) (*.f64 (*.f64 #s(literal 1/25194240000 binary64) (*.f64 angle angle)) (pow.f64 (PI.f64) #s(literal 4 binary64)))))) |
(+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/24488801280000000 (* (pow angle 2) (pow (PI) 6))) (* 1/25194240000 (pow (PI) 4))))))) |
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 angle angle) (+.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal -1/64800 binary64)) (*.f64 (*.f64 angle angle) (+.f64 (*.f64 (*.f64 #s(literal -1/24488801280000000 binary64) (*.f64 angle angle)) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/25194240000 binary64))))))) |
(cos (* 1/180 (* angle (PI)))) |
(cos.f64 (*.f64 #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/64800 (* (pow angle 2) (pow (PI) 2))) |
(*.f64 (*.f64 #s(literal -1/64800 binary64) (*.f64 angle angle)) (*.f64 (PI.f64) (PI.f64))) |
(* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* 1/24 (* (pow angle 2) (+ (* -1/349920000 (pow (PI) 4)) (* 1/1049760000 (pow (PI) 4))))))) |
(*.f64 (*.f64 angle angle) (+.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal -1/64800 binary64)) (*.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 angle angle)) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/524880000 binary64))))) |
(* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* (pow angle 2) (+ (* 1/720 (* (pow angle 2) (+ (* -1/1133740800000 (pow (PI) 6)) (+ (* -1/34012224000000 (pow (PI) 6)) (* 1/2267481600000 (pow (PI) 6)))))) (* 1/24 (+ (* -1/349920000 (pow (PI) 4)) (* 1/1049760000 (pow (PI) 4)))))))) |
(*.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/720 binary64) (*.f64 angle angle)) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/2125764000000 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/524880000 binary64))))))) |
(* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* (pow angle 2) (+ (* 1/24 (+ (* -1/349920000 (pow (PI) 4)) (* 1/1049760000 (pow (PI) 4)))) (* (pow angle 2) (+ (* 1/40320 (* (pow angle 2) (+ (* -7/12244400640000000 (pow (PI) 8)) (+ (* -7/220399211520000000 (pow (PI) 8)) (+ (* -7/275499014400000000 (pow (PI) 8)) (+ (* 1/1101996057600000000 (pow (PI) 8)) (* 7/18366600960000000 (pow (PI) 8)))))))) (* 1/720 (+ (* -1/1133740800000 (pow (PI) 6)) (+ (* -1/34012224000000 (pow (PI) 6)) (* 1/2267481600000 (pow (PI) 6))))))))))) |
(*.f64 (*.f64 angle angle) (+.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal -1/64800 binary64)) (*.f64 (*.f64 angle angle) (+.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/524880000 binary64))) (*.f64 (*.f64 angle angle) (+.f64 (*.f64 (*.f64 #s(literal 1/40320 binary64) (*.f64 angle angle)) (+.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 8 binary64)) #s(literal -133/220399211520000000 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 8 binary64)) #s(literal 131/367332019200000000 binary64)))) (*.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/2125764000000 binary64))))))))) |
(log (cos (* 1/180 (* angle (PI))))) |
(log.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) |
(log (cos (* 1/180 (* angle (PI))))) |
(log.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) |
(log (cos (* 1/180 (* angle (PI))))) |
(log.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) |
(log (cos (* 1/180 (* angle (PI))))) |
(log.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) |
(log (cos (* 1/180 (* angle (PI))))) |
(log.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) |
(log (cos (* 1/180 (* angle (PI))))) |
(log.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) |
(log (cos (* 1/180 (* angle (PI))))) |
(log.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) |
(log (cos (* 1/180 (* angle (PI))))) |
(log.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (* (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 (pow.f64 (sin.f64 (*.f64 #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 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b))) #s(literal -1/2 binary64))))) |
(* x-scale (+ (* -1/16 (* (/ (* (pow x-scale 2) (* y-scale (* (sqrt 8) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (sqrt (/ 1 (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (* (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 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) #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 (pow.f64 (sin.f64 (*.f64 #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 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b))) #s(literal -1/2 binary64)))))) (*.f64 (pow.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 (pow.f64 (sin.f64 (*.f64 #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 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b))) #s(literal -1/2 binary64))))))) |
(* x-scale (+ (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (* (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 b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 6) (pow (cos (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (pow (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) 2) (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))))) (sqrt (/ 1 (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))) (* -1/16 (* (/ (* y-scale (* (sqrt 8) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (sqrt (/ 1 (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (* (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 (pow.f64 (sin.f64 (*.f64 #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 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b))) #s(literal -1/2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #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 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b))) #s(literal -1/2 binary64))))) (+.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 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.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/180 binary64) (*.f64 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 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) #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 (pow.f64 b #s(literal 6 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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) #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 (pow.f64 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 (*.f64 (pow.f64 (sin.f64 (*.f64 #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 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b))) #s(literal -1/2 binary64)))))))))) (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) #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 (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 b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* (pow x-scale 2) (+ (* -1/16 (* (/ (* y-scale (* (sqrt 8) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (sqrt (/ 1 (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))) (* (pow x-scale 2) (+ (* -1/8 (* (* y-scale (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 6) (pow (cos (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (pow (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) 2) (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))))) (sqrt (/ 1 (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (* (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 b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 8) (pow (cos (* 1/180 (* angle (PI)))) 8)))) (* 1/4 (/ (pow (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) 2) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* 1/4 (/ (* (+ (* -1/4 (/ (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 6) (pow (cos (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (pow (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) 2) (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 4) (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (- (/ (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))))) (sqrt (/ 1 (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (* (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 (pow.f64 (sin.f64 (*.f64 #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 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b))) #s(literal -1/2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (+.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #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 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b))) #s(literal -1/2 binary64))))) (/.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) #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 (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 (pow.f64 (sin.f64 (*.f64 #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 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b))) #s(literal -1/2 binary64))))) (+.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.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/180 binary64) (*.f64 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 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) #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 (pow.f64 b #s(literal 6 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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) #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 (pow.f64 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 (*.f64 (pow.f64 (sin.f64 (*.f64 #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 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b))) #s(literal -1/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 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) #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 (pow.f64 b #s(literal 8 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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) #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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 (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 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.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/180 binary64) (*.f64 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 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) #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 (pow.f64 b #s(literal 6 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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 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 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) #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 (pow.f64 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 (*.f64 (pow.f64 (sin.f64 (*.f64 #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 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b))) #s(literal -1/2 binary64))))))) (/.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) #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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)) (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)) (*.f64 y-scale y-scale)) (*.f64 (/.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b))) #s(literal -1/2 binary64)))))))))))))))))) |
(* 1/4 (* (* y-scale (sqrt 8)) (sqrt (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (*.f64 (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 y-scale y-scale) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b))))))) |
(+ (* -1/16 (* (/ (* (pow y-scale 3) (* (sqrt 8) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 2) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (sqrt (/ 1 (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) |
(+.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.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 b b)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b))))))) (*.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 y-scale (*.f64 y-scale y-scale)) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (*.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (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 b b)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)))))))))) |
(+ (* -1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* -1/4 (/ (* (pow y-scale 6) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (* (pow y-scale 4) (pow (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) 2)) (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))))) (pow x-scale 4)) (sqrt (/ 1 (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (+ (* -1/16 (* (/ (* (pow y-scale 3) (* (sqrt 8) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 2) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (sqrt (/ 1 (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) |
(+.f64 (*.f64 (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 b b)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b))))))) (+.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 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (+.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (/.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) #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 b b)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b))))))))))) (pow.f64 x-scale #s(literal 4 binary64)))) (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale (*.f64 y-scale y-scale)) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (*.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 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 b b)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)))))))) |
(+ (* -1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* -1/2 (/ (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow y-scale 8) (* (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 8) (pow (sin (* 1/180 (* angle (PI)))) 8)))) (* 1/4 (/ (* (pow y-scale 4) (pow (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* 1/4 (/ (* (pow y-scale 2) (* (+ (* -1/4 (/ (* (pow y-scale 6) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (* (pow y-scale 4) (pow (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) 2)) (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))))) (pow x-scale 6)) (sqrt (/ 1 (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (+ (* -1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* -1/4 (/ (* (pow y-scale 6) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (* (pow y-scale 4) (pow (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) 2)) (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))))) (pow x-scale 4)) (sqrt (/ 1 (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (+ (* -1/16 (* (/ (* (pow y-scale 3) (* (sqrt 8) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 2) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (sqrt (/ 1 (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (* 1/4 (* (* y-scale (sqrt 8)) (sqrt (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))) |
(+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (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 b b)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b))))))) (+.f64 (/.f64 (*.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 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) #s(literal 2 binary64))) (+.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 b #s(literal 8 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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale y-scale) (*.f64 (+.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (+.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (+.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (/.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) #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 b b)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b))))))))))))) (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)) (+.f64 (*.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 y-scale y-scale) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b))))))))) (pow.f64 x-scale #s(literal 6 binary64))) (/.f64 (*.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 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (+.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (/.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) #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 b b)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b))))))))))) (pow.f64 x-scale #s(literal 4 binary64)))))) (+.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.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 b b)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b))))))) (*.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 y-scale (*.f64 y-scale y-scale)) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (*.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (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 b b)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b))))))))))) |
(* -1/4 (* (* y-scale (sqrt 8)) (sqrt (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) |
(*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (*.f64 (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 y-scale y-scale) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b))))))) |
(+ (* -1/4 (* (* y-scale (sqrt 8)) (sqrt (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* 1/16 (* (/ (* (pow y-scale 3) (* (sqrt 8) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 2) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (sqrt (/ 1 (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) |
(+.f64 (*.f64 (*.f64 #s(literal -1/4 binary64) (*.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 b b)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b))))))) (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 y-scale (*.f64 y-scale y-scale)) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (*.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (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 b b)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)))))))))) |
(+ (* -1/4 (* (* y-scale (sqrt 8)) (sqrt (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (+ (* 1/16 (* (/ (* (pow y-scale 3) (* (sqrt 8) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 2) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (sqrt (/ 1 (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* -1/4 (/ (* (pow y-scale 6) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (* (pow y-scale 4) (pow (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) 2)) (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))))) (pow x-scale 4)) (sqrt (/ 1 (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))) |
(+.f64 (*.f64 (*.f64 #s(literal -1/4 binary64) (*.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 b b)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b))))))) (*.f64 (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 b b)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b))))))) (+.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (*.f64 (*.f64 y-scale (*.f64 y-scale y-scale)) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (*.f64 (*.f64 b b) (*.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 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 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (+.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (/.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) #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 b b)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b))))))))))) (pow.f64 x-scale #s(literal 4 binary64))))))) |
(+ (* -1/4 (* (* y-scale (sqrt 8)) (sqrt (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (+ (* 1/16 (* (/ (* (pow y-scale 3) (* (sqrt 8) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 2) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (sqrt (/ 1 (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (+ (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* -1/2 (/ (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow y-scale 8) (* (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 8) (pow (sin (* 1/180 (* angle (PI)))) 8)))) (* 1/4 (/ (* (pow y-scale 4) (pow (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* 1/4 (/ (* (pow y-scale 2) (* (+ (* -1/4 (/ (* (pow y-scale 6) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (* (pow y-scale 4) (pow (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) 2)) (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))))) (pow x-scale 6)) (sqrt (/ 1 (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (* 1/8 (* (/ (* y-scale (* (sqrt 8) (+ (* -1/4 (/ (* (pow y-scale 6) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (* (pow y-scale 4) (pow (- (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))) 2)) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) 2)) (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))))) (pow x-scale 4)) (sqrt (/ 1 (- (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))))) |
(+.f64 (+.f64 (*.f64 (*.f64 #s(literal -1/4 binary64) (*.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 b b)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b))))))) (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 y-scale (*.f64 y-scale y-scale)) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (*.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (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 b b)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)))))))))) (*.f64 #s(literal 1/8 binary64) (*.f64 (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 b b)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b))))))) (+.f64 (/.f64 (*.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 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) #s(literal 2 binary64))) (+.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 b #s(literal 8 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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) #s(literal 2 binary64)))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale y-scale) (*.f64 (+.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (+.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (+.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (/.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) #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 b b)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b))))))))))))) (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)) (+.f64 (*.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 y-scale y-scale) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b))))))))) (pow.f64 x-scale #s(literal 6 binary64))) (/.f64 (*.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 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (+.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) (/.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) #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 b b)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b))))))))))) (pow.f64 x-scale #s(literal 4 binary64))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) |
(*.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 b b)) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 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 2 binary64)) (*.f64 b b))))))) |
(* y-scale (+ (* -1/16 (* (/ (* x-scale (* (pow y-scale 2) (* (sqrt 8) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (/ 1 (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) |
(*.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 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (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 b b)) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 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 2 binary64)) (*.f64 b b)))))))) (*.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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 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 2 binary64)) (*.f64 b b))))))))) |
(* y-scale (+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* (pow y-scale 2) (+ (* -1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (pow (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) 2) (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))))) (sqrt (/ 1 (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (* -1/16 (* (/ (* x-scale (* (sqrt 8) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (/ 1 (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))))) |
(*.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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 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 2 binary64)) (*.f64 b b))))))) (*.f64 (*.f64 y-scale y-scale) (*.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 b b)) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 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 2 binary64)) (*.f64 b b))))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 x-scale (*.f64 (*.f64 (*.f64 y-scale y-scale) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 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 2 binary64)) (*.f64 b b)))))))))))) (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b))))))))) |
(* y-scale (+ (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))) (* (pow y-scale 2) (+ (* -1/16 (* (/ (* x-scale (* (sqrt 8) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (sqrt (/ 1 (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (* (pow y-scale 2) (+ (* -1/8 (* (* x-scale (* (sqrt 8) (+ (* -1/4 (/ (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (pow (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) 2) (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))))) (sqrt (/ 1 (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (* -1/8 (* (* x-scale (* (pow y-scale 2) (* (sqrt 8) (+ (* -1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 8) (pow (sin (* 1/180 (* angle (PI)))) 8)))) (* 1/4 (/ (pow (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) 2) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* 1/4 (/ (* (+ (* -1/4 (/ (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (pow (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4))))) 2) (* (pow b 4) (* (pow (sin (* 1/180 (* angle (PI)))) 4) (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))) (- (/ (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))))) (sqrt (/ 1 (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (* 1/2 (/ (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))))))) |
(*.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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 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 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 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (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 b b)) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 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 2 binary64)) (*.f64 b b)))))))) (*.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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 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 2 binary64)) (*.f64 b b))))))) (+.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 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 2 binary64)) (*.f64 b b)))))))))) (*.f64 x-scale (*.f64 (*.f64 (*.f64 y-scale y-scale) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 b #s(literal 8 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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) #s(literal 2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b))) (*.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 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 2 binary64)) (*.f64 b b))))))))) (/.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 b b)) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 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 2 binary64)) (*.f64 b b)))))))))))))))))))) |
(* 1/4 (* (* x-scale (sqrt 8)) (sqrt (- (* (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)))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-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 b b)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (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 x-scale x-scale)) #s(literal 2 binary64))) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b))))))) |
(+ (* -1/16 (* (/ (* (pow x-scale 3) (* (sqrt 8) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 2) (* (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (sqrt (/ 1 (- (* (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))))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (- (* (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))))))))) |
(+.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-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 b b)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (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 x-scale x-scale)) #s(literal 2 binary64))) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b))))))) (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 x-scale (*.f64 x-scale x-scale)) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) #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 (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 x-scale x-scale) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (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 x-scale x-scale)) #s(literal 2 binary64))) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)))))))) (*.f64 (*.f64 (*.f64 b b) (*.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 (* (/ (* x-scale (* (sqrt 8) (+ (* -1/4 (/ (* (pow x-scale 6) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 6) (pow (cos (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 4) (pow (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) 2)) (* (pow b 4) (* (pow (cos (* 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 b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))))) (pow y-scale 4)) (sqrt (/ 1 (- (* (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))))))))) (+ (* -1/16 (* (/ (* (pow x-scale 3) (* (sqrt 8) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 2) (* (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (sqrt (/ 1 (- (* (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))))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (- (* (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)))))))))) |
(+.f64 (*.f64 (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 b b)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (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 x-scale x-scale)) #s(literal 2 binary64))) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b))))))) (+.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 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (+.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) #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 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/16 binary64) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (/.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) #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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (+.f64 (*.f64 (pow.f64 (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 x-scale x-scale) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (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 x-scale x-scale)) #s(literal 2 binary64))) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b))))))))))) (pow.f64 y-scale #s(literal 4 binary64)))) (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x-scale (*.f64 x-scale x-scale)) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) #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 (*.f64 b b) (*.f64 y-scale y-scale)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-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 b b)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (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 x-scale x-scale)) #s(literal 2 binary64))) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)))))))) |
(+ (* -1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 8) (* (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 8) (pow (cos (* 1/180 (* angle (PI)))) 8)))) (* 1/4 (/ (* (pow x-scale 4) (pow (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* 1/4 (/ (* (pow x-scale 2) (* (+ (* -1/4 (/ (* (pow x-scale 6) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 6) (pow (cos (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 4) (pow (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) 2)) (* (pow b 4) (* (pow (cos (* 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 b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 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 (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 y-scale 6)) (sqrt (/ 1 (- (* (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))))))))) (+ (* -1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* -1/4 (/ (* (pow x-scale 6) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 6) (pow (cos (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 4) (pow (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) 2)) (* (pow b 4) (* (pow (cos (* 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 b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))))) (pow y-scale 4)) (sqrt (/ 1 (- (* (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))))))))) (+ (* -1/16 (* (/ (* (pow x-scale 3) (* (sqrt 8) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 2) (* (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (sqrt (/ 1 (- (* (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))))))))) (* 1/4 (* (* x-scale (sqrt 8)) (sqrt (- (* (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))))))))))) |
(+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (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 b b)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (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 x-scale x-scale)) #s(literal 2 binary64))) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b))))))) (+.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x-scale x-scale) (+.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 8 binary64)) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 2 binary64))) (+.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) #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 (pow.f64 b #s(literal 8 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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) #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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 (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 (*.f64 x-scale x-scale) (*.f64 (+.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) #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 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (+.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) #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 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/16 binary64) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (/.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) #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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (+.f64 (*.f64 (pow.f64 (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 x-scale x-scale) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (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 x-scale x-scale)) #s(literal 2 binary64))) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b))))))))))))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)) (+.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 x-scale x-scale) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (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 x-scale x-scale)) #s(literal 2 binary64))) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)))))))))) (pow.f64 y-scale #s(literal 6 binary64))) (/.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (+.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) #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 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/16 binary64) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (/.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) #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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (+.f64 (*.f64 (pow.f64 (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 x-scale x-scale) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (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 x-scale x-scale)) #s(literal 2 binary64))) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b))))))))))) (pow.f64 y-scale #s(literal 4 binary64)))))) (+.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-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 b b)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (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 x-scale x-scale)) #s(literal 2 binary64))) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b))))))) (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 x-scale (*.f64 x-scale x-scale)) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) #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 (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 x-scale x-scale) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (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 x-scale x-scale)) #s(literal 2 binary64))) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)))))))) (*.f64 (*.f64 (*.f64 b b) (*.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 (* (* x-scale (sqrt 8)) (sqrt (- (* (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)))))))) |
(*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x-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 b b)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (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 x-scale x-scale)) #s(literal 2 binary64))) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b))))))) |
(+ (* -1/4 (* (* x-scale (sqrt 8)) (sqrt (- (* (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)))))))) (* 1/16 (* (/ (* (pow x-scale 3) (* (sqrt 8) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 2) (* (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (sqrt (/ 1 (- (* (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)))))))))) |
(+.f64 (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x-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 b b)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (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 x-scale x-scale)) #s(literal 2 binary64))) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b))))))) (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 x-scale (*.f64 x-scale x-scale)) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) #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 (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 x-scale x-scale) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (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 x-scale x-scale)) #s(literal 2 binary64))) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)))))))) (*.f64 (*.f64 (*.f64 b b) (*.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 (* (* x-scale (sqrt 8)) (sqrt (- (* (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)))))))) (+ (* 1/16 (* (/ (* (pow x-scale 3) (* (sqrt 8) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 2) (* (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (sqrt (/ 1 (- (* (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))))))))) (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* -1/4 (/ (* (pow x-scale 6) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 6) (pow (cos (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 4) (pow (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) 2)) (* (pow b 4) (* (pow (cos (* 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 b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))))) (pow y-scale 4)) (sqrt (/ 1 (- (* (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))))))))))) |
(+.f64 (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x-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 b b)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (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 x-scale x-scale)) #s(literal 2 binary64))) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b))))))) (*.f64 (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 b b)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (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 x-scale x-scale)) #s(literal 2 binary64))) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b))))))) (+.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x-scale (*.f64 x-scale x-scale)) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) #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 (*.f64 b b) (*.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 x-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (+.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) #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 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/16 binary64) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (/.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) #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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (+.f64 (*.f64 (pow.f64 (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 x-scale x-scale) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (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 x-scale x-scale)) #s(literal 2 binary64))) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b))))))))))) (pow.f64 y-scale #s(literal 4 binary64))))))) |
(+ (* -1/4 (* (* x-scale (sqrt 8)) (sqrt (- (* (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)))))))) (+ (* 1/16 (* (/ (* (pow x-scale 3) (* (sqrt 8) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 2) (* (pow y-scale 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (sqrt (/ 1 (- (* (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))))))))) (+ (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* -1/2 (/ (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 8) (* (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 8) (pow (cos (* 1/180 (* angle (PI)))) 8)))) (* 1/4 (/ (* (pow x-scale 4) (pow (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* 1/4 (/ (* (pow x-scale 2) (* (+ (* -1/4 (/ (* (pow x-scale 6) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 6) (pow (cos (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 4) (pow (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) 2)) (* (pow b 4) (* (pow (cos (* 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 b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 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 (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 y-scale 6)) (sqrt (/ 1 (- (* (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))))))))) (* 1/8 (* (/ (* x-scale (* (sqrt 8) (+ (* -1/4 (/ (* (pow x-scale 6) (* (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow b 6) (pow (cos (* 1/180 (* angle (PI)))) 6)))) (* 1/16 (/ (* (pow x-scale 4) (pow (- (* (pow b 4) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))) 2)) (* (pow b 4) (pow (cos (* 1/180 (* angle (PI)))) 4))))) 2)) (* (pow b 4) (* (pow (cos (* 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 b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))))))) (pow y-scale 4)) (sqrt (/ 1 (- (* (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)))))))))))) |
(+.f64 (+.f64 (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 x-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 b b)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (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 x-scale x-scale)) #s(literal 2 binary64))) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b))))))) (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 x-scale (*.f64 x-scale x-scale)) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) #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 (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 x-scale x-scale) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (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 x-scale x-scale)) #s(literal 2 binary64))) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)))))))) (*.f64 (*.f64 (*.f64 b b) (*.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 (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 b b)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (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 x-scale x-scale)) #s(literal 2 binary64))) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b))))))) (+.f64 (/.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x-scale x-scale) (+.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 8 binary64)) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) #s(literal 2 binary64))) (+.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) #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 (pow.f64 b #s(literal 8 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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) #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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (*.f64 (pow.f64 (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 (*.f64 x-scale x-scale) (*.f64 (+.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) #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 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (+.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) #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 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/16 binary64) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (/.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) #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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (+.f64 (*.f64 (pow.f64 (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 x-scale x-scale) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (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 x-scale x-scale)) #s(literal 2 binary64))) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b))))))))))))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)) (+.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 x-scale x-scale) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (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 x-scale x-scale)) #s(literal 2 binary64))) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)))))))))) (pow.f64 y-scale #s(literal 6 binary64))) (/.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (pow.f64 x-scale #s(literal 6 binary64)) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (+.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) #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 (pow.f64 b #s(literal 6 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (*.f64 #s(literal 1/16 binary64) (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (/.f64 (pow.f64 (+.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) #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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))) (+.f64 (*.f64 (pow.f64 (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 x-scale x-scale) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (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 x-scale x-scale)) #s(literal 2 binary64))) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b))))))))))) (pow.f64 y-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)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (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 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) b)) (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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) b)) (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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) b)) (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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) b)) (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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) b)) (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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) b)) (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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) b)) (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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) b)) (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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) b)) (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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) b)) (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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) b)) (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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) b)) (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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (* (* angle (* x-scale (* y-scale (sqrt 8)))) (sqrt (- (* (pow b 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/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 angle (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (+.f64 (*.f64 (*.f64 b b) (+.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 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (+.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (/.f64 (PI.f64) (*.f64 y-scale y-scale)) (/.f64 (PI.f64) (*.f64 x-scale x-scale))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 #s(literal -1/16200 binary64) (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 (/.f64 (PI.f64) (*.f64 y-scale y-scale)) (/.f64 (PI.f64) (*.f64 x-scale x-scale)))))))) (*.f64 b b)))))) |
(* angle (+ (* 1/8 (* (* (pow angle 2) (* x-scale (* y-scale (* (sqrt 8) (- (* (pow b 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) (- (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))) 2)) (pow b 4))))) (pow b 2)))))))) (sqrt (/ 1 (- (* (pow b 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/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)))))))) (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (* (pow b 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/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2))))))))) |
(*.f64 angle (+.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (*.f64 (*.f64 angle angle) x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (*.f64 (*.f64 b b) (+.f64 (/.f64 (*.f64 #s(literal 1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/3149280000 binary64)) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (+.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/787320000 binary64))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (+.f64 (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1/1574640000 binary64)) (*.f64 (*.f64 #s(literal -1/32400 binary64) (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/32400 binary64) (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale)))))) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale))) #s(literal 1/1574640000 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (/.f64 (PI.f64) (*.f64 y-scale y-scale)) (/.f64 (PI.f64) (*.f64 x-scale x-scale))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 #s(literal -1/16200 binary64) (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 (/.f64 (PI.f64) (*.f64 y-scale y-scale)) (/.f64 (PI.f64) (*.f64 x-scale x-scale))))))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64)))))) (*.f64 b b)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 b b) (+.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 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (+.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (/.f64 (PI.f64) (*.f64 y-scale y-scale)) (/.f64 (PI.f64) (*.f64 x-scale x-scale))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 #s(literal -1/16200 binary64) (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 (/.f64 (PI.f64) (*.f64 y-scale y-scale)) (/.f64 (PI.f64) (*.f64 x-scale x-scale)))))))) (*.f64 b b)))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (*.f64 (*.f64 b b) (+.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 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (+.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (/.f64 (PI.f64) (*.f64 y-scale y-scale)) (/.f64 (PI.f64) (*.f64 x-scale x-scale))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 #s(literal -1/16200 binary64) (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 (/.f64 (PI.f64) (*.f64 y-scale y-scale)) (/.f64 (PI.f64) (*.f64 x-scale x-scale)))))))) (*.f64 b b)))))))) |
(* angle (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (* (pow b 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/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2))))))) (* (pow angle 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (* (pow b 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) (- (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))) 2)) (pow b 4))))) (pow b 2))))))) (sqrt (/ 1 (- (* (pow b 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/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)))))))) (* 1/8 (* (* (pow angle 2) (* x-scale (* y-scale (* (sqrt 8) (- (* (pow b 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 (- (* (pow b 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) (- (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))) 2)) (pow b 4))))) (pow b 2)))) 2) (- (* (pow b 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/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)))))) (* 1/2 (/ (* (pow x-scale 2) (- (+ (* 4 (/ (* (pow b 4) (+ (* 1/2040733440000000 (pow (PI) 6)) (+ (* 1/1224440064000000 (pow (PI) 6)) (+ (* 1/102036672000000 (pow (PI) 6)) (* 1/32400 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (+ (* -1/408146688000000 (/ (pow (PI) 6) (pow x-scale 4))) (+ (* -1/6122200320000000 (/ (pow (PI) 6) (pow x-scale 4))) (* 2 (* (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (- (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2)))))))) (+ (* 1/1020366720000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/612220032000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (pow x-scale 4) (* (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))) (- (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))) 2)) (pow b 4)))))) (pow b 4))))) (pow b 2))))))))) (sqrt (/ 1 (- (* (pow b 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/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)))))))))))) |
(*.f64 angle (+.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 (*.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 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (+.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (/.f64 (PI.f64) (*.f64 y-scale y-scale)) (/.f64 (PI.f64) (*.f64 x-scale x-scale))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 #s(literal -1/16200 binary64) (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 (/.f64 (PI.f64) (*.f64 y-scale y-scale)) (/.f64 (PI.f64) (*.f64 x-scale x-scale)))))))) (*.f64 b b)))))) (*.f64 (*.f64 angle angle) (*.f64 #s(literal 1/8 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 b b) (+.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 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (+.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (/.f64 (PI.f64) (*.f64 y-scale y-scale)) (/.f64 (PI.f64) (*.f64 x-scale x-scale))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 #s(literal -1/16200 binary64) (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 (/.f64 (PI.f64) (*.f64 y-scale y-scale)) (/.f64 (PI.f64) (*.f64 x-scale x-scale)))))))) (*.f64 b b)))))) (+.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (*.f64 (*.f64 b b) (+.f64 (/.f64 (*.f64 #s(literal 1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/3149280000 binary64)) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (+.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/787320000 binary64))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (+.f64 (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1/1574640000 binary64)) (*.f64 (*.f64 #s(literal -1/32400 binary64) (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/32400 binary64) (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale)))))) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale))) #s(literal 1/1574640000 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (/.f64 (PI.f64) (*.f64 y-scale y-scale)) (/.f64 (PI.f64) (*.f64 x-scale x-scale))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 #s(literal -1/16200 binary64) (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 (/.f64 (PI.f64) (*.f64 y-scale y-scale)) (/.f64 (PI.f64) (*.f64 x-scale x-scale))))))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64)))))) (*.f64 b b)))))) (*.f64 (*.f64 (*.f64 angle angle) x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (+.f64 (*.f64 (*.f64 b b) (+.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 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 (*.f64 b b) (+.f64 (/.f64 (*.f64 #s(literal 1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/3149280000 binary64)) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (+.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/787320000 binary64))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (+.f64 (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1/1574640000 binary64)) (*.f64 (*.f64 #s(literal -1/32400 binary64) (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/32400 binary64) (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale)))))) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale))) #s(literal 1/1574640000 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (/.f64 (PI.f64) (*.f64 y-scale y-scale)) (/.f64 (PI.f64) (*.f64 x-scale x-scale))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 #s(literal -1/16200 binary64) (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 (/.f64 (PI.f64) (*.f64 y-scale y-scale)) (/.f64 (PI.f64) (*.f64 x-scale x-scale))))))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64)))))) (*.f64 b b)))) #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 b b) (+.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 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (+.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (/.f64 (PI.f64) (*.f64 y-scale y-scale)) (/.f64 (PI.f64) (*.f64 x-scale x-scale))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 #s(literal -1/16200 binary64) (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 (/.f64 (PI.f64) (*.f64 y-scale y-scale)) (/.f64 (PI.f64) (*.f64 x-scale x-scale)))))))) (*.f64 b b))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (+.f64 (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (+.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 13/1224440064000000 binary64)) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))))))) (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (+.f64 (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal -1/382637520000000 binary64)) (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/32400 binary64) (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/3149280000 binary64) (+.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))))) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale))) #s(literal -1/382637520000000 binary64))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (/.f64 (PI.f64) (*.f64 y-scale y-scale)) (/.f64 (PI.f64) (*.f64 x-scale x-scale))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 #s(literal -1/16200 binary64) (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 (/.f64 (PI.f64) (*.f64 y-scale y-scale)) (/.f64 (PI.f64) (*.f64 x-scale x-scale)))))))) (+.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/787320000 binary64))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (+.f64 (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1/1574640000 binary64)) (*.f64 (*.f64 #s(literal -1/32400 binary64) (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/32400 binary64) (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale)))))) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale))) #s(literal 1/1574640000 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (/.f64 (PI.f64) (*.f64 y-scale y-scale)) (/.f64 (PI.f64) (*.f64 x-scale x-scale))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 #s(literal -1/16200 binary64) (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 (/.f64 (PI.f64) (*.f64 y-scale y-scale)) (/.f64 (PI.f64) (*.f64 x-scale x-scale))))))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64)))))) (pow.f64 b #s(literal 4 binary64)))))) (*.f64 b b)))))))))))) |
(* angle (+ (* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (* (pow b 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/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2))))))) (* (pow angle 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (* (pow b 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) (- (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))) 2)) (pow b 4))))) (pow b 2))))))) (sqrt (/ 1 (- (* (pow b 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/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)))))))) (* (pow angle 2) (+ (* 1/8 (* (* x-scale (* y-scale (* (sqrt 8) (- (* (pow b 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 (- (* (pow b 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) (- (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))) 2)) (pow b 4))))) (pow b 2)))) 2) (- (* (pow b 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/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)))))) (* 1/2 (/ (* (pow x-scale 2) (- (+ (* 4 (/ (* (pow b 4) (+ (* 1/2040733440000000 (pow (PI) 6)) (+ (* 1/1224440064000000 (pow (PI) 6)) (+ (* 1/102036672000000 (pow (PI) 6)) (* 1/32400 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (+ (* -1/408146688000000 (/ (pow (PI) 6) (pow x-scale 4))) (+ (* -1/6122200320000000 (/ (pow (PI) 6) (pow x-scale 4))) (* 2 (* (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (- (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2)))))))) (+ (* 1/1020366720000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/612220032000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (pow x-scale 4) (* (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))) (- (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))) 2)) (pow b 4)))))) (pow b 4))))) (pow b 2)))))))) (sqrt (/ 1 (- (* (pow b 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/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)))))))) (* 1/8 (* (* (pow angle 2) (* x-scale (* y-scale (* (sqrt 8) (- (* (pow b 2) (+ (* -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 b 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) (- (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))) 2)) (pow b 4))))) (pow b 2)))) (- (* (pow b 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 (- (* (pow b 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) (- (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))) 2)) (pow b 4))))) (pow b 2)))) 2) (- (* (pow b 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/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)))))) (* 1/2 (/ (* (pow x-scale 2) (- (+ (* 4 (/ (* (pow b 4) (+ (* 1/2040733440000000 (pow (PI) 6)) (+ (* 1/1224440064000000 (pow (PI) 6)) (+ (* 1/102036672000000 (pow (PI) 6)) (* 1/32400 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (+ (* -1/408146688000000 (/ (pow (PI) 6) (pow x-scale 4))) (+ (* -1/6122200320000000 (/ (pow (PI) 6) (pow x-scale 4))) (* 2 (* (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (- (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2)))))))) (+ (* 1/1020366720000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/612220032000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (pow x-scale 4) (* (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))) (- (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))) 2)) (pow b 4)))))) (pow b 4))))) (pow b 2)))))) (- (* (pow b 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/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)))))) (* 1/2 (/ (* (pow x-scale 2) (- (+ (* 4 (/ (* (pow b 4) (+ (* -1/32400 (* (pow (PI) 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))) (+ (* -1/3149280000 (* (pow (PI) 4) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (+ (* -1/396718580736000000000 (pow (PI) 8)) (+ (* -1/2777030065152000000000 (pow (PI) 8)) (* 1/32400 (* (pow (PI) 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (+ (* 1/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))))))) (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 (- (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))) 2)) (pow b 4)))) 2)) (pow b 4))) (* 1/2 (/ (* (pow x-scale 4) (* (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))) (- (+ (* 4 (/ (* (pow b 4) (+ (* 1/2040733440000000 (pow (PI) 6)) (+ (* 1/1224440064000000 (pow (PI) 6)) (+ (* 1/102036672000000 (pow (PI) 6)) (* 1/32400 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (+ (* -1/408146688000000 (/ (pow (PI) 6) (pow x-scale 4))) (+ (* -1/6122200320000000 (/ (pow (PI) 6) (pow x-scale 4))) (* 2 (* (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) (- (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2)))) (* -1/3149280000 (/ (pow (PI) 4) (pow y-scale 2)))))))) (+ (* 1/1020366720000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/612220032000000 (/ (pow (PI) 6) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (pow x-scale 4) (* (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))) (- (+ (* 4 (/ (* (pow b 4) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (+ (* 1/6298560000 (/ (pow (PI) 4) (pow x-scale 4))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow x-scale 4))) (pow (- (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2)))) 2))) (* -1/1574640000 (/ (pow (PI) 4) (* (pow x-scale 2) (pow y-scale 2))))))) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* 1/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2))))))) 2)) (pow b 4)))))) (pow b 4)))))) (pow b 4)))))) (pow b 2))))))))) (sqrt (/ 1 (- (* (pow b 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/8100 (/ (* (pow b 4) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (- (* -1/16200 (/ (pow (PI) 2) (pow x-scale 4))) (* 1/16200 (/ (pow (PI) 2) (* (pow x-scale 2) (pow y-scale 2)))))))) (pow b 2)))))))))))))) |
(*.f64 angle (+.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 (*.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 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (+.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (/.f64 (PI.f64) (*.f64 y-scale y-scale)) (/.f64 (PI.f64) (*.f64 x-scale x-scale))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 #s(literal -1/16200 binary64) (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 (/.f64 (PI.f64) (*.f64 y-scale y-scale)) (/.f64 (PI.f64) (*.f64 x-scale x-scale)))))))) (*.f64 b b)))))) (*.f64 (*.f64 angle angle) (+.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 x-scale (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (*.f64 (*.f64 b b) (+.f64 (/.f64 (*.f64 #s(literal 1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/3149280000 binary64)) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (+.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/787320000 binary64))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (+.f64 (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1/1574640000 binary64)) (*.f64 (*.f64 #s(literal -1/32400 binary64) (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/32400 binary64) (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale)))))) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale))) #s(literal 1/1574640000 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (/.f64 (PI.f64) (*.f64 y-scale y-scale)) (/.f64 (PI.f64) (*.f64 x-scale x-scale))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 #s(literal -1/16200 binary64) (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 (/.f64 (PI.f64) (*.f64 y-scale y-scale)) (/.f64 (PI.f64) (*.f64 x-scale x-scale))))))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64)))))) (*.f64 b b))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 b b) (+.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 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (+.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (/.f64 (PI.f64) (*.f64 y-scale y-scale)) (/.f64 (PI.f64) (*.f64 x-scale x-scale))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 #s(literal -1/16200 binary64) (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 (/.f64 (PI.f64) (*.f64 y-scale y-scale)) (/.f64 (PI.f64) (*.f64 x-scale x-scale)))))))) (*.f64 b b))))))))) (*.f64 (*.f64 angle angle) (*.f64 #s(literal 1/8 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 b b) (+.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 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (+.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (/.f64 (PI.f64) (*.f64 y-scale y-scale)) (/.f64 (PI.f64) (*.f64 x-scale x-scale))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 #s(literal -1/16200 binary64) (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 (/.f64 (PI.f64) (*.f64 y-scale y-scale)) (/.f64 (PI.f64) (*.f64 x-scale x-scale)))))))) (*.f64 b b)))))) (+.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (+.f64 (*.f64 (*.f64 b b) (+.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 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 (*.f64 b b) (+.f64 (/.f64 (*.f64 #s(literal 1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/3149280000 binary64)) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (+.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/787320000 binary64))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (+.f64 (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1/1574640000 binary64)) (*.f64 (*.f64 #s(literal -1/32400 binary64) (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/32400 binary64) (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale)))))) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale))) #s(literal 1/1574640000 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (/.f64 (PI.f64) (*.f64 y-scale y-scale)) (/.f64 (PI.f64) (*.f64 x-scale x-scale))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 #s(literal -1/16200 binary64) (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 (/.f64 (PI.f64) (*.f64 y-scale y-scale)) (/.f64 (PI.f64) (*.f64 x-scale x-scale))))))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64)))))) (*.f64 b b)))) #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 b b) (+.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 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (+.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (/.f64 (PI.f64) (*.f64 y-scale y-scale)) (/.f64 (PI.f64) (*.f64 x-scale x-scale))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 #s(literal -1/16200 binary64) (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 (/.f64 (PI.f64) (*.f64 y-scale y-scale)) (/.f64 (PI.f64) (*.f64 x-scale x-scale)))))))) (*.f64 b b))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (+.f64 (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (+.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 13/1224440064000000 binary64)) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))))))) (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (+.f64 (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal -1/382637520000000 binary64)) (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/32400 binary64) (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/3149280000 binary64) (+.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))))) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale))) #s(literal -1/382637520000000 binary64))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (/.f64 (PI.f64) (*.f64 y-scale y-scale)) (/.f64 (PI.f64) (*.f64 x-scale x-scale))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 #s(literal -1/16200 binary64) (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 (/.f64 (PI.f64) (*.f64 y-scale y-scale)) (/.f64 (PI.f64) (*.f64 x-scale x-scale)))))))) (+.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/787320000 binary64))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (+.f64 (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1/1574640000 binary64)) (*.f64 (*.f64 #s(literal -1/32400 binary64) (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/32400 binary64) (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale)))))) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale))) #s(literal 1/1574640000 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (/.f64 (PI.f64) (*.f64 y-scale y-scale)) (/.f64 (PI.f64) (*.f64 x-scale x-scale))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 #s(literal -1/16200 binary64) (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 (/.f64 (PI.f64) (*.f64 y-scale y-scale)) (/.f64 (PI.f64) (*.f64 x-scale x-scale))))))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64)))))) (pow.f64 b #s(literal 4 binary64)))))) (*.f64 b b)))))) (*.f64 (*.f64 (*.f64 angle angle) x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (*.f64 (*.f64 b b) (+.f64 (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 8 binary64)) (*.f64 y-scale y-scale)) #s(literal -1/347128758144000000000 binary64)) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 8 binary64)) (*.f64 x-scale x-scale)) #s(literal 1/347128758144000000000 binary64)))) (*.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 (*.f64 b b) (+.f64 (/.f64 (*.f64 #s(literal 1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/3149280000 binary64)) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (+.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/787320000 binary64))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (+.f64 (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1/1574640000 binary64)) (*.f64 (*.f64 #s(literal -1/32400 binary64) (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/32400 binary64) (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale)))))) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale))) #s(literal 1/1574640000 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (/.f64 (PI.f64) (*.f64 y-scale y-scale)) (/.f64 (PI.f64) (*.f64 x-scale x-scale))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 #s(literal -1/16200 binary64) (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 (/.f64 (PI.f64) (*.f64 y-scale y-scale)) (/.f64 (PI.f64) (*.f64 x-scale x-scale))))))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64)))))) (*.f64 b b)))) (+.f64 (+.f64 (*.f64 (*.f64 b b) (+.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 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 (*.f64 b b) (+.f64 (/.f64 (*.f64 #s(literal 1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/3149280000 binary64)) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (+.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/787320000 binary64))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (+.f64 (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1/1574640000 binary64)) (*.f64 (*.f64 #s(literal -1/32400 binary64) (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/32400 binary64) (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale)))))) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale))) #s(literal 1/1574640000 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (/.f64 (PI.f64) (*.f64 y-scale y-scale)) (/.f64 (PI.f64) (*.f64 x-scale x-scale))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 #s(literal -1/16200 binary64) (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 (/.f64 (PI.f64) (*.f64 y-scale y-scale)) (/.f64 (PI.f64) (*.f64 x-scale x-scale))))))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64)))))) (*.f64 b b)))) #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 b b) (+.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 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (+.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (/.f64 (PI.f64) (*.f64 y-scale y-scale)) (/.f64 (PI.f64) (*.f64 x-scale x-scale))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 #s(literal -1/16200 binary64) (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 (/.f64 (PI.f64) (*.f64 y-scale y-scale)) (/.f64 (PI.f64) (*.f64 x-scale x-scale)))))))) (*.f64 b b))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (+.f64 (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (+.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 13/1224440064000000 binary64)) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))))))) (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (+.f64 (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal -1/382637520000000 binary64)) (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/32400 binary64) (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/3149280000 binary64) (+.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))))) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale))) #s(literal -1/382637520000000 binary64))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (/.f64 (PI.f64) (*.f64 y-scale y-scale)) (/.f64 (PI.f64) (*.f64 x-scale x-scale))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 #s(literal -1/16200 binary64) (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 (/.f64 (PI.f64) (*.f64 y-scale y-scale)) (/.f64 (PI.f64) (*.f64 x-scale x-scale)))))))) (+.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/787320000 binary64))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (+.f64 (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1/1574640000 binary64)) (*.f64 (*.f64 #s(literal -1/32400 binary64) (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/32400 binary64) (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale)))))) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale))) #s(literal 1/1574640000 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (/.f64 (PI.f64) (*.f64 y-scale y-scale)) (/.f64 (PI.f64) (*.f64 x-scale x-scale))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 #s(literal -1/16200 binary64) (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 (/.f64 (PI.f64) (*.f64 y-scale y-scale)) (/.f64 (PI.f64) (*.f64 x-scale x-scale))))))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64)))))) (pow.f64 b #s(literal 4 binary64)))))) (*.f64 b b))))) (+.f64 (*.f64 (*.f64 b b) (+.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 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (+.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (/.f64 (PI.f64) (*.f64 y-scale y-scale)) (/.f64 (PI.f64) (*.f64 x-scale x-scale))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 #s(literal -1/16200 binary64) (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 (/.f64 (PI.f64) (*.f64 y-scale y-scale)) (/.f64 (PI.f64) (*.f64 x-scale x-scale)))))))) (*.f64 b b))))) (/.f64 (*.f64 (*.f64 x-scale x-scale) (+.f64 (+.f64 (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (+.f64 (*.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/3149280000 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)))) (+.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 8 binary64)) #s(literal -1/347128758144000000000 binary64)) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))))))) (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.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 (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 8 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1/176319369216000000000 binary64)) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal -1/32400 binary64) (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.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))))) (pow.f64 (*.f64 #s(literal 1/3149280000 binary64) (+.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 8 binary64)) (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale))) #s(literal 1/173564379072000000000 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (+.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/787320000 binary64))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (+.f64 (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1/1574640000 binary64)) (*.f64 (*.f64 #s(literal -1/32400 binary64) (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/32400 binary64) (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale)))))) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale))) #s(literal 1/1574640000 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (/.f64 (PI.f64) (*.f64 y-scale y-scale)) (/.f64 (PI.f64) (*.f64 x-scale x-scale))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 #s(literal -1/16200 binary64) (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 (/.f64 (PI.f64) (*.f64 y-scale y-scale)) (/.f64 (PI.f64) (*.f64 x-scale x-scale))))))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (/.f64 (PI.f64) (*.f64 y-scale y-scale)) (/.f64 (PI.f64) (*.f64 x-scale x-scale))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 #s(literal -1/16200 binary64) (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 (/.f64 (PI.f64) (*.f64 y-scale y-scale)) (/.f64 (PI.f64) (*.f64 x-scale x-scale)))))))) (+.f64 (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (+.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 13/1224440064000000 binary64)) (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))))))) (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (+.f64 (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal -1/382637520000000 binary64)) (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/32400 binary64) (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 1/3149280000 binary64) (+.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))))) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale))) #s(literal -1/382637520000000 binary64))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (+.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (/.f64 (PI.f64) (*.f64 y-scale y-scale)) (/.f64 (PI.f64) (*.f64 x-scale x-scale))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 #s(literal -1/16200 binary64) (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 (/.f64 (PI.f64) (*.f64 y-scale y-scale)) (/.f64 (PI.f64) (*.f64 x-scale x-scale)))))))) (+.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/787320000 binary64))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (+.f64 (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (pow.f64 x-scale #s(literal 4 binary64))) #s(literal 1/1574640000 binary64)) (*.f64 (*.f64 #s(literal -1/32400 binary64) (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -1/32400 binary64) (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 y-scale y-scale)))))) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale))) #s(literal 1/1574640000 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (/.f64 (PI.f64) (*.f64 y-scale y-scale)) (/.f64 (PI.f64) (*.f64 x-scale x-scale))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 #s(literal -1/16200 binary64) (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (*.f64 (/.f64 (PI.f64) (*.f64 y-scale y-scale)) (/.f64 (PI.f64) (*.f64 x-scale x-scale))))))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64)))))) (pow.f64 b #s(literal 4 binary64)))))) (pow.f64 b #s(literal 4 binary64)))))) (*.f64 b 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 (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (pow (- (/ (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 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 (*.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)) (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 y-scale y-scale) (*.f64 x-scale x-scale))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (* (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)))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (pow (- (/ (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 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 (*.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)) (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 y-scale y-scale) (*.f64 x-scale x-scale))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (* (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)))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (pow (- (/ (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 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 (*.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)) (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 y-scale y-scale) (*.f64 x-scale x-scale))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (* (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)))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (pow (- (/ (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 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 (*.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)) (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 y-scale y-scale) (*.f64 x-scale x-scale))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (* (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)))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (pow (- (/ (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 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 (*.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)) (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 y-scale y-scale) (*.f64 x-scale x-scale))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (* (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)))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (pow (- (/ (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 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 (*.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)) (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 y-scale y-scale) (*.f64 x-scale x-scale))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (* (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)))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (pow (- (/ (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 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 (*.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)) (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 y-scale y-scale) (*.f64 x-scale x-scale))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) |
(* 1/4 (* (* x-scale (* y-scale (sqrt 8))) (sqrt (- (* (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)))) (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 4) (pow (- (/ (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 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 (*.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)) (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 y-scale y-scale) (*.f64 x-scale x-scale))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) |
(* 1/4 (* x-scale (* y-scale (sqrt 8)))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) |
(* 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) |
(* 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) |
(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 |
#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 (PI.f64) #s(literal 1/180 binary64)))) |
(* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* 1/22674816000000 (* (pow angle 2) (pow (PI) 5))))))) |
(*.f64 angle (+.f64 (*.f64 (PI.f64) #s(literal 1/180 binary64)) (*.f64 (*.f64 angle angle) (+.f64 (*.f64 #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 (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 #s(literal -1/30855889612800000000 binary64) (*.f64 angle angle)) (pow.f64 (PI.f64) #s(literal 7 binary64))) (*.f64 #s(literal 1/22674816000000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64))))))))) |
(sin (* 1/180 (* angle (PI)))) |
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
(sin (* 1/180 (* angle (PI)))) |
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
(sin (* 1/180 (* angle (PI)))) |
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
(sin (* 1/180 (* angle (PI)))) |
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
(sin (* 1/180 (* angle (PI)))) |
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
(sin (* 1/180 (* angle (PI)))) |
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
(sin (* 1/180 (* angle (PI)))) |
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
(sin (* 1/180 (* angle (PI)))) |
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) |
1 |
#s(literal 1 binary64) |
(+ 1 (* -1/64800 (* (pow angle 2) (pow (PI) 2)))) |
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/64800 binary64) (*.f64 angle angle)) (*.f64 (PI.f64) (PI.f64)))) |
(+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* 1/25194240000 (* (pow angle 2) (pow (PI) 4)))))) |
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 angle angle) (+.f64 (*.f64 (*.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)))) |
Compiled 95695 to 5816 computations (93.9% saved)
71 alts after pruning (68 fresh and 3 done)
| Pruned | Kept | Total | |
|---|---|---|---|
| New | 1272 | 32 | 1304 |
| Fresh | 19 | 36 | 55 |
| Picked | 3 | 2 | 5 |
| Done | 0 | 1 | 1 |
| Total | 1294 | 71 | 1365 |
| Status | Accuracy | Program |
|---|---|---|
| 2.0% | (/.f64 (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 b b) (*.f64 a (*.f64 a (*.f64 b b)))))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 (/.f64 #s(literal 1 binary64) x-scale) (*.f64 x-scale (*.f64 y-scale y-scale)))) | |
| 2.2% | (/.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 b b)))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 (*.f64 a (*.f64 (*.f64 a (*.f64 b b)) #s(literal 4 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) | |
| 4.8% | (/.f64 (*.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 b (*.f64 a b)))) (*.f64 y-scale y-scale)) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 b a)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) | |
| 2.4% | (/.f64 (*.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 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 b a)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) | |
| 6.4% | (/.f64 (*.f64 (/.f64 #s(literal 4 binary64) (*.f64 x-scale y-scale)) (/.f64 (*.f64 a (*.f64 a (*.f64 b (*.f64 a b)))) y-scale)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 b a)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) | |
| 3.8% | (/.f64 (*.f64 (*.f64 a (*.f64 a (*.f64 b (*.f64 a b)))) (/.f64 #s(literal 4 binary64) (*.f64 (*.f64 x-scale y-scale) y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 b a)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) | |
| 4.9% | (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) #s(literal 1 binary64)) (*.f64 a b)) (*.f64 a b)) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale y-scale))) x-scale) (*.f64 x-scale (*.f64 y-scale y-scale)))) | |
| 5.6% | (*.f64 (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 b (*.f64 a b)))) x-scale) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (/.f64 (*.f64 a (*.f64 b (*.f64 a b))) (*.f64 (*.f64 x-scale y-scale) y-scale)))) | |
| 5.3% | (*.f64 (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 b (*.f64 a b)))) x-scale) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 a b))))) (/.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) | |
| 4.8% | (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 a (*.f64 a a)) b) (*.f64 b #s(literal 4 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 a b))))) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) | |
| 2.9% | (*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 (*.f64 b b) #s(literal 4 binary64))) (*.f64 (*.f64 (*.f64 a a) b) (*.f64 b #s(literal 4 binary64)))) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) | |
| 4.2% | (*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 (*.f64 b b) #s(literal 4 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 a b))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) #s(literal 1 binary64)) (*.f64 y-scale (/.f64 (/.f64 #s(literal 1 binary64) x-scale) (*.f64 x-scale (*.f64 y-scale y-scale)))))) | |
| 2.4% | (*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 (*.f64 b b) #s(literal 4 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 a b))))) (*.f64 (/.f64 (*.f64 x-scale x-scale) (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 y-scale y-scale))) | |
| 2.9% | (*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 (*.f64 b b) #s(literal 4 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 a b))))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 x-scale (*.f64 y-scale y-scale)))) | |
| 6.3% | (*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 (*.f64 b b) #s(literal 4 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 a b))))) x-scale) | |
| 2.3% | (*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 b b) (*.f64 a (*.f64 a (*.f64 b b)))))) (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) | |
| 2.5% | (*.f64 (/.f64 (*.f64 (*.f64 a (exp.f64 (*.f64 (log.f64 a) #s(literal 2 binary64)))) (*.f64 (*.f64 b b) #s(literal 4 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 a b))))) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) | |
| 2.4% | (*.f64 (/.f64 (*.f64 (exp.f64 (*.f64 (log.f64 a) #s(literal 3 binary64))) (*.f64 (*.f64 b b) #s(literal 4 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 a b))))) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) | |
| 2.7% | (*.f64 (/.f64 (*.f64 (exp.f64 (*.f64 (log.f64 a) #s(literal 3 binary64))) (*.f64 (*.f64 b b) #s(literal 4 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 a b))))) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale y-scale))) x-scale) (*.f64 x-scale (*.f64 y-scale y-scale)))) | |
| 3.0% | (*.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 (*.f64 a (*.f64 b b)) #s(literal 4 binary64)))) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 a b))))) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) | |
| 4.3% | (*.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 b (*.f64 a b)))) #s(literal 4 binary64)) (/.f64 (/.f64 #s(literal 4 binary64) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 (*.f64 a (*.f64 b (*.f64 a b))) (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) | |
| 5.2% | (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 a (*.f64 b (*.f64 a b)))) (/.f64 #s(literal 4 binary64) (*.f64 (*.f64 x-scale y-scale) y-scale))) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 a b))))) (*.f64 x-scale y-scale)) (*.f64 x-scale y-scale)) | |
| 2.0% | (*.f64 (*.f64 (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 a (*.f64 a a))) (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 b b) (*.f64 (*.f64 a a) (*.f64 b b))))) | |
| 4.2% | (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 b b)) (*.f64 #s(literal 4 binary64) a)) (/.f64 (*.f64 a (*.f64 a a)) (*.f64 a (*.f64 b b)))) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) | |
| 2.7% | (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) (*.f64 (*.f64 a a) (*.f64 b b))) #s(literal 1 binary64)) (/.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 x-scale y-scale)) y-scale) | |
| 2.0% | (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) (*.f64 (*.f64 a a) (*.f64 b b))) #s(literal 1 binary64)) (/.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) x-scale) (*.f64 y-scale y-scale)) | |
| 5.8% | (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.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 y-scale y-scale)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) | |
| 4.7% | (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))))) | |
| 12.1% | (*.f64 (*.f64 a (*.f64 x-scale #s(literal 1/4 binary64))) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 x-scale x-scale)))))) | |
| 0.3% | (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 a (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) (*.f64 b b))) (sqrt.f64 (*.f64 #s(literal 8 binary64) (/.f64 (+.f64 (*.f64 (/.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 x-scale x-scale)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 b b) (*.f64 (*.f64 b b) (-.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.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 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (+.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64))))))))) (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) | |
| 0.3% | (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 a (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) (*.f64 b b))) (sqrt.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.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 (+.f64 #s(literal 1/2 binary64) (*.f64 #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 y-scale y-scale))))))) | |
| 9.1% | (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale b) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -2 binary64) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)))))) | |
| 8.5% | (*.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 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) | |
| 9.4% | (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (fma.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) x-scale) (/.f64 #s(literal 1 binary64) x-scale) (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))))) | |
| 8.5% | (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (fma.f64 (/.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) x-scale) (/.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) x-scale) (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))))) | |
| 9.8% | (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (fma.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 x-scale x-scale))) #s(literal -1 binary64)) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 x-scale x-scale))))) | |
| 9.5% | (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (fma.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))))) | |
| 9.4% | (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (fma.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) (/.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))))) | |
| 7.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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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 x-scale x-scale)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))))) | |
| 10.9% | (*.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 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) x-scale) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (*.f64 x-scale (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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 x-scale (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))))) | |
| 9.6% | (*.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64))) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)))))) | |
| 7.3% | (*.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (*.f64 (pow.f64 (cbrt.f64 (sqrt.f64 (PI.f64))) #s(literal 3 binary64)) (pow.f64 (cbrt.f64 (sqrt.f64 (PI.f64))) #s(literal 3 binary64)))) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)))))) | |
| 7.9% | (*.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (cbrt.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))))) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)))))) | |
| 10.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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)) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)))))) | |
| 9.9% | (*.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))))) | |
| 6.5% | (*.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.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 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) #s(literal 1/787320000 binary64))))) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)))))) | |
| 11.5% | (*.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/64800 binary64) (*.f64 angle angle)) (*.f64 (PI.f64) (PI.f64)))) #s(literal 2 binary64)))))) | |
| 11.5% | (*.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 #s(literal 1 binary64) #s(literal 2 binary64)))))) | |
| 6.5% | (*.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 angle angle) (+.f64 (/.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.f64 (*.f64 angle angle) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)))))))) | |
| 10.0% | (*.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 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)))))) | |
| 28.4% | (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 #s(literal 0 binary64))) | |
| 9.4% | (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))))))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) | |
| 1.3% | (*.f64 (*.f64 #s(literal 1/4 binary64) (*.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 b b)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b))))))) | |
| 8.1% | (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (+.f64 (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)))))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))))) | |
| 3.1% | (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (-.f64 (*.f64 (*.f64 b b) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (exp.f64 (*.f64 (*.f64 #s(literal -1/64800 binary64) (*.f64 angle angle)) (*.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)))) #s(literal 2 binary64))))))) | |
| 0.9% | (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (-.f64 (*.f64 (*.f64 b b) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (exp.f64 (*.f64 (log.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))) #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)))) #s(literal 2 binary64))))))) | |
| 2.9% | (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (-.f64 (*.f64 (*.f64 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 x-scale x-scale) (*.f64 y-scale y-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))))))) | |
| 6.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 (*.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 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.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 #s(literal 1 binary64) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.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 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) | |
| 6.0% | (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.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 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.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 #s(literal 1 binary64) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) | |
| 6.9% | (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 #s(literal 1 binary64) #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 #s(literal 1 binary64) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) | |
| 6.9% | (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (exp.f64 (*.f64 (log.f64 #s(literal 8 binary64)) #s(literal 1/2 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 (*.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 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.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 #s(literal 1 binary64) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) | |
| 3.4% | (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.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 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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)))))))) | |
| 2.5% | (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-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 b b)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (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 x-scale x-scale)) #s(literal 2 binary64))) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b))))))) | |
| 2.1% | (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 a (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))) | |
| 27.6% | (*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) | |
| 28.9% | (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 a (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 #s(literal 0 binary64))) | |
| ✓ | 32.5% | (*.f64 x-scale a) |
| 13.0% | (*.f64 a (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) | |
| 11.1% | (*.f64 a (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale y-scale))) x-scale) (*.f64 x-scale (*.f64 y-scale y-scale)))) | |
| ✓ | 32.5% | (*.f64 #s(literal 4 binary64) (*.f64 x-scale (*.f64 a #s(literal 1/4 binary64)))) |
| ✓ | 32.3% | (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
Compiled 15806 to 3366 computations (78.7% saved)
| Inputs |
|---|
(*.f64 x-scale a) |
(*.f64 #s(literal 1 binary64) (*.f64 a x-scale)) |
(*.f64 #s(literal 4 binary64) (*.f64 x-scale (*.f64 a #s(literal 1/4 binary64)))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) a) (*.f64 x-scale #s(literal 4 binary64))) |
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) a) #s(literal 4 binary64)) |
(*.f64 a (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale y-scale))) x-scale) (*.f64 x-scale (*.f64 y-scale y-scale)))) |
(*.f64 a (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) |
(*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 (*.f64 b b) #s(literal 4 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 a b))))) x-scale) |
(*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) (*.f64 (*.f64 a a) (*.f64 b b))) #s(literal 1 binary64)) (/.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) x-scale) (*.f64 y-scale y-scale)) |
(*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) (*.f64 (*.f64 a a) (*.f64 b b))) #s(literal 1 binary64)) (/.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 x-scale y-scale)) y-scale) |
(*.f64 (*.f64 (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 a (*.f64 a a))) (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 b b) (*.f64 (*.f64 a a) (*.f64 b b))))) |
(*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 b b) (*.f64 a (*.f64 a (*.f64 b b)))))) (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) |
(*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 (*.f64 b b) #s(literal 4 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 a b))))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 x-scale (*.f64 y-scale y-scale)))) |
(*.f64 (*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 a (*.f64 b (*.f64 a b)))) (/.f64 #s(literal 4 binary64) (*.f64 (*.f64 x-scale y-scale) y-scale))) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 a b))))) (*.f64 x-scale y-scale)) (*.f64 x-scale y-scale)) |
(*.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 b (*.f64 a b)))) #s(literal 4 binary64)) (/.f64 (/.f64 #s(literal 4 binary64) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 (*.f64 a (*.f64 b (*.f64 a b))) (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) |
(*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 (*.f64 b b) #s(literal 4 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 a b))))) (*.f64 (/.f64 (*.f64 x-scale x-scale) (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 y-scale y-scale))) |
(*.f64 (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 b (*.f64 a b)))) x-scale) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (/.f64 (*.f64 a (*.f64 b (*.f64 a b))) (*.f64 (*.f64 x-scale y-scale) y-scale)))) |
(*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) #s(literal 1 binary64)) (*.f64 a b)) (*.f64 a b)) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale y-scale))) x-scale) (*.f64 x-scale (*.f64 y-scale y-scale)))) |
(/.f64 (*.f64 (*.f64 a (*.f64 a (*.f64 b (*.f64 a b)))) (/.f64 #s(literal 4 binary64) (*.f64 (*.f64 x-scale y-scale) y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 b a)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) |
(/.f64 (*.f64 (/.f64 #s(literal 4 binary64) (*.f64 x-scale y-scale)) (/.f64 (*.f64 a (*.f64 a (*.f64 b (*.f64 a b)))) y-scale)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 b a)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) |
(/.f64 (*.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 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 b a)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) |
(/.f64 (*.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 b (*.f64 a b)))) (*.f64 y-scale y-scale)) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 b a)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) |
(/.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 b b)))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 (*.f64 a (*.f64 (*.f64 a (*.f64 b b)) #s(literal 4 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) |
(/.f64 (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 b b) (*.f64 a (*.f64 a (*.f64 b b)))))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 (/.f64 #s(literal 1 binary64) x-scale) (*.f64 x-scale (*.f64 y-scale y-scale)))) |
(*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 b b)))) (*.f64 #s(literal 4 binary64) a)) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 a (*.f64 b b)))) |
(*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 (*.f64 b b) #s(literal 4 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 a b))))) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale y-scale))) x-scale) (*.f64 x-scale (*.f64 y-scale y-scale)))) |
(*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 (*.f64 b b) #s(literal 4 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 a b))))) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 x-scale (*.f64 x-scale y-scale))) y-scale)) |
(*.f64 (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 b (*.f64 a b)))) x-scale) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 a b))))) (/.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) |
(*.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 b b)) (*.f64 #s(literal 4 binary64) a)) (/.f64 (*.f64 a (*.f64 a a)) (*.f64 a (*.f64 b b)))) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) |
(*.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 (*.f64 a (*.f64 b b)) #s(literal 4 binary64)))) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 a b))))) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) |
(*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 (*.f64 b b) #s(literal 4 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 a b))))) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) |
(*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 (*.f64 b b) #s(literal 4 binary64))) (*.f64 (*.f64 (*.f64 a a) b) (*.f64 b #s(literal 4 binary64)))) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) |
(*.f64 (/.f64 (*.f64 (*.f64 (*.f64 a (*.f64 a a)) b) (*.f64 b #s(literal 4 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 a b))))) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) |
(*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 (*.f64 b b) #s(literal 4 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 a b))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) #s(literal 1 binary64)) (*.f64 y-scale (/.f64 (/.f64 #s(literal 1 binary64) x-scale) (*.f64 x-scale (*.f64 y-scale y-scale)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 a (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 #s(literal 0 binary64))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 #s(literal 0 binary64))) |
(*.f64 (/.f64 (*.f64 (exp.f64 (*.f64 (log.f64 a) #s(literal 3 binary64))) (*.f64 (*.f64 b b) #s(literal 4 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 a b))))) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale y-scale))) x-scale) (*.f64 x-scale (*.f64 y-scale y-scale)))) |
(*.f64 (/.f64 (*.f64 (exp.f64 (*.f64 (log.f64 a) #s(literal 3 binary64))) (*.f64 (*.f64 b b) #s(literal 4 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 a b))))) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) |
(/.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 4 binary64) (*.f64 a (*.f64 b (*.f64 b a)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) |
(*.f64 (/.f64 (*.f64 (*.f64 a (exp.f64 (*.f64 (log.f64 a) #s(literal 2 binary64)))) (*.f64 (*.f64 b b) #s(literal 4 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 a b))))) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 a (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) (*.f64 b b))) (*.f64 (/.f64 (*.f64 (*.f64 b b) (sqrt.f64 #s(literal 8 binary64))) (*.f64 x-scale y-scale)) (sqrt.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (+.f64 (/.f64 #s(literal 3/2 binary64) (*.f64 y-scale y-scale)) (/.f64 #s(literal -1/2 binary64) (*.f64 x-scale x-scale))))))) |
(/.f64 (sqrt.f64 (/.f64 (*.f64 #s(literal 16 binary64) (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 b #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale x-scale) (pow.f64 y-scale #s(literal 4 binary64))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 b a)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) |
(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 a (exp.f64 (*.f64 (log.f64 a) #s(literal 2 binary64)))) (*.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 4 binary64) (*.f64 a (*.f64 b (*.f64 b a)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 angle angle) (+.f64 (/.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.f64 (*.f64 angle angle) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)))))))) |
(*.f64 (*.f64 a (*.f64 x-scale #s(literal 1/4 binary64))) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 x-scale x-scale)))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.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 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) #s(literal 1/787320000 binary64))))) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)))))) |
(*.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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 1/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 a x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (fma.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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 1/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 a x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (fma.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 x-scale x-scale))) #s(literal -1 binary64)) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (*.f64 x-scale x-scale))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (fma.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) x-scale) (/.f64 #s(literal 1 binary64) x-scale) (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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 1/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 (*.f64 a (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) (*.f64 b b))) (sqrt.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.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 (+.f64 #s(literal 1/2 binary64) (*.f64 #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 y-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 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) x-scale) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (*.f64 x-scale (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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 x-scale (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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 a x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (/.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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 x-scale x-scale)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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 (*.f64 a (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) (*.f64 b b))) (sqrt.f64 (*.f64 #s(literal 8 binary64) (/.f64 (+.f64 (*.f64 (/.f64 (*.f64 (*.f64 b (*.f64 b (*.f64 b b))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal -1/2 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 x-scale x-scale)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 b b) (*.f64 (*.f64 b b) (-.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.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 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (+.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))))) #s(literal 2 binary64))))))))) (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale (*.f64 x-scale (*.f64 y-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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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)) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (fma.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) (/.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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 1/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 a x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (fma.f64 (/.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) x-scale) (/.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) x-scale) (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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 1/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 a x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 #s(literal 1 binary64) #s(literal 2 binary64)))))) |
(*.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/64800 binary64) (*.f64 angle angle)) (*.f64 (PI.f64) (PI.f64)))) #s(literal 2 binary64)))))) |
(*.f64 (*.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 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)))))) |
(*.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #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 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))) |
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale y-scale)) (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (-.f64 (*.f64 b (*.f64 b (+.f64 (/.f64 (+.f64 #s(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/180 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 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 y-scale y-scale))))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b b) (*.f64 b b))) (+.f64 #s(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/180 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/180 binary64))))))) (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (+.f64 #s(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/180 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 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))))) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))))) |
(*.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (cbrt.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))))) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #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 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #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 (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 b b)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (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 x-scale x-scale)) #s(literal 2 binary64))) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.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 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 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 b b)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b))))))) |
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))) |
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (pow.f64 a #s(literal 4 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))))) |
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.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 y-scale y-scale)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 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 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 (*.f64 a x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64))) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale b) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -2 binary64) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.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 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))))) (/.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))) (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/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 x-scale x-scale)) (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (*.f64 b b))))) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) x-scale) (/.f64 (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))) x-scale))))))))) |
(/.f64 (/.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 (*.f64 b 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 a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 0 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 x-scale y-scale) (*.f64 (+.f64 b a) (*.f64 #s(literal 2 binary64) (-.f64 b a))))))))) #s(literal 4 binary64)) (*.f64 (/.f64 (*.f64 a (*.f64 b b)) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale))))) |
(/.f64 (/.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 (*.f64 b 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 a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 0 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 x-scale y-scale) (*.f64 (+.f64 b a) (*.f64 #s(literal 2 binary64) (-.f64 b a))))))))) (/.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 (*.f64 (*.f64 a (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) (*.f64 b b))) (sqrt.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.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))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-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 (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 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b (*.f64 a (*.f64 (*.f64 b 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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 a a)) (*.f64 (*.f64 b b) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 y-scale y-scale))) (/.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 0 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 x-scale y-scale) (*.f64 (+.f64 b a) (*.f64 #s(literal 2 binary64) (-.f64 b a))))))) (/.f64 (*.f64 b (*.f64 a (*.f64 (*.f64 b 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 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 b a)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) |
(/.f64 (*.f64 (*.f64 a (*.f64 a a)) (sqrt.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (-.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))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale x-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 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 b a)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 a a))) (sqrt.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #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 y-scale y-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 (*.f64 (pow.f64 a #s(literal 6 binary64)) (+.f64 #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 x-scale #s(literal 4 binary64)) (*.f64 y-scale y-scale))))))) |
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))))) |
(*.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 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (*.f64 (pow.f64 (cbrt.f64 (sqrt.f64 (PI.f64))) #s(literal 3 binary64)) (pow.f64 (cbrt.f64 (sqrt.f64 (PI.f64))) #s(literal 3 binary64)))) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 a (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.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 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 #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 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 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #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 #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 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-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 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 x-scale x-scale) (*.f64 y-scale y-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 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-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 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 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (exp.f64 (*.f64 (*.f64 #s(literal -1/64800 binary64) (*.f64 angle angle)) (*.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)))) #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 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (exp.f64 (*.f64 (log.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))) #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)))) #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 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (cbrt.f64 (*.f64 (*.f64 (PI.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)))) #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 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (*.f64 (*.f64 b b) (-.f64 (/.f64 (pow.f64 (exp.f64 (*.f64 (log.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)))) #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)))) #s(literal 2 binary64))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (+.f64 (*.f64 b b) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)))))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.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 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 #s(literal 1 binary64) #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 #s(literal 1 binary64) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) |
(*.f64 (*.f64 #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 (*.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 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.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 #s(literal 1 binary64) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64)) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) |
(/.f64 (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 x-scale (*.f64 y-scale y-scale)))))) (-.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))) (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 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64))) (cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) (/.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (*.f64 x-scale y-scale))))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 b a)))) (*.f64 x-scale (*.f64 x-scale (*.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 (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 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) |
(*.f64 (*.f64 #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 (*.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 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.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 #s(literal 1 binary64) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) |
(*.f64 (*.f64 #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 (*.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 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.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 #s(literal 1 binary64) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.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 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) |
(*.f64 (*.f64 #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 (*.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 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (*.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 a a) (pow.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 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/64800 binary64) (*.f64 angle angle)) (*.f64 (PI.f64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) |
(*.f64 (*.f64 #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 (*.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 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.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)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) |
(*.f64 a (+.f64 (*.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) #s(literal 0 binary64)))) (*.f64 a x-scale))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))))))) (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/180 binary64))) #s(literal 2 binary64)))))))) |
(*.f64 a (+.f64 (*.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 b #s(literal 0 binary64))))) (*.f64 a x-scale))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 #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 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))))) |
(*.f64 b (+.f64 (*.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y-scale (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 a #s(literal 0 binary64))))) (*.f64 b x-scale))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a)))))))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.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 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (exp.f64 (*.f64 (log.f64 #s(literal 8 binary64)) #s(literal 1/2 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 (*.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 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.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 #s(literal 1 binary64) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.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 b b) (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 #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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.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/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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.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 a a) (pow.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 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) |
(*.f64 (*.f64 #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 (*.f64 b b) (pow.f64 (+.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)))))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) |
(*.f64 (*.f64 #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 (*.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 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (*.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))))))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) |
(/.f64 (*.f64 (/.f64 (*.f64 (*.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) (pow.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #s(literal -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 b b) (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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.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) (*.f64 a (*.f64 b (*.f64 b a)))) (*.f64 x-scale (*.f64 x-scale (*.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 (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 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.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 #s(literal 1 binary64) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 y-scale (exp.f64 (*.f64 (log.f64 #s(literal 8 binary64)) #s(literal 1/2 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 (*.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 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) |
(*.f64 (*.f64 #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 (*.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 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) |
(/.f64 (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 (/.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 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b 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 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) #s(literal 2 binary64))))))) (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 (*.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 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))))) (*.f64 x-scale (+.f64 (*.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) (*.f64 (*.f64 b b) (sqrt.f64 #s(literal 8 binary64)))) x-scale) (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 (*.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 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a b) (+.f64 a b)) (*.f64 (-.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale))) (+.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))))) y-scale) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 b a)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) |
| Outputs |
|---|
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 #s(literal 0 binary64))) |
(*.f64 x-scale a) |
(*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) |
8 calls:
| 49.0ms | (/.f64 angle #s(literal 180 binary64)) |
| 37.0ms | (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)) |
| 37.0ms | x-scale |
| 36.0ms | y-scale |
| 36.0ms | a |
| Accuracy | Segments | Branch |
|---|---|---|
| 45.5% | 3 | a |
| 42.1% | 2 | b |
| 41.5% | 3 | angle |
| 45.5% | 3 | x-scale |
| 42.5% | 2 | y-scale |
| 32.5% | 1 | (/.f64 (neg.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (-.f64 (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) |
| 41.5% | 3 | (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)) |
| 41.5% | 3 | (/.f64 angle #s(literal 180 binary64)) |
Compiled 236 to 97 computations (58.9% saved)
| Inputs |
|---|
(*.f64 x-scale a) |
(*.f64 #s(literal 1 binary64) (*.f64 a x-scale)) |
(*.f64 #s(literal 4 binary64) (*.f64 x-scale (*.f64 a #s(literal 1/4 binary64)))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) a) (*.f64 x-scale #s(literal 4 binary64))) |
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) a) #s(literal 4 binary64)) |
(*.f64 a (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale y-scale))) x-scale) (*.f64 x-scale (*.f64 y-scale y-scale)))) |
(*.f64 a (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) |
(*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 (*.f64 b b) #s(literal 4 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 a b))))) x-scale) |
(*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) (*.f64 (*.f64 a a) (*.f64 b b))) #s(literal 1 binary64)) (/.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) x-scale) (*.f64 y-scale y-scale)) |
(*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) (*.f64 (*.f64 a a) (*.f64 b b))) #s(literal 1 binary64)) (/.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 x-scale y-scale)) y-scale) |
(*.f64 (*.f64 (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 a (*.f64 a a))) (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 b b) (*.f64 (*.f64 a a) (*.f64 b b))))) |
(*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 b b) (*.f64 a (*.f64 a (*.f64 b b)))))) (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) |
(*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 (*.f64 b b) #s(literal 4 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 a b))))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 x-scale (*.f64 y-scale y-scale)))) |
(*.f64 (*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 a (*.f64 b (*.f64 a b)))) (/.f64 #s(literal 4 binary64) (*.f64 (*.f64 x-scale y-scale) y-scale))) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 a b))))) (*.f64 x-scale y-scale)) (*.f64 x-scale y-scale)) |
(*.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 b (*.f64 a b)))) #s(literal 4 binary64)) (/.f64 (/.f64 #s(literal 4 binary64) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 (*.f64 a (*.f64 b (*.f64 a b))) (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) |
(*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 (*.f64 b b) #s(literal 4 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 a b))))) (*.f64 (/.f64 (*.f64 x-scale x-scale) (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 y-scale y-scale))) |
(*.f64 (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 b (*.f64 a b)))) x-scale) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (/.f64 (*.f64 a (*.f64 b (*.f64 a b))) (*.f64 (*.f64 x-scale y-scale) y-scale)))) |
(*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) #s(literal 1 binary64)) (*.f64 a b)) (*.f64 a b)) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale y-scale))) x-scale) (*.f64 x-scale (*.f64 y-scale y-scale)))) |
(/.f64 (*.f64 (*.f64 a (*.f64 a (*.f64 b (*.f64 a b)))) (/.f64 #s(literal 4 binary64) (*.f64 (*.f64 x-scale y-scale) y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 b a)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) |
(/.f64 (*.f64 (/.f64 #s(literal 4 binary64) (*.f64 x-scale y-scale)) (/.f64 (*.f64 a (*.f64 a (*.f64 b (*.f64 a b)))) y-scale)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 b a)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) |
(/.f64 (*.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 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 b a)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) |
(/.f64 (*.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 b (*.f64 a b)))) (*.f64 y-scale y-scale)) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 b a)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) |
(/.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 b b)))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 (*.f64 a (*.f64 (*.f64 a (*.f64 b b)) #s(literal 4 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) |
(/.f64 (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 b b) (*.f64 a (*.f64 a (*.f64 b b)))))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 (/.f64 #s(literal 1 binary64) x-scale) (*.f64 x-scale (*.f64 y-scale y-scale)))) |
(*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 b b)))) (*.f64 #s(literal 4 binary64) a)) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 a (*.f64 b b)))) |
(*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 (*.f64 b b) #s(literal 4 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 a b))))) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale y-scale))) x-scale) (*.f64 x-scale (*.f64 y-scale y-scale)))) |
(*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 (*.f64 b b) #s(literal 4 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 a b))))) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 x-scale (*.f64 x-scale y-scale))) y-scale)) |
(*.f64 (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 b (*.f64 a b)))) x-scale) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 a b))))) (/.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) |
(*.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 b b)) (*.f64 #s(literal 4 binary64) a)) (/.f64 (*.f64 a (*.f64 a a)) (*.f64 a (*.f64 b b)))) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) |
(*.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 (*.f64 a (*.f64 b b)) #s(literal 4 binary64)))) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 a b))))) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) |
(*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 (*.f64 b b) #s(literal 4 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 a b))))) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) |
(*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 (*.f64 b b) #s(literal 4 binary64))) (*.f64 (*.f64 (*.f64 a a) b) (*.f64 b #s(literal 4 binary64)))) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) |
(*.f64 (/.f64 (*.f64 (*.f64 (*.f64 a (*.f64 a a)) b) (*.f64 b #s(literal 4 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 a b))))) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) |
(*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 (*.f64 b b) #s(literal 4 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 a b))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) #s(literal 1 binary64)) (*.f64 y-scale (/.f64 (/.f64 #s(literal 1 binary64) x-scale) (*.f64 x-scale (*.f64 y-scale y-scale)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 a (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 #s(literal 0 binary64))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) |
| Outputs |
|---|
(*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 a (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 #s(literal 0 binary64))) |
(*.f64 x-scale a) |
(*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))) |
2 calls:
| 12.0ms | x-scale |
| 11.0ms | a |
| Accuracy | Segments | Branch |
|---|---|---|
| 45.5% | 3 | a |
| 43.5% | 2 | x-scale |
Compiled 12 to 10 computations (16.7% saved)
| Inputs |
|---|
(*.f64 x-scale a) |
(*.f64 #s(literal 1 binary64) (*.f64 a x-scale)) |
(*.f64 #s(literal 4 binary64) (*.f64 x-scale (*.f64 a #s(literal 1/4 binary64)))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) a) (*.f64 x-scale #s(literal 4 binary64))) |
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) a) #s(literal 4 binary64)) |
(*.f64 a (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale y-scale))) x-scale) (*.f64 x-scale (*.f64 y-scale y-scale)))) |
(*.f64 a (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) |
(*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 (*.f64 b b) #s(literal 4 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 a b))))) x-scale) |
(*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) (*.f64 (*.f64 a a) (*.f64 b b))) #s(literal 1 binary64)) (/.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) x-scale) (*.f64 y-scale y-scale)) |
(*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) (*.f64 (*.f64 a a) (*.f64 b b))) #s(literal 1 binary64)) (/.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 x-scale y-scale)) y-scale) |
(*.f64 (*.f64 (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 a (*.f64 a a))) (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 b b) (*.f64 (*.f64 a a) (*.f64 b b))))) |
(*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 b b) (*.f64 a (*.f64 a (*.f64 b b)))))) (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) |
(*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 (*.f64 b b) #s(literal 4 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 a b))))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 x-scale (*.f64 y-scale y-scale)))) |
(*.f64 (*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 a (*.f64 b (*.f64 a b)))) (/.f64 #s(literal 4 binary64) (*.f64 (*.f64 x-scale y-scale) y-scale))) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 a b))))) (*.f64 x-scale y-scale)) (*.f64 x-scale y-scale)) |
(*.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 b (*.f64 a b)))) #s(literal 4 binary64)) (/.f64 (/.f64 #s(literal 4 binary64) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 (*.f64 a (*.f64 b (*.f64 a b))) (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) |
(*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 (*.f64 b b) #s(literal 4 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 a b))))) (*.f64 (/.f64 (*.f64 x-scale x-scale) (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 y-scale y-scale))) |
(*.f64 (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 b (*.f64 a b)))) x-scale) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (/.f64 (*.f64 a (*.f64 b (*.f64 a b))) (*.f64 (*.f64 x-scale y-scale) y-scale)))) |
(*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) #s(literal 1 binary64)) (*.f64 a b)) (*.f64 a b)) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale y-scale))) x-scale) (*.f64 x-scale (*.f64 y-scale y-scale)))) |
(/.f64 (*.f64 (*.f64 a (*.f64 a (*.f64 b (*.f64 a b)))) (/.f64 #s(literal 4 binary64) (*.f64 (*.f64 x-scale y-scale) y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 b a)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) |
(/.f64 (*.f64 (/.f64 #s(literal 4 binary64) (*.f64 x-scale y-scale)) (/.f64 (*.f64 a (*.f64 a (*.f64 b (*.f64 a b)))) y-scale)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 b a)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) |
(/.f64 (*.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 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 b a)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) |
(/.f64 (*.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 b (*.f64 a b)))) (*.f64 y-scale y-scale)) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 b a)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) |
(/.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 b b)))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 (*.f64 a (*.f64 (*.f64 a (*.f64 b b)) #s(literal 4 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) |
(/.f64 (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 b b) (*.f64 a (*.f64 a (*.f64 b b)))))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 (/.f64 #s(literal 1 binary64) x-scale) (*.f64 x-scale (*.f64 y-scale y-scale)))) |
(*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 b b)))) (*.f64 #s(literal 4 binary64) a)) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 a (*.f64 b b)))) |
(*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 (*.f64 b b) #s(literal 4 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 a b))))) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale y-scale))) x-scale) (*.f64 x-scale (*.f64 y-scale y-scale)))) |
(*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 (*.f64 b b) #s(literal 4 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 a b))))) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 x-scale (*.f64 x-scale y-scale))) y-scale)) |
(*.f64 (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 b (*.f64 a b)))) x-scale) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 a b))))) (/.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) |
(*.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 b b)) (*.f64 #s(literal 4 binary64) a)) (/.f64 (*.f64 a (*.f64 a a)) (*.f64 a (*.f64 b b)))) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) |
(*.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 (*.f64 a (*.f64 b b)) #s(literal 4 binary64)))) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 a b))))) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) |
(*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 (*.f64 b b) #s(literal 4 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 a b))))) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) |
(*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 (*.f64 b b) #s(literal 4 binary64))) (*.f64 (*.f64 (*.f64 a a) b) (*.f64 b #s(literal 4 binary64)))) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) |
(*.f64 (/.f64 (*.f64 (*.f64 (*.f64 a (*.f64 a a)) b) (*.f64 b #s(literal 4 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 a b))))) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) |
(*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 (*.f64 b b) #s(literal 4 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 a b))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) #s(literal 1 binary64)) (*.f64 y-scale (/.f64 (/.f64 #s(literal 1 binary64) x-scale) (*.f64 x-scale (*.f64 y-scale y-scale)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
(*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 a (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 #s(literal 0 binary64))) |
| Outputs |
|---|
(*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 a (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 #s(literal 0 binary64))) |
(*.f64 x-scale a) |
3 calls:
| 16.0ms | a |
| 12.0ms | y-scale |
| 10.0ms | x-scale |
| Accuracy | Segments | Branch |
|---|---|---|
| 42.5% | 2 | y-scale |
| 36.2% | 2 | x-scale |
| 34.4% | 2 | a |
Compiled 18 to 15 computations (16.7% saved)
Total -19.8b remaining (-45.8%)
Threshold costs -19.8b (-45.8%)
| Inputs |
|---|
(*.f64 x-scale a) |
(*.f64 #s(literal 1 binary64) (*.f64 a x-scale)) |
(*.f64 #s(literal 4 binary64) (*.f64 x-scale (*.f64 a #s(literal 1/4 binary64)))) |
(*.f64 (*.f64 #s(literal 1/4 binary64) a) (*.f64 x-scale #s(literal 4 binary64))) |
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) a) #s(literal 4 binary64)) |
(*.f64 a (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale y-scale))) x-scale) (*.f64 x-scale (*.f64 y-scale y-scale)))) |
(*.f64 a (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) |
(*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 (*.f64 b b) #s(literal 4 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 a b))))) x-scale) |
(*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) (*.f64 (*.f64 a a) (*.f64 b b))) #s(literal 1 binary64)) (/.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) x-scale) (*.f64 y-scale y-scale)) |
(*.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) (*.f64 (*.f64 a a) (*.f64 b b))) #s(literal 1 binary64)) (/.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 x-scale y-scale)) y-scale) |
(*.f64 (*.f64 (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 a (*.f64 a a))) (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 b b) (*.f64 (*.f64 a a) (*.f64 b b))))) |
(*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 b b) (*.f64 a (*.f64 a (*.f64 b b)))))) (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) |
(*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 (*.f64 b b) #s(literal 4 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 a b))))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 x-scale (*.f64 y-scale y-scale)))) |
(*.f64 (*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 a (*.f64 b (*.f64 a b)))) (/.f64 #s(literal 4 binary64) (*.f64 (*.f64 x-scale y-scale) y-scale))) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 a b))))) (*.f64 x-scale y-scale)) (*.f64 x-scale y-scale)) |
(*.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 b (*.f64 a b)))) #s(literal 4 binary64)) (/.f64 (/.f64 #s(literal 4 binary64) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 (*.f64 a (*.f64 b (*.f64 a b))) (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) |
(*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 (*.f64 b b) #s(literal 4 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 a b))))) (*.f64 (/.f64 (*.f64 x-scale x-scale) (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 y-scale y-scale))) |
(*.f64 (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 b (*.f64 a b)))) x-scale) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (/.f64 (*.f64 a (*.f64 b (*.f64 a b))) (*.f64 (*.f64 x-scale y-scale) y-scale)))) |
(*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) #s(literal 1 binary64)) (*.f64 a b)) (*.f64 a b)) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale y-scale))) x-scale) (*.f64 x-scale (*.f64 y-scale y-scale)))) |
(/.f64 (*.f64 (*.f64 a (*.f64 a (*.f64 b (*.f64 a b)))) (/.f64 #s(literal 4 binary64) (*.f64 (*.f64 x-scale y-scale) y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 b a)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) |
(/.f64 (*.f64 (/.f64 #s(literal 4 binary64) (*.f64 x-scale y-scale)) (/.f64 (*.f64 a (*.f64 a (*.f64 b (*.f64 a b)))) y-scale)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 b a)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) |
(/.f64 (*.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 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 b a)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) |
(/.f64 (*.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 b (*.f64 a b)))) (*.f64 y-scale y-scale)) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 b a)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) |
(/.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 b b)))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 (*.f64 a (*.f64 (*.f64 a (*.f64 b b)) #s(literal 4 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) |
(/.f64 (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 b b) (*.f64 a (*.f64 a (*.f64 b b)))))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 (/.f64 #s(literal 1 binary64) x-scale) (*.f64 x-scale (*.f64 y-scale y-scale)))) |
(*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 b b)))) (*.f64 #s(literal 4 binary64) a)) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 a (*.f64 b b)))) |
(*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 (*.f64 b b) #s(literal 4 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 a b))))) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale y-scale))) x-scale) (*.f64 x-scale (*.f64 y-scale y-scale)))) |
(*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 (*.f64 b b) #s(literal 4 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 a b))))) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 x-scale (*.f64 x-scale y-scale))) y-scale)) |
(*.f64 (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 b (*.f64 a b)))) x-scale) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 a b))))) (/.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) |
(*.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 b b)) (*.f64 #s(literal 4 binary64) a)) (/.f64 (*.f64 a (*.f64 a a)) (*.f64 a (*.f64 b b)))) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) |
(*.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 (*.f64 a (*.f64 b b)) #s(literal 4 binary64)))) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 a b))))) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) |
(*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 (*.f64 b b) #s(literal 4 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 a b))))) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) |
(*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 (*.f64 b b) #s(literal 4 binary64))) (*.f64 (*.f64 (*.f64 a a) b) (*.f64 b #s(literal 4 binary64)))) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) |
(*.f64 (/.f64 (*.f64 (*.f64 (*.f64 a (*.f64 a a)) b) (*.f64 b #s(literal 4 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 a b))))) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale y-scale) y-scale)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) |
(*.f64 (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 (*.f64 b b) #s(literal 4 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 a b))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) #s(literal 1 binary64)) (*.f64 y-scale (/.f64 (/.f64 #s(literal 1 binary64) x-scale) (*.f64 x-scale (*.f64 y-scale y-scale)))))) |
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))) |
| Outputs |
|---|
(*.f64 x-scale a) |
5 calls:
| 13.0ms | a |
| 10.0ms | angle |
| 10.0ms | y-scale |
| 10.0ms | b |
| 10.0ms | x-scale |
| Accuracy | Segments | Branch |
|---|---|---|
| 32.5% | 1 | a |
| 32.5% | 1 | x-scale |
| 32.5% | 1 | angle |
| 32.5% | 1 | b |
| 32.5% | 1 | y-scale |
Compiled 30 to 25 computations (16.7% saved)
| 2× | binary-search |
| 1× | narrow-enough |
| 1× | narrow-enough |
| Time | Left | Right |
|---|---|---|
| 358.0ms | 4.56125329769188e+102 | 2.2512901289902358e+105 |
| 141.0ms | 6.595670981705194e-177 | 7.369877343150902e-177 |
| 305.0ms | 82× | 3 | valid |
| 87.0ms | 51× | 2 | valid |
| 84.0ms | 15× | 4 | valid |
| 14.0ms | 10× | 1 | valid |
| 1.0ms | 2× | 0 | valid |
Compiled 460 to 285 computations (38% saved)
ival-sin: 132.0ms (29% of total)ival-pow: 78.0ms (17.1% of total)ival-cos: 78.0ms (17.1% of total)ival-mult: 57.0ms (12.5% of total)ival-div: 46.0ms (10.1% of total)backward-pass: 26.0ms (5.7% of total)ival-add: 11.0ms (2.4% of total)ival-sqrt: 9.0ms (2% of total)ival-sub: 9.0ms (2% of total)ival-neg: 5.0ms (1.1% of total)ival-pi: 2.0ms (0.4% of total)const: 1.0ms (0.2% of total)| 2× | binary-search |
| 1× | narrow-enough |
| 1× | narrow-enough |
| Time | Left | Right |
|---|---|---|
| 430.0ms | 17034378474.7451 | 9962443860860896.0 |
| 337.0ms | 7.644642854240284e-230 | 7.35370451195284e-229 |
| 399.0ms | 118× | 3 | valid |
| 165.0ms | 28× | 4 | valid |
| 154.0ms | 71× | 2 | valid |
| 38.0ms | 23× | 1 | valid |
Compiled 586 to 393 computations (32.9% saved)
ival-sin: 143.0ms (20.7% of total)ival-cos: 133.0ms (19.2% of total)ival-pow: 93.0ms (13.4% of total)ival-mult: 87.0ms (12.6% of total)backward-pass: 74.0ms (10.7% of total)ival-div: 71.0ms (10.3% of total)ival-pi: 37.0ms (5.3% of total)ival-add: 17.0ms (2.5% of total)ival-sqrt: 14.0ms (2% of total)ival-sub: 14.0ms (2% of total)ival-neg: 6.0ms (0.9% of total)const: 2.0ms (0.3% of total)| 1× | binary-search |
| 1× | narrow-enough |
| Time | Left | Right |
|---|---|---|
| 356.0ms | 8.059795150360617e-108 | 5.8778191069886495e-105 |
| 184.0ms | 62× | 3 | valid |
| 86.0ms | 17× | 4 | valid |
| 68.0ms | 40× | 2 | valid |
| 12.0ms | 9× | 1 | valid |
Compiled 404 to 239 computations (40.8% saved)
ival-sin: 68.0ms (21.5% of total)ival-cos: 63.0ms (19.9% of total)ival-mult: 53.0ms (16.7% of total)ival-pow: 47.0ms (14.8% of total)ival-div: 34.0ms (10.7% of total)backward-pass: 22.0ms (6.9% of total)ival-add: 9.0ms (2.8% of total)ival-sub: 8.0ms (2.5% of total)ival-sqrt: 7.0ms (2.2% of total)ival-neg: 3.0ms (0.9% of total)ival-pi: 2.0ms (0.6% of total)const: 1.0ms (0.3% of total)| 1× | egg-herbie |
| 24× | *-commutative_binary64 |
Useful iterations: 0 (0.0ms)
| Iter | Nodes | Cost |
|---|---|---|
| 0 | 40 | 89 |
| 1 | 52 | 89 |
| 1× | saturated |
| Inputs |
|---|
(if (<=.f64 x-scale #s(literal 1939037262489433/285152538601387201165073225356268207805826781703034995661199532368704697950542336656619550707335712486165144348349650456918044045085964874890791332482638386765749667147516559380179637015412736 binary64)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 #s(literal 0 binary64))) (if (<=.f64 x-scale #s(literal 6500000000000000410310477185104660509709506844680420152858143482774139559697108428275632553229872529408 binary64)) (*.f64 x-scale a) (*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))))) |
(if (<=.f64 a #s(literal 8193656135122765/54624374234151766213262145869588543874209860176411919649966143993970993052202041929903572589539772749766081827581405105732721063150545838738336612780694159737611530891378807262929537318189580490579681412185183043434010607923007170897214483464192 binary64)) (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 a (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 #s(literal 0 binary64))) (if (<=.f64 a #s(literal 880000000000 binary64)) (*.f64 x-scale a) (*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))))) |
(if (<=.f64 y-scale #s(literal 1081317136448893/322781234760863573706989896500376484291213224103652939103832419567580952752105149328705669160017228929487896496593436672 binary64)) (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 a (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 #s(literal 0 binary64))) (*.f64 x-scale a)) |
(*.f64 x-scale a) |
| Outputs |
|---|
(if (<=.f64 x-scale #s(literal 1939037262489433/285152538601387201165073225356268207805826781703034995661199532368704697950542336656619550707335712486165144348349650456918044045085964874890791332482638386765749667147516559380179637015412736 binary64)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 #s(literal 0 binary64))) (if (<=.f64 x-scale #s(literal 6500000000000000410310477185104660509709506844680420152858143482774139559697108428275632553229872529408 binary64)) (*.f64 x-scale a) (*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))))) |
(if (<=.f64 x-scale #s(literal 1939037262489433/285152538601387201165073225356268207805826781703034995661199532368704697950542336656619550707335712486165144348349650456918044045085964874890791332482638386765749667147516559380179637015412736 binary64)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (*.f64 x-scale a))) (sqrt.f64 #s(literal 0 binary64))) (if (<=.f64 x-scale #s(literal 6500000000000000410310477185104660509709506844680420152858143482774139559697108428275632553229872529408 binary64)) (*.f64 x-scale a) (*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))))))) |
(if (<=.f64 a #s(literal 8193656135122765/54624374234151766213262145869588543874209860176411919649966143993970993052202041929903572589539772749766081827581405105732721063150545838738336612780694159737611530891378807262929537318189580490579681412185183043434010607923007170897214483464192 binary64)) (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 a (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 #s(literal 0 binary64))) (if (<=.f64 a #s(literal 880000000000 binary64)) (*.f64 x-scale a) (*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64)))))) |
(if (<=.f64 a #s(literal 8193656135122765/54624374234151766213262145869588543874209860176411919649966143993970993052202041929903572589539772749766081827581405105732721063150545838738336612780694159737611530891378807262929537318189580490579681412185183043434010607923007170897214483464192 binary64)) (*.f64 (sqrt.f64 #s(literal 0 binary64)) (*.f64 #s(literal -1/4 binary64) (*.f64 a (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (if (<=.f64 a #s(literal 880000000000 binary64)) (*.f64 x-scale a) (*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 y-scale (sqrt.f64 #s(literal 2 binary64))))))) |
(if (<=.f64 y-scale #s(literal 1081317136448893/322781234760863573706989896500376484291213224103652939103832419567580952752105149328705669160017228929487896496593436672 binary64)) (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 a (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 #s(literal 0 binary64))) (*.f64 x-scale a)) |
(if (<=.f64 y-scale #s(literal 1081317136448893/322781234760863573706989896500376484291213224103652939103832419567580952752105149328705669160017228929487896496593436672 binary64)) (*.f64 (sqrt.f64 #s(literal 0 binary64)) (*.f64 #s(literal -1/4 binary64) (*.f64 a (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 x-scale a)) |
(*.f64 x-scale a) |
| 9426× | *-lowering-*.f32 |
| 9426× | *-lowering-*.f64 |
| 8546× | *-lowering-*.f32 |
| 8546× | *-lowering-*.f64 |
| 7574× | *-lowering-*.f32 |
Useful iterations: 3 (0.0ms)
| Iter | Nodes | Cost |
|---|---|---|
| 0 | 112 | 572 |
| 1 | 733 | 489 |
| 0 | 8136 | 489 |
| 0 | 56 | 183 |
| 1 | 134 | 126 |
| 2 | 562 | 120 |
| 3 | 5148 | 114 |
| 0 | 9455 | 114 |
| 0 | 1532 | 52541 |
| 1 | 5692 | 44026 |
| 0 | 8536 | 44026 |
| 0 | 2871 | 173007 |
| 0 | 8088 | 173007 |
| 0 | 918 | 22781 |
| 1 | 3358 | 18358 |
| 0 | 8182 | 18358 |
| 0 | 130 | 887 |
| 1 | 861 | 819 |
| 0 | 8258 | 819 |
| 0 | 1759 | 140840 |
| 1 | 5749 | 112209 |
| 0 | 8390 | 112209 |
| 1× | fuel |
| 1× | iter limit |
| 1× | node limit |
| 1× | iter limit |
| 1× | node limit |
| 1× | iter limit |
| 1× | node limit |
| 1× | iter limit |
| 1× | node limit |
| 1× | iter limit |
| 1× | node limit |
| 1× | iter limit |
| 1× | node limit |
| 1× | iter limit |
| 1× | node limit |
Compiled 824 to 388 computations (52.9% saved)
Compiled 884 to 408 computations (53.8% saved)
Loading profile data...